单项选择题
阅读下列FORTRAN程序：
INTRINSIC SIN， COS
WRITE（*，*）FUN（SIN，30.0）/FUN（COS，30.0）
END
FUNCTION FUN（F，X）
X=X*3.14159/180
FUN=F（X）
END
程序运行结果是（）
A. sin30°的值
B. cos30°的值
C. tg30°的值
D. ctg30°的值
点击查看答案
相关考题
-
单项选择题
阅读下列FORTRAN程序: CHARACTER*10 A, B*6 DO 10 I=1,10 A(I:I)= 10 COUNTINUE A(1:5)=ABCDE B=FGHIJK A(4:9)=B WRITE(*,100) A 100 FORMAT(1X,A) END 程序运行结果是（）
A. ABCDEFGHIJ
B. ABCDEGHIJK
C. ABCFGHIJK
D. BCDEFGHIJK -
单项选择题
阅读下列FORTRAN程序： DIMENSION M（4，4） DATA M/1，2，3，4，5，6，7，8，9，0，1，2，3，4，5，6/ DO 10 I=1，4 WRITE （*，100）（M（I，J），J=1，I） 10 CONTINUE 100 FORMAT（1X，4I2） END 程序运行的结果是（）
A.A
B.B
C.C
D.D -
单项选择题
某函数子程序中使用了IMPLICIT、READ、COMPLEX和FUNCTION四种语句，其中属于可执行语句的是（）
A.FUNCTION
B.READ
C.COMPLEX
D.IMPLICIT
