一、选择题
1、 下列关于\，Y)\语句行的叙述中，不正确的是( ) A) 这是子程序的第一个语句 B) 字符串\是子程序名
C) 变量X是子程序的形参 D) 子程序执行后，MAP将返回整型数据 2、 FORTRAN表达式\的值是( ) A) 0.5 B) 1 C) 1.0 D) 0
3、 阅读下列FORTRAN程序： PI=3.14159265
WRITE(*,'(F7.4) ')PI END
程序运行后输出结果是( )
A) 3.142 B) 3.1415 C) 0.31416 D) 3.1416
4、 圆的直径存放在整型变量K之中，下列计算圆面积的表达式中正确的是( ) A) 3.1415926*K*K/4 B) 3.1415926*(K*K/4) C) 3.1415926*(K/2)**2 D) 3.1415926*(K/2)*(K/2)
5、 要判断\月收入M在2000元以上(含2000元)且5000元以下)不含5000元)\的职工，应该使用的逻辑表达式是( )
A) M .GE. 2000 .AND. M .LE. 5000 B) M .GE. 2000 .OR. M .LE. 5000 C) M .GE. 2000 .AND. M .LT. 5000 D) M .GE. 2000 .OR. M .LT. 5000
6、 设FORTRAN子程序如下： SUBROUTINE SUB(I，X) B=I+1 X=X+B END
若主程序中的变量M，B已按I-N规则赋值，则调用上述子程序的语句中正确的是( ) A) CALL SUB(M，M) B) CALL SUB(M+4，B) C) CALL SUB(B，B) D) CALL SUB(M，B+4)
7、 下列不是FORTRAN常量的是( )
A) (3.0,4.0) B) 3.1416D+00 C) 2/3 D) 'Very good!' 8、 阅读下列FORTRAN程序： F=1.0
第 1 页/共 页
DO 20 K=3, 7, 3 DO 20 L=K-1, K
20 WRTTE(*,'(I3, F8.1)'K, F*K END
程序运行结果的最后一行是( )
A) 3 6.0 B) 6 6.0 C) 6 180.0 D) 7 180.0
9、 在FORTRAN中，下列运算符的优先顺序是( )
A) 逻辑运算，关系运算，算术运算 B) 关系运算，逻辑运算，算术运算 C) 算术运算，关系运算，逻辑运算 D) 关系运算，算术运算，逻辑运算 10、 使用FORTRAN内部函数时，所给的自变量( ) A) 只能是常量 B) 只能是变量
C) 只能是常量或者变量 D) 可以是常量、变量或者表达式
11、 设X=2.0, Y=8.0, Z=6.0, L=.TRUE.,则下列FORTRAN表达式中值为.TRUE.的是( ) A) X+Z.GT.Y.AND.L B) .NOT.(Y.LT.Z+X).NEQV..NOT.L C) .NOT.L.OR.(L.EQV.Y+X.EQ.Z) D) Y+X.GE.Z+X.AND.(L.AND..FALSE.) 12、 下列输出语句行中正确的是( )
A) WRITE(*，*)(A(K，L)，K=1，3，L=1，3) B) WRITE(*，*)A(K，L)，K=1，3，L=1，3
C) WRITE(*，*)((A(K，L)，K=1，3)， L=1，3) D) WRITE(*，*)(A(K，L)，K=1，3)，L=1，3
13、 给定下列FORTRAN子程序如下： SUBROUTINE SUB(K，A) A=SQRT(K*K+1.0) END
下列调用语句中正确的是( )
A) CALL SUB(N,N) B) CALL SUB(X,X) C) CALL SUB(N,X*X) D) CALL SUB(11,X) 14、 阅读下列FORTRAN程序: INTEGER AA(2,3)
DATA AA/1,2,3,4,5,6/ CALL S2D19(AA)
CALL S2D19(AA(1,2)) END
第 2 页/共 页
SUBROUTINE S2D19(BB) INTEGER BB(2,2)
WRITE(*,'(1X,2I3)') BB(1,1),BB(2,2) END
程序运行结果是( )
A) 1 4 B) 1 5 C) 1 4 D) 1 2 3 6 2 6 2 5 3 4
15、 阅读下列FORTRAN程序: INTEGER A(3,3) DO 10 K=1,3 DO 10 L=1,3
10 A(K,L)=K*10+L WRITE(*,'(1X,3I3)')A END
程序运行结果是: ( )
A) 11 21 31 B) 11 12 13 C) 31 32 33 D) 33 32 31 12 22 32 21 22 23 21 22 23 32 22 21 13 23 33 31 32 33 11 12 13 31 21 11 16、 阅读下列FORTRAN程序: WRITE(*,10)'YEAR:', 1996 10 FORMAT(/3X,A,I4) END
程序运行结果是(^代表空格,下同) ( ) A) ^^^^^YEAR:1996 B) ^^YEAR:1996 C) 空白行 D) 空白行
^^^^^YEAR:1996 ^^YEAR:1996
17、某函数子程序中使用了IMPLICIT、READ、COMPLEX和FUNCTION四种语句,其中属于可执行语句的是: ( )
A)FUNCTION B) READ C) COMPLEX D) IMPLICIT 18、 阅读下列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
第 3 页/共 页