计算机技术基础(Fortran)试题库
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
一、选择题
1、下列关于"SUBROUTINE MAP(X,Y)"语句行的叙述中,不正确的是( )
A) 这是子程序的第一个语句B) 字符串"MAP"是子程序名
C) 变量X是子程序的形参D) 子程序执行后,MAP将返回整型数据
2、FORTRAN表达式"2/4+0.5"的值是( )
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
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
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