大学FORTRAN考试试题样题
- 格式:doc
- 大小:41.50 KB
- 文档页数:5
1.下列叙述中,正确的是(D )A.语句标号的大小影响程度执行的顺序B.程序完全按语句出现的先后顺序执行C.不同程序单位不能有相同的语句标号D.同一程序单位不能有相同的语句标号2.下列标识符中,不能作为合法的FORTRAN90标识符的是( C)A.A3_B3 B.VOID C._123 D.IF3.下列哪一个为正确的常量( D )A.123,000 B. 3.5E+2.5 C. TRUE D. “HELLO”4.若A=2,B=2,I=3,则表达式A**B**I的值为( C )A. 64B.12C.256 D16.5.圆的直径存放在整型变量D之中,下列计算圆面积的表达式中正确的是( D )A. 3.14159*(D/2)*(D/2)B. 3.14159*(D*D/4)C. 3.14159*(D/2)**2D. 3.14159*D*D/46.下列运算符中,运算优先级最高的是(B )A. 关系运算B. 算术运算C. 逻辑非运算D. 逻辑与运算7.下列FORTRAN的表达式中值为0.5的是( C)A.MOD(4.8,0.5) B.100/20/10 C.50.0/4/25 D.MOD(15,10)/108.下列是完整的FORTRAN程序,编译时出错的语句是( C )A.PROGRAM PRINT B.PARAMETER (PI=3.1415926)C.PI=PI+1 D.WRITE(*,*)SIN(PI+0.5)END9.变量的类型定义中,优先级由高到低的顺序为( A )A.类型说明语句、IMPLICIT 说明语句、隐含约定B.隐含约定、IMPLICIT 说明语句、类型说明语句C.IMPLICIT 说明语句、类型说明语句、隐含约定D.隐含约定、类型说明语句、IMPLICIT 说明语句10.“两整数M与N不能同时小于零”的FORTRAN表达式( D )A.M>=0.AND.N>=0B.(M.GE.0.AND.N.LT.0).OR.(M.LT.0.AND.N.GE.0)C.(M.LE.0.AND.N.LE.0).OR.(M.LE.0.AND.N.GE.0)D.M.GE.0.OR.N.GE.011.下列逻辑表达式描述的是(不会) X.GT.3.AND.X.LT.10.AND.MOD(X,3).NE.0.OR.X.EQ.2.OR.X.EQ.3 A.10以内的素数B.10以内的合数C.10以内的奇数D.10以内的偶数12.下面正确的逻辑IF语句是(C )A.IF(X.EQ.Y)THEN GOTO 10 B.IF M.LT.N PRINT*,M C.IF(ABS(X).LT.1E-6) A=1 D.IF(A.AND.(A.LE.0.0) A=313.下列语句中正确的是( C )A.DATA A,B,C/3*(-10.0)/ B.READ(*,*)(N,A(K),K=1,N)C.WRITE(*,*)(10,A(K),K=1,10) D.READ(*,*)N,N+114. 如果J是整型变量,则循环语句:DO J=5.5,-1.5,-2.5 所执行的循环次数是(C)A.4 B.3 C.2 D.115.如有语言:INTEGER B (-1:-2,3:7),则数组B 中所含的元素个数为( 无答案) A.0 B.10 C.12 D.2116. 关于FORTRAN90 的CASE结构,SELECT CASE(表达式)中的表达式的数据类型不允许为( A)A. 实型B. 字符型C. 实型D. 逻辑性17.下面符号在FORTRAN90 中表示续行符的是( B)A.! B. & C. # D. %18. 下列程序段中,错误的语句是( D)A.PARAMETER(N=10)B. INTEGER:: M=20C.M=M+ND.PRINT(*, *)M, N19.A. FUNCTIONB. SUBROUTINEC. BLOCK DA TAD. SUB20.下列语句中,错误的语句是( D)。
fortran95期末考试题及答案FORTRAN95期末考试题及答案一、选择题(每题2分,共20分)1. 下列哪个是FORTRAN95中的合法变量名?A. 123abcB. _123abcC. 123D. variable-name答案:B2. 在FORTRAN95中,以下哪个语句用于定义数组?A. DIMENSIONB. DEFINEC. ARRAYD. DECLARE答案:A3. 下列哪个是FORTRAN95中的内建数据类型?A. INTEGERB. FLOATC. DOUBLED. STRING答案:A4. 在FORTRAN95中,以下哪个语句用于实现循环?A. IFB. DOC. THEND. ELSE答案:B5. 在FORTRAN95中,以下哪个语句用于条件判断?A. IFB. DOC. SELECTD. CASE答案:A6. 下列哪个是FORTRAN95中的文件打开语句?A. OPENB. CLOSEC. READD. WRITE答案:A7. 在FORTRAN95中,以下哪个语句用于实现模块化编程?A. MODULEB. FUNCTIONC. SUBROUTINED. PROGRAM答案:A8. 下列哪个是FORTRAN95中的参数传递方式?A. PASS BY VALUEB. PASS BY REFERENCEC. BOTH A AND BD. NEITHER A NOR B答案:C9. 在FORTRAN95中,以下哪个语句用于定义常量?A. DEFINEB. CONSTANTC. PARAMETERD. EQUIVALENCE答案:C10. 下列哪个是FORTRAN95中的文件关闭语句?A. OPENB. CLOSEC. READD. WRITE答案:B二、简答题(每题5分,共30分)1. 简述FORTRAN95中模块化编程的优点。
答案:模块化编程允许程序被分解成独立的模块,每个模块可以独立编译和测试,提高了代码的可读性和可维护性。
20XX年复习资料大学复习资料专业:班级:科目老师:日期:一、选择题(每题2分,共30分)1. 下列数据中,不符合FORTRAN 90常量表示法的是__________。
A. -23.4B. 2.758D+3C. (3, 4)D. TRUE2. 数学表达式()()27log t b a e t -•+•在FORTRAN 中的正确的表达式为__________。
A. E**T*LOG*(A+B)*(-7*SQR(T))B. EXP(T)*LOG20XXXX(A+B)*(-7*T**2)C. EXP(T)*LN(A+B)*(-7*SQR(T))D. E**T*LOG(A*B)*(-7*T**2)3. 下列名称中,符合FORTRAN90/95命名规则的是__________。
A. a3_bB. “Pi ”C. 2XYD. .false.4. 下列循环语句执行后,输出k 的值分别是__________。
DO K=2,20XXXX ,4IF(MOD(K,20XXXX)= =0) WRITE(*,*) K+1WRITE(*,*) KEND DOWRITE(*,*) KA. 2 6 20XXXX 20XXXX 20XXXXB. 2 6 20XXXX 20XXXX 20XXXXC. 2 6 20XXXX 20XXXX 20XXXXD. 2 6 20XXXX 20XXXX 20XXXX 20XXXX5. 阅读下列程序PROGRAM AREAD(*,20XXXX0)X,Y20XXXX0 FORMAT(1X,2F3.1)S=MOD(Y,X)WRITE(*,200)S20XX0 FORMAT(F3.1)END在执行上述程序后,由键盘输入20XXXX3446889,最后输出的S 值为__________。
A. 0.0B. 8.1C. 21.0D. 1.06. 判别英语成绩E 和FORTRAN 成绩F 都必须大于60分的正确的表达式是__________。
2018-2019学年第一学期《FORTRAN》期末试卷(A)(考试对象:农水、港航、地质、海洋、力学专业2018级)学院专业班级学号姓名成绩一、选择题(用铅笔把选中的方格涂黑32×1=32分)12345 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 2829 30 31 32二、填空题(每空占一行,每行写一个答案25×2=50分)1.2.3.4.5.6.7.8.9.10.11.12. 13.14.15.16.17.18.19.20.21.22.23.24.25.三、程序设计(2×9=18分)1、求裴波纳契数列的前10项,要求每行输出5项。
该数列的前几项为:0,1,1,2,3,5,8,13,……2、编写一个判断素数的函数子程序, 主程序调用函数求3-100之间满足下面条件的各组素数:每组三个素数,第二个比第一个大2,第三个比第二个大4。
例如5、7、11就是满足条件的一组。
一、选择题(32×1=32分)1、以下有关FORTRAN90基本概念的叙述中,正确的是。
A、关键字只能用大写字母,其他符号名(变量名、数组名、过程名等)只能用小写字母。
B、符号名须以英文字母开头,可后接英文字母、数字、下划线,不超过31个字符。
C、键盘上的可见字符均可作字符型常数使用,但汉字不能作字符型常数使用。
D、编译系统接受英文字母开头后接希腊字母作符号名。
2、在下列写法中,________不是FORTRAN常量。
A、 .TRUE.B、1E-2C、 (0.0,2.4)D、1,000,0003、表达式15/4/2.0的值是。
A、整数2B、实数1.5C、实数2.25D、实数1. 34、以下DO循环结构中,不属于FORTRAN90程序设计语言标准的是。
A、DO ……ENDDOB、DO WHILE(relation_expression)……ENDDOC、DO index=1,2,3……ENDDOD、DO UNTIL(relation_expression)……ENDDO5、以下说法中错误的是。
一、选择题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.0D) 03、阅读下列FORTRAN程序:PI=3.14159265WRITE(*,'(F7.4)')PI ﻫEND程序运行后输出结果是( ) ﻫA) 3.142 B)3.1415 C) 0.31416 D) 3.14164、圆的直径存放在整型变量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. 5000C)M .GE. 2000 .AND.M.LT.5000 D) M .GE. 2000 .OR. M .LT. 50006、设FORTRAN子程序如下:SUBROUTINE SUB(I,X)B=I+1X=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, 3DO 20 L=K-1, K20 WRTTE(*,'(I3, F8.1)'K,F*KENDﻫ程序运行结果的最后一行是( )ﻫA) 3 6.0 B) 6 6.0 C) 6 180.0D) 7 180.09、在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.LC).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,3C) WRITE(*,*)((A(K,L),K=1,3), L=1,3) ﻫD) WRITE(*,*)(A(K,L),K=1,3),L=1,313、给定下列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))ENDSUBROUTINE S2D19(BB)INTEGERBB(2,2)WRITE(*,'(1X,2I3)') BB(1,1),BB(2,2) ﻫEND程序运行结果是( ) ﻫA) 1 4 B) 1 5 C) 1 4 D) 1 23 6 2 6 2 5 3 415、阅读下列FORTRAN程序:INTEGER A(3,3)。
一、选择题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) 03、阅读下列FORTRAN程序:PI=3.14159265WRITE(*,'(F7.4) ')PIEND程序运行后输出结果是( )A) 3.142 B) 3.1415 C) 0.31416 D) 3.14164、圆的直径存放在整型变量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. 5000C) M .GE. 2000 .AND. M .LT. 5000 D) M .GE. 2000 .OR. M .LT. 50006、设FORTRAN子程序如下:SUBROUTINE SUB(I,X)B=I+1X=X+BEND若主程序中的变量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.0DO 20 K=3, 7, 3DO 20 L=K-1, K20 WRTTE(*,'(I3, F8.1)'K, F*KEND程序运行结果的最后一行是( )A) 3 6.0 B) 6 6.0 C) 6 180.0 D) 7 180.09、在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.LC) .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,3C) WRITE(*,*)((A(K,L),K=1,3), L=1,3)D) WRITE(*,*)(A(K,L),K=1,3),L=1,313、给定下列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))ENDSUBROUTINE 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 23 6 2 6 2 5 3 415、阅读下列FORTRAN程序:INTEGER A(3,3)DO 10 K=1,3DO 10 L=1,310 A(K,L)=K*10+LWRITE(*,'(1X,3I3)')AEND程序运行结果是: ( )A) 11 21 31 B) 11 12 13 C) 31 32 33 D) 33 32 3112 22 32 21 22 23 21 22 23 32 22 2113 23 33 31 32 33 11 12 13 31 21 1116、阅读下列FORTRAN程序:WRITE(*,10)'YEAR:', 199610 FORMAT(/3X,A,I4)END程序运行结果是(^代表空格,下同) ( )A) ^^^^^YEAR:1996 B) ^^YEAR:1996C) 空白行 D) 空白行^^^^^YEAR:1996 ^^YEAR:199617、某函数子程序中使用了IMPLICIT、READ、COMPLEX和FUNCTION四种语句,其中属于可执行语句的是: ( )A)FUNCTION B) READ C) COMPLEX D) IMPLICIT18、阅读下列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,4WRITE (*,100)(M(I,J),J=1,I)10 CONTINUE100 FORMAT(1X,4I2)END程序运行的结果是( )A) 1 2 3 4 B) 1 5 9 3 C) 1 D) 16 7 8 6 0 4 2 6 2 6 61 2 1 5 3 7 1 9 3 7 1 16 6 4 8 2 6 3 4 4 8 2 6 619、阅读下列FORTRAN程序:CHARACTER*10 A, B*6DO 10 I=1,10A(I:I)=' '10 COUNTINUEA(1:5)='ABCDE'B='FGHIJK'A(4:9)=BWRITE(*,100) A100 FORMAT(1X,A)END程序运行结果是:( )A) ABCDEFGHIJ B) ABCDEGHIJK C) ABCFGHIJK D) BCDEFGHIJK20、阅读下列FORTRAN程序:INTRINSIC SIN, COSWRITE(*,*)FUN(SIN,30.0)/FUN(COS,30.0)ENDFUNCTION FUN(F,X)X=X*3.14159/180FUN=F(X)END程序运行结果是 ( )A) sin30°的值B) cos30°的值C) tg30°的值D) ctg30°的值二、填空题1、下列FORTRAN子程序的功能是用以下公式计算一组数据Z1,Z2,…,Zn的标准差σ:σ2=(Z12 +Z22+…+Zn2)/n-[(Z1+Z2+…+Zn)/n]2请在程序中的下划线处填入合适的内容。
大学FORTRAN语言试题一、选择题(15×1分=15分)1.Fortran程序设计语言允许使用的专用字符集是。
A.(),.;[]+-*/=:空格B.(),.αβ+-*/=:空格C.(),.+-*/$'=:空格D.{},.;?+-*/=:空格2.按隐含规则确定变量的数据类型,Fortran表达式(A112/BC1+15.123456789.0_8)-(1000.0_4/3.0+ABI*ABJ)的值的数据类型为。
A.复型B.整型C.实型(种别为8)D.实型(种别为4)3.执行循环语句DO I=0.5,4.5,1.5,正常退出循环后,循环执行的次数和循环变量I的值分别为。
A.4和4.5 B.5和5 C.4和6 D.5和64.语句A(M(I))=MOD(I,7)是。
A.函数定义语句B.赋值语句C.非法语句D.说明语句5.下列不合法的是:_____A.A<B<C<D B..NOT.(X<0) C.A>B.EQV.C>D D.A.AND.B.AND.C6.若数组说明符ARRAY(-5:5,-10:0)的元素个数为。
A.144 B.121 C.110 D.1007.设循环初值、终值和增量分别为M1,M2和M3,循环次数的计算公式是。
A.INT((M2-M1)/M3)B.INT((M2-M1)/M3)+1C.MAX(INT(M2-M1+M3)/M3,0) D.MIN(INT(M2-M1+M3)/M3,0)8.下列字符表达式中正确的是。
A.’ABCD’+’MN’’D’B.’ABCD’//’MN’’D’C.CHAR(65)+’N’//’CH’D.’123 45’-’5’9.语句integer,dimension(1:-1)::a,下列说法中正确的是:_____A.a数组的元素个数为0 B.a数组的元素个数为3C.a数组的元素个数为1 D.该说明语句是错误的10.子程序的虚元可以是:A.变量名、数组名、过程名B.变量名、数组名、过程名和符号常量名C.变量名、数组名、数组片段、过程名D.任意符号名11.c为复型量,下列正确的是:A.c=(1/2,1/5) B.c=sqrt((0.1,4.5)) C.c=1.0+4i D.c=(x,y)12.数学式的FORTRAN表达式是()A.2/3*SIN(3.14/4)B.2SIN(3.14/4)/3C.2.0*SIN( /4.0)/3.0 D.2*SIN(3.14/4)/313.执行下列赋值语句后,变量X的值为()X=4+36**(7/14)A.10.0 B.5.0 C.10 D.514.下列不合法的是:A.A<B<C<D B..NOT.(X<0) C.A>B.EQV.C>D D.A.AND.B.AND.C15.执行下列程序时由键盘输入13579.2468,输出结果为:READ’(2(F4.1,2X))’,A,BPRINT’(2(F4.1,2X))’,A,BA.135.7 246.8 B.13.5 24.6 C.**** **** D.*** ****二、填空题(15×1分=15分)1.FORTRAN90自由格式的程序续行标记为______字符,一般写在_____位置;自由格式的程序注释标记为____字符。
《高级语言程序设计 (FORTRAN)》考试样题一、选择题(每小题 2 分,共 40 分)1. 下列标识符中不能作为 FORTRAN 的合法变量名的是_____D_____。
A) A_1 B) A1 C) A1A D) A+12. 在 FORTRAN 的变量类型说明语句中没有 BA) REAL 语句B)CHAR 语句C)INTEGER 语句 D)LOGICAL 语句3.FORTRAN90 源程序的扩展名是 C 。
A. TXTB. FC. F90D. FOR4.下列关于符号常量的说法正确的是___C____。
A.符号常量的定义应该放在所有语句之前B.符号常量不可以是字符型常量C.在一个程序单位中定义一个符号常量后,不能再改变它的值D.符号常量定义语句与赋值语句一样,是可执行语句5、在下列写法中, __D______不是 FORTRAN 常量。
A. .TRUE.B.1E-2C. (0.0,2.4)D.1,000,0006.表达式 15/4/2.0 的值是 B 。
A.整数 2 B.实数 1.5 C.实数 2.25 D.实数 1. 37. 下列不是 FORTRAN 赋值语句的是 _____D______。
A) X=.TRUE. B) X=X*X C) X=X**2**2 D) X=X++8. 梯形的上底为 A,下底为 B,高为 H,计算其面积的 FORTRAN 表达式中错误的是____A____。
A)1/2*(AB)*H B)(A+B)*H/2 C)(A+B)/2*H D)0.5*(A+B)*H9. 要选拔身高 T>1.7 米且体重W<62.5 公斤的人,FORTRAN 的逻辑表达式是__C_____。
A)T.ce.1.7.AND.w.le.62.5 B)T.le.1.7.OR.w.ge.62.5C)T.gt.1.7. AND.w.lt.62.5 D)T.gt.1.7.OR.w.lt.62.510.FORTRAN 90 规定,变量类型声明的优先顺序是 C 。
一、判断题(共20分,每题1分,√表示对,×表示错)1.FORTRAN源程序的一条语句无法在一行内写下时,在行末用续行标志“!”,表示下一行是当前行的继续。
2.语句X=X+1的含义是将内存中名为X+1的存储单元的值赋给变量X。
3.如果程序单元中有说明语句PARAMETER(A=2.1),则不允许在该程序单元中改变A的值。
4.主程序和子程序可以储存到不同的文件中。
5.即使编译和连接都正确无误,FORTRAN程序运行时仍可能出错。
6.在数据块子程序中,可以调用另一个数据块子程序。
7.设有如下输入语句READ '(1X, F5.2)' , X若由键盘输入:12.3456789,则变量Y的值为12.34。
8.如果有以下程序段CHARACTER::A=’FORTRAN’则A内存储的实际值是’F’。
9.M=2000,为了在屏幕上输出□□***2000*** (其中□表示空格)。
则应使用的语句为:WRITE(*,100)M100 FORMAT(2X,’***’,I4,’***’)10.模块可用USE引用,也可用CALL调用。
11.语句函数定义语句在程序内的位置是:在程序块开头语句之后,END语句之前。
12.若有以下程序段:INTEGER,POINTER ::P1, P2INTEGER,TARGET::I=20, J=30P1=>I; P2=>J; P1=>P2; P2=>P1运行程序,I、J的值都为20。
13.COMMON语句的功能是给不同程序模块中的若干变量分配同一存储单元。
14.设C是复型变量,A、B是实型变量。
把A 的值赋给C的实部,把B的值赋给C的虚部的赋值语句是C=CMPLX(A,B)。
15.顺序存储结构的存储一定是连续的,链式存储结构的存储空间不一定是连续的。
16.A2B的FORTRAN表达式为A**2*B。
17.程序中说明了变量a具有POINTER属性,若a=>b,则b应具有PARAMETER属性。
课程名称:Fortran语言程序设计;试卷编号:A 卷;考试时间:120分钟学院1.Fortran语言中有:整数型逻辑型字符型实数型复数型五种基本数据类型。
2.Fortran程序的书写格式有两种固定格式自由格式。
3. 字符型常数’this”s’的字符长度为64. 下列程序运行结果为125。
Program mainImplicit noneInteger::floor=5,iDo i=1, floorIf(i==3)cycleIf(i==4)cycleWrite(*,*)iEnd doend5. 下列程序的运行结果为76.0,2.0。
Program mainImplicit noneReal :: a, b, mA=2.0B=76.0If(a<b)thenM=aA=bB=mEnd ifWrite(*,*) “a=”,a “b=”,bend6. 下列程序的运行结果是10302。
Program testImplicit nonesum=0.0do i=1,203,2sum=sum+iend dowrite(*,*) iend7.下列程序的运行结果是12000。
Program testImplicit noneInteger::iInteger::a(5)=(/ (i, i=1,5) /)Integer::b(5)=0Where (a<3)b=aEnd whereWrite(*,”(5(i3,1x))”) bend8.下列程序的运行结果是30。
Program testImplicit noneInteger,parameter:: limit=10Integer counterInteger:: ans=0Counter=2do while(counter<=limit)ans=ans+countercounter=counter+2end doWrte(*,*)ansend9.下列程序的运行结果是2,3。
软件技术基础(FORTRAN)笔试模拟试题(带答案)一.概念选择题(单选题,将正确的答案填入括号内。
每题1分,共15分)1. 已知整型变量L=5,M=13,N=4,表达式L*M/N 、L/N*M 和M/N*L 的值分别是(A )。
A )16 13 15B )16.25 16.25 16.25C )16.0 13.0 15.0D )16 16 162.将数学式)||(ln 215-+e x 改写为FORTRAN 表达式,正确的是( D )。
A) 1/2*(LOG(ABS(X))+E**(-5))B) 1.0/2*(LN(ABS(X))+E**-5)C) 1/2.0*(LN(ABS(X))+E -5)D) 1.0/2*(LOG(ABS(X))+EXP(-5))3. 设A=.TRUE., B=.FALSE., C=.FALSE., 逻辑表达式(A.OR.B).AND.C 与A.OR..NOT.B 的值是( B )。
A) .T. 与 .F. B).F . 与 .T. C) .T. 与 .T. D) .F. 与 .F .4. 数组REAL A (0:5,-1:5)的元素个数是 ( D )。
A )25B )30C )36D )42 5. 下列数组说明符中错误的是( A )。
A )K(3:2,1:2)B ) K(-1:1,2)C )K(-2:2,-1:1)D )K(2:2,5)6. 关于USE 语句的正确说法是( C )。
A)USE 语句是可执行语句 B)用USE 语句可以代替INCLUDE 语句C)USE 语句必须放在程序单元体的开头 D)USE 语句的位置任意7. 语句OPEN (9,FILE=‘DATA.TXT ’)打开的是 ( B ) 文件。
A )无格式顺序B )有格式顺序C )无格式直接D )有格式直接8. 阅读下列FORTRAN 程序, 程序运行时执行循环体的次数是( A )。
X=0DO L=10, 5, 1X=X+1.0ENDDOENDA) 0 B) 1 C) 6 D) 无穷9.结构化程序设计中有三种基本结构,下列不属于三种基本设计结构的是( D )。
专业班级:学号:姓名:一、选择题(用铅笔把选中的方格涂黑40×1=40分)1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 3637 38 39 40二、填空题(每空占一行,每行写一个答案25×2=50分)1.2.3.4.5.6.7.8.9.10.11.12.13.14.15.16.17.18.19.20.21.22.23.24.25.三、程序设计(10×1=10分)1、利用外部子程序求两正整数M、N的最大公约数,要求写主程序。
注:变量M、N的值从文件Myfile1.dat 中读取。
一、选择题(40×1=40分)1、下列关于SUBROUTINE SUB( ) 语句的叙述中,正确的是 。
A 、子程序执行后,SUB 将返回整型数据 B 、SUB 不能作为子程序名C 、子程序缺少虚元D 、这是子程序的第一个语句2、Fortran90中表达式)3ln(2)10cos 4(sin5.2++︒+ax e π的正确写法是 。
A 、(Sin(4/∏)+cos(10*3.14/180))*exp(2.5)/(Sqrt(2.0)+abs(a*x)+log(3))B 、(Sin(4/3.14)+cos(10*3.14/180))*exp(2.5)/(Sqrt(2.0)+abs(a*x)+log(3.0))C 、(Sin(4/3.14)+cos(10))*exp(2.5)/(Sqrt(2.0)+abs(a*x)+log(3))D 、(Sin(4/3.14)+cos(10*3.14/180))*exp(2.5)/(Sqrt(2)+abs(ax)+log(3.0)) 3、FORTRAN90源程序必须经过 后才能被计算机执行。
A 、汇编B 、编译C 、解释D 、翻译 4、下列叙述错误的是 。
FORTRAN90模拟测验一(笔试部分)一.选择题(从4个可选答案中选择一个正确答案添入空白处)1.FORTRAN 90规定程序中名称的长度不能超过个字符。
A.8 B.15 C.31 D.632.关于FORTRAN 90程序单元,以下四种说法中正确的是。
A.一个FORTRAN 90程序由多个程序单元组成,其中有一个且只能有一个主程序单元B.一个FORTRAN 90程序由多个程序单元组成,其中有一个且只能有一个模块单元C.一个FORTRAN 90程序允许有多个程序单元,但每类程序单元只能有一个D.一个FORTRAN 90程序允许有多个程序单元,但主程序单元和模块单元只能有一个3.FORTRAN 90程序中允许使用的三个通用标志符是。
A.!% & B.@ , ; C.! ; & D.; & *4. 下列中,所指的FORTRAN 90表达式都是正确的。
①∣A*x+B*y+C*z∣② b*b+4*a*c③ .NOT. .TRUE. .AND. .FALSE. ④‘A’<= ch <= ‘Z’⑤ X>100 = = .TRUE. ⑥ SQRT(A2+B2)⑦π*R**2 ⑧‘HAPPY ’+‘NEW ’+‘YEAR.’A. ①②⑤B.②③④⑧C.②③⑤D.②⑤⑥⑦5. FORTRAN 90规定,变量类型声明从高到低的优先顺序是。
A.隐含约定(I-N规则)、IMPLICIT声明、类型声明B.类型声明、隐含约定(I-N规则)、IMPLICIT声明C.类型声明、IMPLICIT声明、隐含约定(I-N规则)D.IMPLICIT声明、类型声明、隐含约定(I-N规则)6.数组声明语句为:INTEGER,DIMENSION(-5:-1,-3:3,11:15) ::num 数组元素num(-2,1,13)是存储结构中第个元素。
A.70 B.85 C.90 D.947.类型声明语句为:INTEGER(2) I 数据输出语句为:PRINT *,I变量I中数据输出域宽是字符。
FORTRAN90语言部分一、 语言基础单项选择(每题2分,共20分)(一)下面的函数计算中,错误的是 1 。
A) SQRT(9) B) REAL(9) C) ABS(9) D) MOD(9,2)(二)运行下面的程序时(P,W,X,Y 都是实型变量), READ(*,10) P,W,X,Y WRITE(*,20)X,Y10 FORMAT(1X,F3.1,3(1X,F4.2)) 20 FORMAT(1X,F4.1,3(1X,F5.2)) END如果从键盘输入数据:12345678901234567890,则输出结果为 2 。
A) 1.23 56.78 B) 12.3 67.89 C) 12.3 45.67 D) 34.5 67.89(三)数学式a acb x 24sin22-+的FORTRAN 表达式为 3 。
A) SIN(X**2)+SQRT(B*B-4*A*C)/2/A B) SIN(X)**2+ SQRT(B*B-4*A*C)/2/AC) (SIN(X**2)+SQRT(B*B-4*A*C))/(2*A) D) (SIN(X)**2+SQRT(B*B-4*A*C))/(2*A)(四)表示条件“A 加B 大于C 并且C 大于等于D ”的FORTRAN90逻辑表达式是 4 。
A) A+B>C >=D B) (A+B)>C >=DC) A+B>C.AND. C>=DD) (A+B)>C.OR. C>=D(五)通过下面的赋值,字符变量LINE 的值是 5 。
表示空格。
CHARACTER(LEN=4)::LINE LINE=’10’ A) 10 B) 1000 C) ‘10’ D) ’10 ’(六)下面对二维数组的说明语句中,正确的语句是 6 。
A) 显式形状数组的说明:REAL,DIMENSION(10,:) ::AB) 动态数组的说明方式:REAL,DIMENSION(:,:), ALLOCATE ::A C) 假定形状数组的说明:REAL,DIMENSION(10,:) ::A D) 指针数组的说明:POINTER,DIMENSION(1:3,2:4) ::A (七)下面的模块中,错误的语句是 7 。
《Fortran 语言程序设计》考试试题 一、关键字解释及表达式互换(共10题,每题2分,共20分) 1. READ*, X,Y 2. REAL 3.12 FORMAT(2X,I5) 4.COMPLEX 5.LOGICAL 6.INTEGER,DIMENSION(4,5)::A 7.SELECT CASE(R3) 8.写出 x e y cos 21∙的fortran 表达式 9.写出COS ((A+1)*(A+1))/(N*N+1)数学表达式 10.写出 1-⎪⎪⎭⎫ ⎝⎛n y x 的fortran 表达式 二、下面分别是程序中的一段代码,请指出其错误?(共2题,(共2题,1题12分,2题8分,共20分) 1. …………………… E=(E*T+23) IF(E>=500) GOTO 5 DO N=1,1O ,0 5 T=SS*3.45 PRINT*,R,T END DO ……………… 2. PROGRAM ex IMPLICI NONE INTEGER :: n CHARACTER(LEN=3) :: a,b,c READ*, n a=n b=’nkd_lixy ’c=sqrt(a**2+b**2) print*,c 学生班级________________学生学号:□□□□□□□□□□□□学生姓名:________________ ………………装订线………装订线………装订线…………试卷须与答题纸一并交监考教师…………装订线………装订线………装订线………………………………三、请写出下面程序的运行结果(共4题,每题10分,共40分)1.写出下列程序的作用是解决什么问题的?PROGRAM GH1REAL X,YREAD*,XIF (X<=0) Y=LOG(SQRT(X*X+1))IF (X>0) Y=SIN(X**3)+ABS(X)PRINT*,”Y=”,YEND2.写出下列程序的运行结果,程序运行时输入 5,6,7,8 四个数。
FORTRAN 机试试卷班级: 姓名: 学号: 机器号 得分:考生请注意:考试时间为60分钟,请将结果和程序写在试卷对应的位置上,只写结果....不给分,结果对而程序错误的倒扣分................。
1、 有一函数:y=⎩⎨⎧≥+<01cos 0ln sin 2x x x x x 从键盘输入x,输出y 的值。
当X=-6时,y= ;当x=6时,y= 。
2、求2000~5000中第五大的素数。
第五大的素数为: 。
3、已知函数)1sin()ln(+=x e x y x ,用随机函数10*ran(iseed )+1生成10个自变量x ,从键盘读入iseed ,当读入5时,求x 和y 的平均值。
x 的平均值为: ;y 的平均值为: 。
FORTRAN 机试试卷班级: 姓名: 学号: 机器号 得分:考生请注意:考试时间为60分钟,请将结果和程序写在试卷对应的位置上,只写结果....不给分,结果对而程序错误的倒扣分................。
1、 有一函数:y=⎪⎩⎪⎨⎧≥-<≤<)10(113)101(2)1(cos x x x xx x当x=-0.5时,y= ;当x=0.5时,y= 。
2、随机生成500个1~1000的整数,输出最大和最小的数所在的位置。
其中随机数的生成函数为ran(iseed)从键盘读入iseed 。
当读入8时:最大的数在第 个;最小的数在第 个;3、已知函数y=e x cos(x+1),用随机函数100*ran( iseed)+1生成10个自变量x ,求y 的最大值为: ;对应的x 的值为: 。
FORTRAN 机试试卷班级: 姓名: 学号: 机器号 得分: 考生请注意:考试时间为60分钟,请将结果和程序写在试卷对应的位置上,只写结果不给......分,结果对而程序错误的倒扣分..............。
1、有一函数:y=⎪⎪⎩⎪⎪⎨⎧≥+<≤<)10(1)101(2)1(cos 22x xx x x x e 当x=-10时,y= ;当x=15时,y= ;2、 3)2sin(cos )(++=t t t f ,求⎰=π5.10)(dx x f I (矩形法,区间等分成1000分)。
南京信息工程大学试卷2009-2010学年 第 1学期 FORTRAN 程序设计 课程试卷( A 卷)本试卷共 7 页;考试时间 120 分钟;任课教师 宣文霞 ;出卷时间 2009 年 12 月数理学院 学院 专业 2008 年级 班 学号 姓名 得分一、单项选择题(每小题 2 分,共 40 分)1. 下面叙述中正确的是 。
A )Fortran 程序中各类语句的位置是任意的B )Fortran 程序中的所有可执行语句在程序执行时都会产生机器操作C )Fortran 程序中的每一行上都可含有标号D )Fortran 程序中的任何语句在程序执行时都会产生某种机器操作 2. 在Fortran 中 2sin()/(2)x e x a 的正确的算术表达式为 。
A )EXP(X)+SIN(X**2)/(2*A) B )EXP(X)+SIN(X**2)/2*A C )E**X+SIN(X**2)/(2*A) D )EXP(X)+SIN(X*2)/(2*A) 3. 与表达式0<x<5 对应的Fortran 表达式为 。
A ) 0.0 < X < 5.0B ) 0.0 > X < 5.0C ) 0.0 < X .AND. 5.0 > XD ) X > 0.0 .OR. X< 5.0 4. 在下面写法中,不是Fortran 常量的是 。
A )200,000B ) (11.0, 23.4)C ) 1.23D-22D ) .TRUE. 5. 已知各变量类型由“I -N 规则”确定,且J=2、B=7.5,执行下列赋值语句A=J**2*(6/8)+0.6-B后,则变量A 的值为 。
A )-3.9B ) 3.9C ) 6.9D ) -6.9 6. Fortran 程序从编写到完成计算,生成三种主要的文件,按其扩展名表示,它们依次是 。
A ) *.f90, *.com, *.batB ) *.f90, *.obj, *.exe C) *.f90, *.obj, *.com D )*.for, *.bat, *.exe 7. 下列符号中,可作为FORTRAN 合法变量名的是 。
20XX年复习资料大学复习资料专业:班级:科目老师:日期:一、单项选择题:(每小题2分,共 40 分)1. 下列叙述中正确的是 。
A. 完整的Fortran 程序的第一个语句必须是program 语句B. 完整的Fortran 程序中只能有一个end 语句C. Fortran 程序中各类语句的位置是任意的D. Fortran 程序中所有可执行语句在程序执行时都会产生某种机器操作2. Fortran 表达式20XXXX/8*0.3/6.0的值为 。
A. 0.75B. 0C. 0.0D. 0.20XXXX 3. 下列合法的Fortran 标识符为 。
A. M%8B. A20XXXX3BC. F(x)D. 5xy4. 下列数据中是不合法的Fortran 常量的是 。
A. trueB. (1,3)C. ‘’D.4.567E-45. 在Fortran 中)2a /()x (sin e 2x 的正确的算术表达式为 。
A. exp(x)+sin(x**2)/(2*a)B. exp(x)+sin(x**2)/2*aC. e**x+sin(x**2)/(2*a)D. exp(x)+sin(x*2)/(2*a)6. 设有下面一段格式输出语句write(*,20XXXX) x20XXXX format(1x,’x=’, f5.1)如果在输出语句中直接包含格式说明,正确的写法应该是 。
A. write(*,1x, ‘x=’ , f5.1) xB. write(*,’(1x,’x=’, f5.1)’) xC. write(*,”(1x,’x=’, f5.1)”) xD. 没有这种格式7. 下面的逻辑IF 语句正确的是 。
A. if (x<0.0) then 20XXXXB. if (x>=0.0) .eqv. (y<0) y=23C. if (0.0=< y <20XXXX) y=x+20XXXXD. if (x>20XXXX.0 .or. x<0.0) y=2*x+exp(x)8. 阅读下列Fortran 程序:real :: z(2,2)=(/1,2,3,4/)p(x, y)=3*x-2*yt=z(1,2)if ( t<=1.0) s = p(1.0,2.0)if ( t<=3.0) s = p(2.0,3.0)if ( t<=4.0) s = p(3.0,4.0)write(*,*) send执行上述程序后,输出的S 值为 。
Fortran90试题Fortran 复习题⽬类型:1、选择题2、填空题3、简答题4、编程题样题⼀、选择题1.下列名称中,符合FORTRAN 90命名规则的是。
A. a-b-cB. $123C. length_1D. date.year 2.关于FORTRAN 90程序单元,以下四种说法中正确的是。
A.⼀个FORTRAN 90程序由多个程序单元组成,其中有⼀个且只能有⼀个主程序单元B. ⼀个FORTRAN 90程序由多个程序单元组成,其中有⼀个且只能有⼀个模块单元C. ⼀个FORTRAN 90程序允许有多个程序单元,但每类程序单元只能有⼀个D. ⼀个FORTRAN 90程序允许有多个程序单元,但主程序单元和模块单元只能有⼀个3.关于FORTRAN 90的CASE结构,以下说法中正确的是。
A. CASE结构内必须取DEFAULT作为情况选择器的最终值B. CASE结构的情况表达式不能是字符类型C. CASE结构的情况表达式和情况选择器的取值类型必须相同D. CASE结构的不同情况选择器取值可以重复4.已知数组说明REAL A(20:22,0:9,-3:-1),数组A的数组元素个数是。
A.164 B.360 C.450 D.90 5.⼦程序的形式参数(虚拟变元或哑元)可以是。
A.变量名、数组名、过程名B.变量名、数组名、过程名和符号常量名C.变量名、数组名、数组⽚段、过程名D.任意符号名6. 语句OPEN(3,FILE=’ABC’,ACCESS=’DIRECT’,RECL=40)打开的是⽂件。
A.有格式顺序存取B.⽆格式顺序存取C.有格式直接存取D.⽆格式直接存取7、下列关于"SUBROUTINE MAP(X,Y)"语句⾏的叙述中,不正确的是( )A) 这是⼦程序的第⼀个语句 B) 字符串"MAP"是⼦程序名C) 变量X是⼦程序的形参D)⼦程序执⾏后,MAP将返回整型数据8、 FORTRAN表达式"2/4+0.5"的值是( )A) 0.5 B) 1 C) 1.0 D) 09、阅读下列FORTRAN程序:PI=3.14159265WRITE(*,'(F7.4) ')PIEND程序运⾏后输出结果是( )A) 3.142 B) 3.1415 C) 0.31416 D) 3.141610、圆的直径存放在整型变量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)⼆、填空题1、下列FORTRAN函数⼦程序的功能是⽤以下公式计算⼀组数据Z1,Z2,…,Zn的标准差σ:σ2=(Z12 +Z22+…+Zn2)/n-[(Z1+Z2+…+Zn)/n]2请在程序中的下划线处填⼊合适的内容。
《高级语言程序设计(FORTRAN)》考试样题一、选择题(每小题2分,共40分)1. 下列标识符中不能作为FORTRAN的合法变量名的是_____D_____。
A) A_1 B) A1 C) A1A D) A+12. 在FORTRAN的变量类型说明语句中没有 BA) REAL语句B)CHAR语句C)INTEGER语句 D)LOGICAL语句3.FORTRAN90 源程序的扩展名是 C 。
A. TXTB. FC. F90D. FOR4.下列关于符号常量的说法正确的是___C____。
A.符号常量的定义应该放在所有语句之前B.符号常量不可以是字符型常量C.在一个程序单位中定义一个符号常量后,不能再改变它的值D.符号常量定义语句与赋值语句一样,是可执行语句5、在下列写法中,__D______不是FORTRAN常量。
A. .TRUE.B.1E-2C. (0.0,2.4)D.1,000,0006.表达式15/4/2.0的值是 B 。
A.整数2 B.实数1.5 C.实数2.25 D.实数1. 37. 下列不是FORTRAN赋值语句的是 _____D______。
A) X=.TRUE. B) X=X*X C) X=X**2**2 D) X=X++8. 梯形的上底为A,下底为B,高为H,计算其面积的FORTRAN表达式中错误的是____A____。
A)1/2*(AB)*H B)(A+B)*H/2 C)(A+B)/2*H D)0.5*(A+B)*H9. 要选拔身高T>1.7米且体重W<62.5公斤的人,FORTRAN的逻辑表达式是__C_____。
A)T.ce.1.7.AND.w.le.62.5 B)T.le.1.7.OR.w.ge.62.5C)T.gt.1.7. AND.w.lt.62.5D)T.gt.1.7.OR.w.lt.62.510.FORTRAN 90规定,变量类型声明的优先顺序是 C 。
A.隐含约定(I-N规则)、IMPLICIT声明、类型声明B.类型声明、隐含约定(I-N规则)、IMPLICIT声明C.类型声明、IMPLICIT声明、隐含约定(I-N规则)D.IMPLICIT声明、类型声明、隐含约定(I-N规则)11、假设CH是一个字符型变量,并且具有足够的长度,则对于CH(3:7),下面说法正确的是___D________。
A.它是一个数组片段B.它是一个数组定义形式C.它是CH的一个子串,并且长度是4D.它是CH的一个子串,并且长度是512.数组声明语句为:INTEGER,DIMENSION(-5:-1,-3:3,11:15) ::A数组共有 A 个元素。
A.175 B.150 C.120 D.1713. 下列DATA语句中正确的是______C____。
A) DATA /A,B/-1.0, -1.0/ B) DATA A, B/2*(-1.0)/C) DATA A, B/2*-1.0/ D) DATA A/-1.0, B/-1.014. 下列有关FORTRAN数组的说法正确的是______D_____。
A) 数组定义语句只能定义一维或二维数组B) 数组元素下标不能出现负值C) 在赋值语句中出现的A(3)肯定是数组元素D) 程序中使用的数组必须进行说明15. 一个完整的FORTRAN 源程序的组成不应该_____D______。
A)只有一个主程序没有子程序B)有一个主程序和若干子程序C)有一个主程序和一个子程序D)只有子程序而没有主程序16.阅读下列FORTRAN程序:DO K=2,4,2S=S+1/KEND DOWRITE(*,*)SEND执行上述程序后,输出的S值为 CA) 0.75 B) 1.75 C) 0.0 D) 1.017. 阅读下列程序INTEGER M(3,3)DATA M/1,2,3,4,5,6,7,8,9/WRITE(*,10)(M(3,J),J=1,3)10 FORMAT(1X,3I2)END程序运行结果是______B_____。
A)2 5 8 B)3 6 9 C)4 5 6 D)7 8 918. 阅读下列程序K(X,Y)=X/Y+XA=-2.0B=4.0B=1.0+K(A,B)WRITE(*,10)B10 FORMAT(1X,F4.1)END程序运行结果是AA)-1.0 B)1.0 B)2.0 D)3.019. 阅读下列FORTRAN程序:DO I=4,2,-1A=1.0DO J=I,4,2A=A+1.0ENDDOENDDOWRITE(*,*)AEND运行上述程序后,输出的A值为 ______C_____。
A) 5.0 B) 4.0 C) 3.0 D) 2.020、可调数组__B_______中出现。
A.只能在主程序B.只能在子程序C.只能在主程序和子程序D.可以在主程序、子程序和模块二、填空题(每空2分,共36分)1、结构化程序设计的三种基本结构为:顺序结构、选择结构和循环结构。
2、已知A 、B 、C 都是整型变量,且A=3,B=4,C=5,计算表达式C/2>2.AND.A+B ==C 的值为: .FALSE. 。
3、将数学表达式e π2x +ln|Sin 2x-Sinx 2|写成正确的FORTRAN 表达式为:EXP(3.14/2*X)+LOG(ABS(SIN(X)**2-SIN(X**2))) 。
4、N 是一个个位不等于0的两位自然数,写一个表达式将N 的个位数与十位数互换,得到一个新的数。
MOD(N,10)*10+N/10 。
5、已知I 是整型变量,当DO 结构从“正常出口”结束时,语句“DO I= 3,15,2”共计完成了______7_______次循环。
6、下列程序的运行显示结果是什么 .TURE. 。
LOGICAL PINTEGER I,I1,I2,I3P=.FALSE.I=123I1=MOD(I,10)I2=MOD(I/10,10)I3=I/100IF(I1+I3.EQ.2*I2)P=.TRUE.PRINT*,PEND7.下列程序的运行显示结果是什么 K=6 。
K=0DO N=21,10,-1IF (MOD(N,2)==0)K=K+1END DOPRINT*, "K=",KEND8.下列程序的运行显示结果是什么 14 5 。
M=0DO J=1,4DO K=J-1,4M=M+1END DOEND DOWRITE(*,*)M,JEND9.下列程序的运行显示结果是什么 5167.0 。
SUM=1.0J=1DO WHILE(J.LE.3)F=1DO I=2,2*J+1F=F*IENDDOSUM=SUM+FJ=J+1END DOPRINT*,SUMEND10. 下列程序的运行显示结果是什么S=15.00 。
DIMENSION X(3,3)DATA X/1,2,3,4,5,6,7,8,9/S=0DO I=1,3S=S+X(I,4-I)ENDDOWRITE(*,20) S20 FORMAT(1X,’S=’,F6.2)END11. 下列程序将一个数组的元素逆序重新存放,例如存放顺序为: 8,6,5,4,1 。
要求改为: 1,4,5,6,8。
请在横线处填写适当语句,使程序完整。
INTEGER,PARAMETER::N=5INTEGER A(N),I,TDA TA A/8,6,5,4,1/WRITE(*,10)(A(I),I=1,5)DO I=1,N/2T=A(I)A(I)=A(N-I+1)A(N-I+1)=TEND DOWRITE(*,10)(A(I),I=1,5)10 FORMA T(1X,5I4)END12. 下列程序完成按以下格式打印杨辉三角形的前N行:11 11 2 11 3 3 11 4 6 4 1请在横线处填写适当语句,使程序完整。
PARAMETER(N=10)INTEGER A(N,N),I,JDO I=1,NA(I,1)=1A(I,I)=1ENDDODO I=3,NDO J=2,I-1A(I,J)=A(I-1,J)+A(I-1,J-1)ENDDOENDDODO I=1,NWRITE(*,10)(A(I,J),J=1,I)ENDDO10 FORMA T(1X,10I5)END13. 下列子例行程序ProcMin(A,N,MIN)的作用是返回数组A中的最小值。
请在横线处填写适当语句,使程序完整。
SUBROUTINE PROCMIN(A,N,MIN)INTEGER A(N),N,MINMIN=A(1)DO I=2,NIF(A(I)>MIN)MIN=A(I)ENDDOEND14..采用变化的冒泡排序法将N个数按从大到小的顺序排列:对N个数,从第一个直到第N个,逐次比较相邻的两个数,大者放前面,小者放后面,这样得到的第N个数是最小的,然后4个对前面N-1个数,从第N-1个到第1个,逐次比较相邻的两个数,大者放前面,小者放后面,这样得到的第1个数是最大的。
对余下的N-2个数重复上述过程,直至按从大到小的顺序排列完毕。
请在下列程序横线处填写适当语句,使程序完整。
PARAMETER(N=10)INTEGER X(N),I,J,TX=(/10,55,25,70,45,15,25,85,45,35/)WRITE(*,10)(X(I),I=1,10)DO I=1,N-1DO J= 2,N-I+1IF( A(J-1)<A(J) ) THENT=X(J-1)X(J-1)=X(J)X(J)=TEND IFEND DOENDDOWRITE(*,10)(X(I),I=1,10)10 FORMAT(1X,10I4)END三、编程题(每小题8分,共24分)1、输入年月,输出该月所对应的天数。
编写程序。
2、设计一个子例行程序,计算一个任意矩阵A中的最大元素和最小元素。
3、对任意自然数n,设计一个求n的各位数字的立方和的函数子程序F(n)(如F(121)=1**3+2**3+1**2=1+8+1=10),并调用F(n)求1000以内的所有水仙花数(当一个数各个数位的立方和等于这个数本身时,称这样的数为水仙花数)。