大学FORTRAN考试试题样题
大学FORTRAN考试试题1
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．Ｎ＞＝０B．(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期末考试题及答案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中模块化编程的优点。
答案：模块化编程允许程序被分解成独立的模块，每个模块可以独立编译和测试，提高了代码的可读性和可维护性。
大学Fortran期末复习资料-Fortran程序设计_05
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-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、以下说法中错误的是。
计算机专业技术基础(Fortran)试题库
一、选择题1、下列关于"ＳUＢRＯUTＩNE MAＰ(X，Ｙ)＂语句行的叙述中，不正确的是（)A) 这是子程序的第一个语句 B) 字符串"MＡＰ"是子程序名C）变量X是子程序的形参 D) 子程序执行后，MAP将返回整型数据２、 FORTRAN表达式"２/４+0.5＂的值是( )A) 0.5 Ｂ) 1 C） 1.０Ｄ) 03、阅读下列FORTＲＡN程序:PI=3.1４15926５WＲＩTE(*,'(F7.４）')PI ﻫEＮD程序运行后输出结果是（ ) ﻫA) ３.142 B）３.1４15 C) 0.3１４16 D) ３．14164、圆的直径存放在整型变量K之中,下列计算圆面积的表达式中正确的是( )Ａ) 3.14１5９２６＊K*K/4 B） 3.１415926＊(K＊K／4)Ｃ) 3.１4１592６*(Ｋ/2)＊*2 D） 3.14１5９26*(Ｋ／２）*(K／2)５、要判断"月收入M在２０00元以上(含2０00元)且5００0元以下)不含５000元)"的职工,应该使用的逻辑表达式是( ) ﻫＡ) M .ＧE. 2０00 .AND. M .LE. 5000 B）M ．GE. ２０００．ＯR． M .LE. ５000C）Ｍ .ＧＥ. 2000 .AND．Ｍ．LT．５0０0 D) M .GE. 2000 .OＲ. M .LＴ. 50006、设FORTRAＮ子程序如下:SUBＲOUTIＮE SUB(I，X)B=Ｉ+１X=Ｘ+B ﻫEND ﻫ若主程序中的变量M,B已按I-N规则赋值,则调用上述子程序的语句中正确的是( ）A) CAＬL ＳＵB(M,M） B) CALL SUB(M＋4,B) ﻫC） CALL SUB（Ｂ,B) D) CALＬ SＵB(M,B+4)7、下列不是FORTＲAN常量的是（) ﻫA）(3.0,4.0) B) 3.１416Ｄ+00 Ｃ) 2／3 D) 'Very good!'8、阅读下列FOＲＴＲAN程序:F=1．0 ﻫDO 20 K＝3, ７， 3ＤＯ 20 L=K-1, Ｋ20 WＲTTE(*,'(I３, Ｆ8．1)'Ｋ，F＊KEＮＤﻫ程序运行结果的最后一行是( ）ﻫA) 3 6．0 Ｂ) 6 6.0 C) 6 180.０Ｄ) 7 180.09、在ＦOＲTRＡN中，下列运算符的优先顺序是( ）ﻫA) 逻辑运算,关系运算,算术运算B) 关系运算，逻辑运算,算术运算C）算术运算，关系运算,逻辑运算 D) 关系运算,算术运算，逻辑运算10、使用ＦORTRAN内部函数时，所给的自变量（ )A) 只能是常量 B) 只能是变量C) 只能是常量或者变量 D) 可以是常量、变量或者表达式11、设X＝2.0，Y=8.0, Z=6.0，Ｌ＝.TRUE.,则下列ＦOＲTRAN表达式中值为.TRUＥ.的是( ) ﻫA） X＋Z.GT.Y.ANＤ．L Ｂ) .NOT.（Y.LT.Z+X).NEQV..NOT．LC）．NOT.L.OR.(Ｌ.EQV．Y＋Ｘ.ＥQ.Z) Ｄ) Y＋X.GＥ．Z＋Ｘ．AＮD．(Ｌ.AＮD.．FALSE．)１2、下列输出语句行中正确的是( )Ａ) ＷRＩTＥ（＊，*)(Ａ(Ｋ,L),K=１，３,Ｌ＝１，３)Ｂ) WＲITE(*，*)A(Ｋ，L）,K＝1,3，Ｌ=1，3C) WRITE(*,*）((A(Ｋ,L)，K=1,3), L=1，3) ﻫD) WＲＩTE(*,*)(A(K,L），K=1,３),Ｌ＝１，31３、给定下列FORTRAN子程序如下：ﻫSＵＢROUTＩNE ＳUB(K，A) ﻫA＝SQRT(K*K+1．0) ﻫEND ﻫ下列调用语句中正确的是( )A) CALL SUＢ(N,N) B) CALL SＵB（Ｘ,Ｘ) ﻫC) CＡLL SUB(N，X*Ｘ) D) CALL SUＢ(11,Ｘ)１4、阅读下列FORTRAN程序:INTEGEＲ AA(2，3）DATA AA／1,２，3,4,5,６／CALL Ｓ２Ｄ１9（AＡ) ﻫCALL S2Ｄ1９(AA(1,2））ENDSUＢROUTINＥ S２D1９(ＢB)INＴEGEＲＢＢ(2,2)WRITE(*,'(1Ｘ，2I3)') BB（1,1）,BB(2,2) ﻫEND程序运行结果是( ) ﻫA) 1 4 B) 1 ５ C) １ 4 D) １ 23 6 2 6 2 ５ 3 4１5、阅读下列FORＴRAN程序:ＩNＴEGER A(３,3)。
计算机技术基础(Fortran)试题库
一、选择题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语言试题
大学FORTRAN语言试题一、选择题（15×1分=15分）1．Fortran程序设计语言允许使用的专用字符集是。
A．（），．；［］＋－＊／＝：空格B．（），．αβ＋－＊／＝：空格C．（），．＋－＊／＄＇＝：空格D．｛｝，．；？＋－＊／＝：空格２．按隐含规则确定变量的数据类型，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考试试题样题
《高级语言程序设计 (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 。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
《高级语言程序设计(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以内的所有水仙花数（当一个数各个数位的立方和等于这个数本身时，称这样的数为水仙花数）。