FORTRAN程序设计复习题及答案 .doc
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_05.gif)
《FORTRAN程序设计复习题及答案 .doc》由会员分享,可在线阅读,更多相关《FORTRAN程序设计复习题及答案 .doc(16页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、FORTRAN程序设计复习题一、 选择题B (1)下列各FORTRAN表达式中合法的是A) S+T*2P = 0.0 B) .NOT. (A*B+C) C) A2+B2/(C+D) = D)算术运算符 A (14下列语句函数的定义中正确的是A)F(X,Y)(XY)/(X*Y)7.0 B)FUNCTION FUN(I,J,K)3*I2*J0.5*KC)H(A,B,C(I)SIN(A)SIN(B)C(I) D)S(A,B,C)A*BS(A*A,B,C) B(15下列标识符中,不属于FORTRAN常量的是A).TRUE. B)FALSE C)ROOT D)123.0 B(16)整型变量M能被整型变量
2、K整除的FORTRAN77表达式是A)MOD(M,K)0 (MOD(M,K)= =0) B)MM/K*K .EQ. 0C)MOD(K,M)0 D)MOD(M,K)0 = .TRUE. C(17)设有下列数组说明语句:REAL: A(1:10,1:10)该数组说明语句定义了数组A中的元素个数为A)100 B)110 C)120 D)121A (18)按隐含规则(默认为整型),语句IP=3.执行之后,IP的值是A) 3 B) 3.1416C) 3.141592 D)3.141593D (19)下列数据中,不符合 FORTRAN常量表示法的是A) -25.6 B) 2.758D3 C)FOOT= D
3、) TRUEC (20)设C是复型变量,A与B为有定义的实型变量,下列赋值语句中合法的是A) C=A+BB) C=(3.5,1.5*2)C) C=(2.0,3D-2)D) C=(AB,A-B)B (21)有矩阵(数组) 下列DATA语句中正确的是A) DATA B/4*1.0,4*2.0/ B) DATA(B(I,J), J=1,4), I=1,2)/4*1.0, 4*2.0/C) DATA B/4*(1.0,2.0)/ D) DATA(B(I,J),I=1,2), J=1,4)/4*1.0, 4*2.0/C (21)在使用DO循环及循环嵌套时,下列叙述中正确的是A) 不仅可以从循环体内转到循
4、环体外,也可以从循环体外转到循环体内B) 外循环与内循环的DO循环控制变量可以不同也可以相同C) 可以从循环体内转到循环体外,但不能从循环体外转到循环体内D) DO循环控制变量在循环体内可以再赋值,也可以被引用B (22)在FORTRAN表达式中,各种运算的顺序是A) 逻辑运算,关系运算,算术运算B) 算术运算,关系运算,逻辑运算C) 关系运算,逻辑运算,算术运算D) 关系运算,算术运算,逻辑运算D (23)赋值语句 X=4*(6/12)=4*0=1.0 执行后,实型变量X的值是A) 2 B) 2.0 C) 1 D) 1.0D (24)为了保证正确出数据,格式编辑符Ew.d中w与d的关系应该是
5、A) wd B) wd+2 C) wd+4 D) wd+6C (25)设下列各语句中用到的数组都已定义,则下列语句中正确的是A) READ(*,*)(I,A(I),I=1,10)B)READ(*,*)(B,(I,J),I=1,10,J=1,10)C) READ(*,*)N,(A(I),I=1,N) D) READ(*,*)(I=1,10,A(I)A (26)下列DO语句中,不正确实现循环的是(I-N规则:I-N会被视为整型)A) DO 10 S=-1.6,-5.3,-0.4 B) DO 10 K=-1.6,-5.3,-0.4C) DO 10 S=-5.3,-1.6,-0.4 D) DO 10
6、K=1.6,5.3,-1.4D (27)下列说法中正确的是A) 块IF结构中的THEN块或ELSE块不能是空块B) 块IF结构中至少有一个ELSE IF 语句或ELSE语句C) 每个ELSE IF 语句要有一个对应的END IF语句D) 一个块 IF 结构中只能有一个END IF语句A (28)下列数组说明语句中正确的是A) INTEGER A(-1:5,0:6) B) REAL M(10:5)C) DOUBLE Y(1:N+1) D) DOUBLE Z(14)B (29)设有一个FORTRAN77子程序如下: SUBROUTINE SS(X,Y,S,T) S=X+Y(S,T为传出,即需要输出
7、的(相当于求圆的面积中的area),只能 T=X*Y 为确定的数;X,Y为传入(相当于radius),可为表达式) END调用上述子程序的正确语句是A) CALL SS(2.4,W*W,5,5.9,Z)(多了一个) B) CALL SS(0.0,4.2,P,Q,R) (多了一个)C) CALL SS(F,G,7.2,5.1) D) CALL SS(4.4*I,5.8*J,C,D)(I,J可先赋值)A (30)在下列语句函数的定义中正确的是A) F(X,Y)=(X+Y)/(X*Y)+7.0B) FUNCTION(I,J,K)=3*I+2*J+0.5*KC) H(A,B,C(I)=SIN(A)+S
8、IN(B)+C(I)D) S(A,B,C)=A*B+S(A*A,B,C)B (31)COMMON语句的功能是A) 给同一程序模块中的若干变量分配同一存储单元B) 给不同程序模块中的变量分配相同的存储单元C) 给程序中任意两个变量分配相同的存储单元D) 给同一程序模块中的不同变量分配相同的存储单元B (32)下列表达式中值为整数4的是A) SQRT(16.0)B)27/6 C) 16*0.5D) 4*1.0C (34)语句K=2+3.0*2/2执行后,整型变量 K的值是A) 6.5B) 5C) 6D) 7C (36)适用于字符型 I/O的 FORTRAN77格式编辑将是A) Fw.dB) Iw.
9、dC) AD) Gw.dD (37)给定子例行程序如下SUBROUTINE SUB(K,A)B=K+2(K为整型,B)错误;A不是整型,A)错误;K为传入,可为表达式,A=A+B A为传出,不能为表达式)END下列调用语句中正确的是A) CALL SUB(N,N) B) CALL SUB(X,X)C) CALL SUB(N+2,X)D) CALL SUB(N,X+3)C (38) 下列FORTRAN语句中,正确的是 A) READ(*,*) (N,A(K),K=1,N) B) WRITE(*,*) (M(K,J),K=1,10, J=1,10) C) WRITE(*,*) (10,A(K),K
10、=1,10) D) DATA A,B,C/2*0.0/ C (39)对于下列给定的FORTRAN说明和赋初值语句: INTEGER A(2,2) DATA A/3,4,5,6/ 数组元数A(2,1)的初值为 A) 3 B) 5 C) 4 D) 6 C (40)下列对公用区的说明语句中错误的是 A) COMMON A(5), B B) COMMON/AB/ A(5), B C) COMMON AB/A(5), B/ D) COMMON/A(5), BD (41)下列各逻辑IF语句中正确的是A) IF(X=0.0).AND.(X.LT.1.0)Y=2*X+1.0C) IF(0.0=X= 0.0.A
11、ND.X =500 .or. windspeed =10 ) then write(*,*) 停止上班上课 else write(*,*) 照常上班上课 end ifstopend运行上述程序时,如果从键盘输入 Rain:505Wind: 8则最后输出的结果为: 停止上班上课 4、阅读下列FORTRAN程序:program exampleimplicit none real a,b,ans character operator read(*,*) a read(*,(A1) operator read(*,*) b select case(operator) case(+) ans = a+b
12、 case(-) ans = a-b case(*) ans = a*b case(/) ans = a/b case default write(*,(Unknown operator ,A1) operatorstop end select write(*,(F6.2,A1,F6.2,=,F6.2) a,operator,b,ans stopend运行上述程序时,如果从键盘输入 100?200则最后输出的结果为: Unknown operator ? 5、阅读下列FORTRAN程序:program exampleimplicit none integer i integer strlen
13、integer, parameter : key = 2 character(len=20) : string write(*,*) Encoded string: read(*,*) string strlen = len_trim(string) do i = 1, strlen string(i:i) = char( ichar(string(i:i) + key ) end do write(*,(String:,A20) string stopendBCDIJK则最后输出的结果为: DEFKLM 6、阅读下列FORTRAN程序: program exampleimplicit non
14、e integer i,j do i=1, 2 do j=2, 3, 2 write(*, (I2,I2) i,jend dowrite(*,*) another circle end do stopend程序运行的结果是: 1 2 another circle 2 2 another circle (按输出格式,1、2前均有一空格。若题目无特殊说明,不需表达出;若有说明,则空格用“”表示)7、阅读下列FORTRAN程序:program exampleimplicit none integer : dest = 6 integer floor do floor=1, dest if ( flo
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- FORTRAN程序设计复习题及答案 FORTRAN 程序设计 复习题 答案
![提示](https://www.taowenge.com/images/bang_tan.gif)
限制150内