FORTRAN90练习题
FORTRAN90试题_3_
FORTRAN90试题_3_计算机基础部分单项选择题（每题1分，共⼗分）（⼀）微型机的性能指标主要取决于 1 。
1．A) 内存 B) 中央处理器 C) 硬盘 D) 显⽰卡（⼆）与⼗进制数35等值的⼆进制数为 2 。
2．A) 100011 B) 110001 C) 11101 D) 101011 （三）硬盘⼯作时，应尤其注意防⽌ 3 。
3．A) 空⽓潮湿 B) 空⽓中的尘埃 C) 光线直射 D) 强烈震动（四）下列选项中， 4 不属于系统软件。
4．A) C 语⾔编译程序B)Windows C) Unix D)Office （五）计算机联⽹的主要⽬的是 5 。
5．A) 数度快 B) 资源共享 C) 精度⾼ D) 容量⼤（六）下列⽹络的IP 地址中， 6 正确的是。
6．A) 202.245.101.201 B) 204.256.9.101 C) 202.155.98.C D) 249.220.258.202（七）在多媒体计算机系统中，不能⽤于存储多媒体信息的是 7 。
7．A) 光缆 B)光盘 C) 硬盘 D) 磁带（⼋）计算机病毒不能通过 8 传播。
8．A) 硬盘 B) 优盘 C) D 打印机 D) ⽹络（九）在Windows 98中，将⼀个应⽤程序窗⼝最⼩化后，该应⽤程序 9 。
9．A) 任在后台运⾏ B) 暂时停⽌运⾏ C) 完全停⽌运⾏ D) 从任务栏退出（⼗）在Windows 环境下，若要将当前窗⼝存⼊剪贴板，则可以按 10 。
10．A) Ctrl + Print Screen B) Alt + Print Screen C) Shift + Print Screen D) Print ScreenFORTRAN90语⾔⼀、语⾔基础单项选择(每题2分，共20分)(⼀) 下⾯程序段中，错误的语句是 1 。
1. A) REAL,PARAMETER :: S = 1.73B) REAL :: X = 3 C) S = S + XD) PRINT *, S, X(⼆) ⼀个梯形的上底长为A,下底长为B,⾼为H,正确计算这个梯形⾯积的FORTRAN90表达式为 2 。
2007FORTRAN90试卷
FORTRAN90试卷（2007年4月）一、选择题1.设已定义了派生类型：TYPE studentCHARACTER(LEN=20)nameINTEGER ageEND TYPE student则正确声明student类型变量st1的语句是（1）。
BA.student st1B.TYPE(student)::st1C.TYPE student st1D.student TYPE st12.若要定义二维实型动态数组A，以下说明语句正确的是（2）。
AA.REAL(4),DIMENSION(:,:),ALLOCATABLE::AB.REAL(4),DIMENSION(:,:),ALLOCATE::AC.REAL(4),DIMENSION(:),ALLOCATABLE::AD.REAL(4),DIMENSION(:),ALLOCATE::A3.数组说明语句为：REAL，DIMENSION（-2:2，-1:1，-1:2）::a，数组元素a(0,0,0)是第（3）个元素。
CA.19B.21C.23D.254.以下几组FORTRAN90关键字中都是数据属性的是（4）。
DA.DIMENSION、ALLOCATE、POINTERB.INTENT、ALLOCATED、TARGETC.PARAMETER、USE、MODELD.ALLOCATABLE、SAVE、INTENT5.设有说明语句INTEGER::I=1,J=2,K=3,M=4，则语句PRINT*,I+J>K.XOR.K+J>=M的输出结果为（5）。
CA.TRUEB.FALSEC.TD.F6.假设有过程说明SUBROUTINE SUB1（A）DREAL A（2，2，*）在主程序单元中有语句：REAL X（7）CALL SUB1（X）则与数组元素X（7）对应的A数组的元素是（6）。
A.A(1,1,1)B.A(2,2,1)C.A(2,1,2)D.A(1,2,2)7.以下不属于FORTRAN90程序单元的是（7）。
FORTRAN90复习资料(2)
FORTRAN90 程序设计复习资料(2)一、选择题1．FORTRAN 90规定，变量类型声明的优先顺序是。
A.隐含约定（I-N规则）、IMPLICIT声明、类型声明B.类型声明、隐含约定（I-N规则）、IMPLICIT声明C.类型声明、IMPLICIT声明、隐含约定（I-N规则）D.IMPLICIT声明、类型声明、隐含约定（I-N规则）2．表达式15／4／2.0的值是。
A．整数2 B．实数1．5 C．实数2．25 D．实数1. 33．数组声明语句为：INTEGER，DIMENSION(-5:-1,-3:3,11:15) ：：num ,数组共有个元素。
A．175 B．150 C．120 D．174．下列语句函数声明中，正确的是。
A．F1(I,I)=5*I-10*I**2 B. F2(MAT(5),A)=5*A+MAT(5)C. F3(X,Y,5.0)=X**2+Y**2+5.0**2D.F4(X,Y)=SQRT(X**2+Y**2+5.0**2)5.下列关于子程序的有关说法中，不正确的是。
A．对于无参子例行程序，调用时子例行程序名后的括号可取消B．对于无参函数子程序，调用时函数名后括号可取消C．对于有参子程序，形式参数可以是子程序名对于有参子程序，形式参数可以是星号“*”6．以下不是算法的特征。
(A) 灵活性（B）确定性（C）可行性（D）有穷性7．以下是FORTRAN 90源程序的扩展名。
（A）MDP （B）MAK （C）OBJ （D）F908．下列是正确的变量名。
（A）3SI （B）SI—3 （C）SI 3 （D）SI#39．若S为整型变量，且有S=1.25+11/4，则S的值为。
（A）3（B）3.25 （C）4 （D）4..2510．表达式MOD(5，6)+9/2**3/2的值为。
（A）37 （B）1 （C）5 （D）3211．已知a=3.0，b=9.0，c=5.0，d=7.0，逻辑表达式a+b/=c. and .a>=d的值为。
FORTRAN90习题
，A(2,2)的值是
，A(3,1)的值是
。
，第二行是
，A(2)的值是
n-1 n
。 之和的外部函数
＋…＋ａnT 表示ｘ ，S 表示多项式之和。 FUNCTION p(A,N,x) RESULT(r_p) S= T=1.0 DO I=1,N T= S=S+A(I)*T PRINT*,'S=',S END 8. 用选择法,将 N 个整数按从小到大排列。 PARAMETER(numl=500) INTEGER num(numl) READ*,N,(num(I), ) DO I=1,N-1 min=I DO J= (22) IF(num(min) .GT. num(J)) ENDDO IF(min .NE. I)THEN it=num(I) num(I)=num(min) ENDIF ENDDO PRINT*,(num(I),I=1,N) END 9. 以下程序是通过超载赋值(=)运算符,实现将字符的 ASCII 码赋给整型变量的功能. SUBROUTINE CTOI(I,C) INTEGER ,INTENT(OUT):: I CHARACTER ,INTENT(IN):: C I= END SUBROUTINE PROGRAMMAIN INTERFACE ASSIGNMENT(=) SUBROUTINE INTEGER ,INTENT(OUT):: I CHARACTER ,INTENT(IN):: C ENDSUBROUTINE INTEGER I CHARACTER:: C='A' I=C PRINT*,C,I END PROGRAMMAIN 10.求 N!。 PRINT*,'Input N?' READ *,N
，第三行是
FORTRAN90
FORTRAN90 程序设计复习资料(2)一、选择题1．FORTRAN 90规定，变量类型声明的优先顺序是。
A.隐含约定（I-N规则）、IMPLICIT声明、类型声明B.类型声明、隐含约定（I-N规则）、IMPLICIT声明C.类型声明、IMPLICIT声明、隐含约定（I-N规则）D.IMPLICIT声明、类型声明、隐含约定（I-N规则）2．表达式15／4／2.0的值是。
A．整数2 B．实数1．5 C．实数2．25 D．实数1. 33．数组声明语句为：INTEGER，DIMENSION(-5:-1,-3:3,11:15) ：：num ,数组共有个元素。
A．175 B．150 C．120 D．174．下列语句函数声明中，正确的是。
A．F1(I,I)=5*I-10*I**2 B. F2(MAT(5),A)=5*A+MAT(5)C. F3(X,Y,5.0)=X**2+Y**2+5.0**2D.F4(X,Y)=SQRT(X**2+Y**2+5.0**2)5.下列关于子程序的有关说法中，不正确的是。
A．对于无参子例行程序，调用时子例行程序名后的括号可取消B．对于无参函数子程序，调用时函数名后括号可取消C．对于有参子程序，形式参数可以是子程序名对于有参子程序，形式参数可以是星号“*”6．下列关于外部子程序的说法中，正确的是。
A．外部子程序可与主程序单元放在一个源程序文件中,但必须放在PROGRAM语句之前B．外部子程序可与主程序单元放在一个源程序文件中，但必须放在END语句之后C．外部子程序允许单独放在一个源程序文件中，并与主程序分别编译D．外部子程序允许单独放在一个源程序文件中，并与主程序单元一起编译7．关于FORTRAN90的派生(即自定义)类型，以下四种说法中错误的是。
A．派生类型定义从“TYPE 派生类型名”开始到“END TYPE'’结束B．派生类型名不得和系统内定类型同名，在同一程序单位内也不得重复定义 C．派生类型的分量(或称成员)不能是派生类型名，即派生类型不允许嵌套定义D．引用派生类型变量的成员可用“%”号或“．”号，例如abc%a，或abc.a均可8．指针声明语句为：INTEGER，POINTER ：：A1，A2目标变量声明语句为：INTEGER，TARGET ：：M=20，N=30下列语句执行后，M、N的值分别为。
2002FORTRAN90笔试试卷
2002FORTRAN90笔试试卷（二○○二年六月）一、选择题1．指出下列符号中，哪些是合法的FORTRAN90变量名？C ①shanghai②gh3.5③sum_1④#3a⑤abc3d⑥12⑦_m⑧a-1A．①②③④ B.⑤⑥⑦⑧C．①③⑤⑦ D.②④⑥⑧2.以下数组说明语句正确的是？A①REAL(8)A(10)②DIMENSION A(10)③REAL A(2:3,-1:-5,0:3)REAL A(10)④REAL,DIMENSION(5)::A(10)⑤REAL DIMENSION(10),PARAMETER::A=3.0⑥READ*,MREAL,DIMENSION(M)::AA.①③⑤B.②④⑥C.①②③D.④⑤⑥3.当输入123456789时，下列程序段的输出为？A INTEGER A,B,CA=2READ(*,'(I1,I<A>,I<A>)')A,B,CPRINT*,A,B,CA.123B.12345C.123456D.12345674．一个FORTRAN90源程序和工作间的文件扩展名是？D A.FOR和TXT B.FOR和LIBC.OBJ和EXED.F90和MDP5．表达式10/4/2.0的值是?B A.1 B.1.0C.1.25D.1.36.若有语句：INTEGER B（－1:－2，3:7），则数组B中所包含的元素个数为？CA.12B.10C.0D.217．设A=.TRUE.，B=.FALSE.，C=.FALSE.，D=.TRUE.，E=.EALSE.，则语句PRINT*，.NOT.A.EQV.B.OR.C.NEQV.D AND.E的结果为？C A.TRUE B.FALSEC.TD.F8.如有数组定义：TYPE STUDENTINTEGER NUMCHARACTER（8）NAMELOGICAL SEXINTEGER BIRTHDAYEND TYPETYPE（STUDENT），DIMENSION（10）：：ST1则数组ST1占据多少字节的内存单元？BA.140B.200C.180D.1609.给复型变量F赋初值2.4+5.6i(i是虚数单位)的DATA语句是?AA.DATA F/(2.4,5.6)/B.DATA F/CMPLX(2.4,5.6)C.DATA F/2.4,5.6/D.DATA F/COMPLEX(2.4,5.6)/10.设有程序段：CHARACTER*14ACHARACTER*5CA=’abcdefghijklmn’C=A(:5)A(:5)=A(3:7)A(3:7)=CPRINT*,A输出结果为：DA.abcdefghijklmnB.jklmnfghiabcdeC.fghijabcdeklmnD.cdabcdehijklmn二、填空题1．以下程序运行后，输出的第一行为（1），第二行为（2），第三行为（3）。
FORTRAN_90程序设计试题A(2022格式)
FORTRAN_90程序设计试题A(2022格式)装订线2022年6月24日输入7，8，9，10↙兰州交通大学试卷（主卷）密封线课程名称：FORTRAN90程序设计（A）教学班中学生序号一、选择题（每题1分，共30分）方式将FORTRAN源程序变成目标程序。
1．采用[A]编辑[B]编译[C]汇编[D]解释2．一个完整的FORTRAN源程序的组成不应该是[A]只有一个主程序没有子程序：号[B]只有子程序而没有主程序学[C]有一个主程序和一个子程序[D]有一个主程序和若干子程序点3．下面符合FORTRAN90定义规则的变量名是端两[A]某_C2[B]某+Y[C]U.S.A[D]M线4．下列说法中，正确的是黑过[A]在FORTRAN程序中，各类语句的位置是任意的。
超得[B]任何一个FORTARN语句在程序执行时都会产生某种机器操作。
不[C]有些FORTRAN语句在程序执行时不产生任何机器操作。
下上[D]在FORTRAN中“=”表示相等的意思，如A=B表示变量A与B的值相等。
：5．下列四个实数中，哪一个是合法实数求要[A]E5[B]$125.5[C]12.3E3.5[D]+189．写：6．下面赋值语句中正确的语句是书名题[A]M某N=(某-Y)/Z[B]+R=A+B/C[C]某=Y=Z-1.0[D]Y=A某B/C/D姓考7．设变量A，B，I，J的类型符合I-N规则，且A=2.0，B=2.5，I=1，J=2，则表达式：I/J某A+B某I/J的值为[A]0[B]0.25[C]1.25[D]2.258．下列语句中有错误的语句是[A]F=(A+B)/(C+D)[B]T=SQRT(8.0)[C]P=MOD(M,5.1)[D]K=MA某(A,B,C)9．运行下列程序后，输出的结果是INTEGERM,NREAD某,M,N,N,M：M=M+N级N=M+N班PRINT某,M,NEND共8页第1页[A]1523[B]1519[C]1919[D]192810.以下不合法的FORTRAN90表达式是[A]A=B.EQV.C>D[D]A.AND.B.AND.C11．以下能表示条件“某、Y同时满足大于0且小于等于10”的逻辑表达式是[A](0[B](某.GT.0.AND.某.LE.10).AND.(Y.GT.0.AND.Y.LE.10)[C](某.GT.0.AND.某.LE.10).OR.(Y.GT.0.AND.Y.LE.10)[D]012．如果A=2.5，B=7.5，C=5.0，D=6.0，L=.TRUE.，M=.FLASE.，下列值为TRUE的逻辑表达式为[A].NOT.L.OR.C.EQ.D.AND.M[B](A+B).LT.(C+D).AND.A.EQ.3.5[C](A .LT.B).AND.(B.LT.A)[D]A+B/2.0.NE.C-D.OR.C.NE.D13．下列各逻辑IF语句中正确的是[A]IF(某>0.0).AND.(某<1.0)Y=1.0[B]IF(某<0.0)THENY=-1.0[C]IF(某>0.0.AND.某<1.0)Y=1.0[D]IF(0.0READ(某,某)N某=1.0IF(N>20)某=3某某-1.0IF(N>5)某=2某某+1.0IF(N>0)某=2某某PRINT某,某END如果从键盘输入20↙，最后输出的某值为[A]1.0[B]2.0[C]6.0[D]10.015．对于DO语句：“DOI=1.2，5.6，2.4”，可计算出循环次数为[A]2次[B]3次[C]4次[D]5次16．下列程序执行后，输出的结果为N=0DOK=1,3共8页第2页装订线密封线兰州交通大学试卷（附卷）N=N+K勤学习祝成功守纪律莫舞弊[C]C=’BEIJI□□NEW’[D]C=’IJINGNEW□□’ENDDOPRINT某,N,KEND[A]3,3[B]3,4[C]6,3[D]6,417．下列程序中，哪一行语句有错误1PROGRAMP012INTEGER::I,S=03DOI=1,5,2：4I=I+1号5S=S+I学6ENDDO7ENDPROGRAMP01点[A]2[B]3[C]4[D]7端两18．阅读下列FORTRAN90程序段线黑INTEGER：：I，J，K=0过DOI=1，5，2超得DOJ=2，6，3不K=K+1下ENDDO上：ENDDO求上述程序段执行完后K的值是：要写[A]6[B]4[C]2[D]9名书姓题19．设有字符串变量CH=’Thi’’Fortranprogram.‘，则LEN(CH)=考[A]21[B]22[C]23[D]2420．阅读以下程序段：CHARACTERAA=CHAR(ICHAR(’0’)+3)PRINT某,A输出的A为：[A]0[B]1[C]2[D]321．执行下列程序段后，变量C的值为(□表示空格)CHARACTER某5A,B,C某10A=’BEIJING’：B=’NEW’级C=A//B班[A]C=’BEIJINEW□□’[B]C=’IJING□□NEW’共8页第3页22．下面的格式输入语句：READ(某,20)某,Y20FORMAT(2F4.1)如果在执行时，由键盘输入：1122334455667788后，则Y的值是______。
Fortran90试题
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请在程序中的下划线处填⼊合适的内容。
2003FORTRAN90笔试试卷
2、下列程序执行后，ARRAY（4，1）= （3） ，ARRAY（1，3）= （4） ，ARRAY （2，3）= （5） 。 答案： 4，11，16 IMPLICIT NONE INTEGER(1),DIMENSION(1:4,1:4)::ARRAY=0 INTEGER(1)::I=1,J=1,N1=1,NC=4,K DO K=1,16 ARRAY(I,J)=K IF(I<NC .AND. J==N1)THEN I=I+1 ELSEIF(I==NC .AND.J<NC)THEN J=J+1 ELSEIF(I>N1 .AND. J==NC)THEN I=I-1 ELSEIF(I==N1 .AND. J>N1+1)THEN J=J-1 IF(I==N1 .AND. J==N1+1)THEN NC=NC-1; N1=N1+1 ENDIF ENDIF ENDDO PRINT '(4X,4I3)',((ARRAY(I,J),J=1,4),I=1,4) END 3、下列程序运行后，AR1(1,1)= （6） , AR1(1,3)= （7） ，AR1(2,3)= （8） 答案： 1， 3， -2 。
FORTRAN 90 笔试试卷
（二○○三年五月） 一、选择题
1、关于 FORTRAN90 的 CASE 语句，下列说法中正确的是 （1） 。 A、在一个 CASE 结构中，CASE DEFAULT 语句可出现多次 B、对于给定的 CASE 结构，CASE 值范围可以有重叠 C、每个 CASE 的值必须与表达式的类型相同 D、如果表达式为字符型，CASE 的值可以是任意长度和类型的字符 2、关于数据对象的 INTENT 属性，下列说法中不正确的是 （2） 。 A、INTENE 属性只能用于子程序中，说明虚元的意图属性 B、INTENT 属性也可用于具有指针类型的虚元 C、INTENT 属性只能是 IN、OUT 和 INOUT 三种之一 D、INTENT 属性可用来说明多个虚元，虚元之间用逗号分开 3、关于 FORTRAN90 的续行符，以下说法不正确的是 （3） 。 A、一条语句最多有 39 个续行 B、在非注释行上，续行符可以出现在行尾，也可以出现在行首 C、当续行符出现在注释语句中，则失去了续行的功能 D、续行符后可以是空行 4、关于 CYCLE 语句，以下说法正确的是 （4） 。 A、CYCLE 语句只能用于循环结构中 B、CYCLE 语句可用于任何语句结构中 C、CYCLE 语句提供了循环的出口语句 D、CYCLE 语句提供了循环的入口语句 5、关于数据对象的 OPTIONAL 属性，以下说法不正确的是 （5） 。 A、OPTIONAL 属性只能用于子程序或接口块中 B、OPTIONAL 可以用于任何程序单元中 C、可以用 PRESENT 函数测试已说明为 OPTIONAL 的虚元是否可用 D、说明为 OPTIONAL 属性的虚元可以没有实元对应 6、输出语句 PRINT *，’’’’的输出结果是 （6） 。 A、’ B、’’ C、’’’ D、语法错 7、设有数组定义 INTEGER（1） A，B DIMENSION A（5） ，B（4，7） 则在执行下列语句后，A（4）的值为 （7） 。 A=8 B=5 A=A-B（2，1：5） A、8 B、5 C、3 D、语法错 8、关于 USE 语句，以下说法正确的是 （8） 。 A、USE 语句可以出现在程序单元的任何位置 B、一个程序内可以包含多个 USE 语句 C
FORTRAN同步练习
第一、二章 Fortran90基础知识考核知识点1．字符集：58个⑴A~Z（a~z）程序中不区分大小写26个⑵0~9 10个⑶_(下划线) 1个⑷空格= + - * / （），：·$ …” ；！& % > < ？21个注意：除字符常量外，不区分大小写；字符常量、注释内容可是任意字符2．各种标记：（1）注释标记：！（感叹号）后的所有字符都被编译器忽略；可独占一行，可在其它语句之后，空行为注释行（2）续行标记：&（放在尾部），但如为关键字，首尾均加&。
（3）分行标记：一行可以写多个语句，用“;”（分号）分隔3．独立程序单位种类及个数（1）主程序（个数：1）单位定义语句为PROGRAM名字（2）外部子程序（个数：0-n）：外部函数子程FUNCTION；外部子例行子程序SUBROUTINE （3）模块（个数：0-n）单位定义语句为MODULE名字（4）数据块程序单元（个数：0-n）注意：可执行程序一定含有一个主程序单位主程序单位定义语句当单位结束语句为END或ENDPROGRAM时可省略。
子程序单位定义语句不可省略4．语句分类及判定：语句行：参与编译可执行语句：输入语句、输出语句、赋值语句、程序控制语句非执行语句：类型说明语句、接口块、模块中的语句非语句行（注释行）：（1）无继续行（2）不参与编译、运行（3）可出现在任何位臵上（4）空行为注释行5．名字的命名规则：一般要知名达意（1）字母、数字、下划线组成（2）字母开头（3）长度1~31（4）名字中不能含有空格同步练习一、选择题1.以下独立程序单位中有时可省略单位定义语句的是______。
A. 主程序单位 B．外部函数辅程序单位 C．外部子例行程序单位 D．模块单位2.fortran90程序有若干个独立的程序单位组成，以下四组中均不是独立的程序单位的是______。
A．系统提供的内部函数、接口块、内部子程序过程B．函数辅程序单位、主程序单位C．模块、子程序辅程序单位、内部函数过程D．函数辅程序单位、子程序辅程序单位3.下列说法中正确的是：______。
FORTRAN90上机试题
试卷1下面程序的功能是用指针的方法将整型变量A，B的内容互换，请改错。
PROGRAM EXIMPLICIT NONEINTEGER::A,B,C !<==ERROR1 integer，target::a,b,cINTEGER,POINTER::P1,P2,P3READ *,A,BC=BP1=>C !<==ERROR2 p1=>aP2=>BP3=B !<==ERROR3 p3=>cPRINT *,A,BP2=P1P1=P3PRINT *,A,BEND下面程序的功能是用折半法查找方法在给定的一维有序数组（升序）中查找给定的元素X，返回该元素在数组中的下标。
如果数组中没有该元素，则返回‘NO FOUND’，请填空。
PROGRAM EXIMPLICIT NONEINTEGER, DIMENSION(6)::AINTEGER::X,K,J,L,SREAD *,XA=(/2,4,6,9,15,24/)K=1J=6DO WHILE (K<=J)L=(K+J)/2IF (A(L)==X) THEN !<==BLANK1S=LEXITELSE IF (A(L)>X) THENJ=L-1ELSEK= L+1 !<==BLANK2ENDIFENDDOIF (K<=J) THEN !<==BLANK3PRINT *, SELSEPRINT *,'NO FOUND'END IFEND编程，求500-700之间各位数字之和等于12的整数的个数及和。
PROGRAM TESTIMPLICIT NONEINTEGER::N,S !N是存放个数的变量，S是存放和的变量!!考生做题开始!!************ BEGIN *******************INTEGER::A,B,C,IS=0;N=0DO I=500,700A=I/100B=MOD(I/10,10)C=MOD(I,10) THENN=N+1S=S+IEND IFEND DOPRINT*,N,S!!************ END *******************CALL OUTPRINT(N,S) !N为符合条件的结果!!考生做题结束,以下部分请勿修改CONTAINSSUBROUTINE OUTPRINT(X,Y)CHARACTER (LEN =10):: FILENAMEINTEGER:: X,YFILENAME ='RESULT.TXT'OPEN(UNIT = 1 ,FILE = FILENAME ,ACCESS = 'SEQUENTIAL' , STATUS ='REPLACE') WRITE(1,"(1X,'N=',I4,3X,'S=',I6)") X,YENDFILE(UNIT=1)CLOSE(UNIT=1)END SUBROUTINE OUTPRINTEND !程序结束试卷2下面程序的功能是从键盘输入任意10个整型数，使其按从小到大的鼠须排列并输出（冒泡法），请改错。
FORTRAN90练习题
一．选择题1．语句OPEN（3，FILE=‘ABC’）打开的是文件。
A．有格式顺序存取B．无格式顺序存取C．有格式直接存取D．无格式直接存取2．调用子程序时，假设实参可以是常数、内在函数及表达式，其相应形参是。
A．变量名B．数组名C．过程名D．*3．下列数据中，不符合FORTRAN90常量表示的是。
A．-25.6 B．3.2344D0 C．’BOOT’’=’D．TRUE4．圆心在原点的两个同心圆,半径分别为2和4。
描述点(X,Y)在小圆外，大圆内(包括在两圆周上)的表达式是。
A．ABS（X）<=4.0 .AND. ABS(Y)>=2.0 B．2.0>=SQRT(X*X+Y*Y)<=4.0C．X*X+Y*Y<=16.0 .AND. X*X+Y*Y>=4.0 D．（X.OR.Y）>=2.0 .AND. (X .OR.Y)<=4.05.下列字符串中可用作FORTRAN90变量名的是。
A．ABC B. A-BCD C. 2ABC D. AB.C6.下列数据中不符合FORTRAN90常数表示的为。
A. 21.50B. +0.0D0C. .TRUE.D. $10007.表达式：－B+SQRT(B*B-4.0*A*C).LE.3E-5值的类型是。
A. 逻辑型B. 整型C. 实型D. 字符型8.按隐含约定，设X=2.5,Y=1.0,Z=3.0, 执行赋值语句I=X+Y/Z后I的值为。
A. 2.0B. 2C. 3D. 3.09.下列语句中那个语句是错误的是。
A. READ(*,*)XB. READ*,XC. PRINT(*,*)XD. PRINT *,X10.说明语句REAL A(1:2,-1:10)说明数组A的元素个数为。
A. 11B. 12C. 22D. 2411.M能被N整除的FORTRAN表达式为。
A. (M/M)=0B. (M MOD N).EQ.0C. (M/N).EQ.0D. MOD(M,N).EQ.012．以下关于FORTRAN90中有关虚参、实参的说法中，不正确的是。
2006年FORTRAN90试卷
一、 选择题 1．关于 FORTRAN90 中接口块的使用，以下说法错误的是 （1） 。 B A．接口块必须以 INTERFACE 开始，END INTERFACE 结束 B．接口块可以出现在任何程序单元中 C．接口块中不能包含 ENTRY 语句、DATA 语句或语句函数 D．接口块可用来说明一个外部过程或虚过程，并为之提供显式的调用接口 2．关于 FORTRAN90 中模块的使用，以下说法错误的是 （2） 。 A A．模块名可以与其他程序单元名相同 B．模块的说明部分不能包含 ENTRY 或 FORMAT 语句 C．模块内定义的变量可供使用该模块的所有程序单位调用 D．一个模块能够使用另一个模块 3．设有数组说明语句：REAL，DIMENSION(-2：2，0：4，-1：2)： ：a，则数组元素 a(1,1,1) 是第 （3） 个元素。 C A．58 B. 85 C. 59 D. 95 4．关于 FORTRAN90 的 CASE 语句，下列说法中错误的是 （4） 。 A A、在一个 CASE 结构中，CASE DEFAULT 语句可出现多次 B、对于给定的 CASE 结构，CASE 值范围不可以有重叠 C、每个 CASE 的值必须与表达式的类型相同 D、CASE 语句只能出现在 SELECT CASE ……END SELECT 结构中 5．关于 FORTRAN90 的 CONTAINS 语句，下列说法中错误的是 （5） 。 D A．CONTAINS 语句用来分隔程序的主体部分与内部过程 B．CONTAINS 结构必须位于程序中可执行部分和 END 语句之间 C．内部过程中不能再包含 CONTAINS 结构 D．CONTAINS 语句是可执行语句 6．FORTRAN90中的内部函数DOT_PRODUCT是求向量的点积，则 DOT_PRODUCT((/1,2,3/), (/4,5,6/))的值等于 （6） 。 C A．21 B. 9 C. 32 D. 23 7．已知数组说明 REAL (8) ,DIMENSION (3:10, -1:3)::ARRAY，则 SIZE （ARRAY）的值 等于 （7） 。 B A．20 B. 40 C. 30 D. 10 8．关于 FORTRAN90 的静态变量，以下说法正确的是 （8） 。 A A．静态变量用 STATIC 属性说明 B．静态变量相当于符号常量 C．只有数组才能说明为静态变量 D．静态变量只能用于主程序中 9．关于 FORTRAN90 中主程序的说法，错误的是 （9） 。 B A．主程序的名字必须是惟一的 B．主程序中必须有 END 语句，且 END 语句中必须包含主程序名 C．主程序中不能包含 RETURN 或 ENTRY 语句 D．主程序不能递归 10．设有如下语句： REAL，TARGET ： ： E=2.36 REAL，POINTER： ：C， D C => E； D => E
2010FORTRAN90笔试试卷
FORTRAN90笔试试卷(二○一○年四月)一、选择题1、关于FORTRAN90中的标识符 (如变量名、过程名)，以下说法中错误的是 (1) 。
DA、标识符只能由英文字母、数字、下划线组成B、标识符第一个字符必须是英文字母C、标识符长度不能超过31个字符D、标识符不能用FORTRAN90的关键字2、关于FORTRAN90中的程序单元，以下说法错误的是 (2) 。
DA、FORTRAN90 规定有 4 种程序单元B、一个 FORTYAN90 程序可由多个程序单元组成，其中至少包含一个主程序单元C、主程序单元是 FORTRAN90 程序运行的入口点D、一个程序的多个程序单元必须统一编译，生成可执行程序3、关于FORTRAN90中的主程序单元，以下说法正确的是 (3) 。
AA、一个主程序单元可以只含一个 END 语句B、一个主程序单元必须由 PROGRAM 语句开始C、PROGRAM 语句可以在主程序单元中多次出现D、主程序单元中可以包含其他外部子程序单元4、设有说明：CHARACTER(LEN=20)：：string="This is a computer."BCHARACTER(LEN=15)：：subs执行语句：subs=string(:4)//string(5:5)//string(11:)后，变量subs的值是 (4) 。
A、This isB、This computerC、is aD、a computer5、说明整型数组array并给其赋初值的正确语句是 (5) 。
CA、INTEGER array(3)=(/2， 4， 6/)B、DIMENSION::array(3)=(/2， 4， 6/)C、INTEGER,DIMENSION(3)::array=(/2， 4， 6/)D、INTEGER,DIMENSION(3)::array(3)=(/2， 4， 6/)6、关于FORTRAN90中的EXTERNAL语句，以下说法正确的是 (6) 。
2005年FORTRAN90试卷
FORTRAN90试卷（2005年5月）一、选择题1、关于EXTERNAL语句，以下使用错误的是。
D A．EXTERNAL sub1 B. REAL, EXTERNAL:: func1C. EXTERNAL sinD. REAL, EXTERNAL,TARGET:: func12、在FORTRAN 90 中，变量可以是有定义的或是无定义的。
关于变量的定义状态，以下说法中错误的是。
CA．零大小的数组分配时有定义 B. 零长度的字符串有定义C. 具有INTENT(OUT)属性的虚元有定义D. 输入语句成功执行后，其中的变量有定义3、关于FORTRAN 90的动态数组，以下说法错误的是。
DA. 动态数组用ALLOCATABLE属性定义B. 动态数组的大小可以为0C. 可以用ALLOCA TE语句给动态数组分配内存空间D. 动态数组可以作为虚参变量4、关于指针变量，以下说法错误的是。
AA. 指针变量只能是整型或实型B. 指针变量在分配内存空间前不可以引用C. 指针变量可以访问其他变量的部分或全部D. 几个指针可以共享同一个目标变量5、关于FORTRAN 90的内部过程，以下说法错误的是。
BA. 内部过程应放在CONTAINS语句和主程序的END语句之间B. 内部过程的返回值可以有多个C. 内部过程内部不可以再出现CONTAINS语句D. 内部过程中可以使用主程序所定义的变量6、关于FORTRAN 90的外部过程，以下说法错误的是。
CA. 外部过程可以和主程序放在一个文件中，也可以作为单独的文件B. 外部过程的内部可以再包含内部过程C. 外部过程中可以使用主程序所定义的变量D. 外部过程的返回值可以是一个或多个7、FORTRAN 90中增加了逻辑异或运算符XOR，逻辑异或运算可描述为“a XOR b”，其中a和b为参加运算的两个操作数，运算结果为当且仅当a、b两个操作数中只有一个为真时才为真，其他情况下均为假。
fortran90例子
fortran90例子例1、输入M个实数，将其相加，并输出其和。
PROGRAM example_1Implicit noneInteger ::n,mReal ::t=0,a=0Read *,mDoRead *， aT=t+aN=n+1If (n>=m) exitEnd doPrint*,tEnd program example_1例2、求∑I!的阶乘（I=4,8）。
Function factor(n) result(fac_result) Implicit noneInteger ,intent(in)::nInteger,intent(out)::fac_resultInteger::IFac_result=1Do I=1,nFac_result=fac_result*IEnd doEnd function factorProgram example_2Implicit noneInteger ::factor,s=0,IDo I=4,8S=s+factor(i)End doPrint*,sEnd program example_2例3、输入一个数，判断他是否能被3整除，并输出相应的信息。
Program judgeImplicit noneInteger :: n,mRead*,nM=mod(n,3)Select case(m) IF (M= =0) THENCase (0)Print*,’yes’Print*,’YES’Case default ELSEPrint*,’no’Print*,’NO’End select END IFEnd program judge例4、判断一个整数N是否为素数PROGRAM primeImplicit noneInteger ::n,I,mRead*,nM= sqrt(real(n))Do I=2,mIf(mod(n,i)= =0) exitEnd doIf (I>m) thenPrint*,’yes’ElsePrin t*,’no’end ifend program prime例5、求N的阶乘PROGRAM example_5Implicit noneInteger::n,I=0,fac=1Read*,nDo while (I<7)I=I+1Fac=fac*IEnd doEnd program example_5例6、求出全部的水仙花数。
Fortran模拟试卷1-8
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试题_4_
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 。
FORTRAN90考试笔试题1
FORTRAN90考试笔试题1FORTRAN90试题(A)答案请写在答题部分A.试题部分⼀、单项选择(每题2分，共40分)1、下列标识符中不能作为FORTRAN90的合法变量名的是__1___.A)A_1 B) A1 C) A1A D) A+12、表达式1+SQRT(B*B－4.0*A*C)*ABS(X)<3E－5值的类型为: __2___.A)逻辑型B)整型C)实型D)字符型3、下列DATA语句中正确的是 __3___.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.0/4、通过下⾯的赋值，字符变量LINE的值是 4 。
表⽰空格。
CHARACTER(LEN=4)::LINELINE=’10’A) 10 B) 1000 C) ‘10’ D) 105、设M=2000,为了在屏幕上输出□□***2000*** (其中□表⽰空格)，则应使⽤的格式输出语句为 __5___.A) WRITE(*,10)M10 FORMAT(2X,’***’,I4,’***’)B) WRITE(*,10)M10 FORMAT(3X,’***’,M,’***’)C) WRITE(*,10)M10 FORMAT(3X,’***’,I4,’***’)D) WRITE(*,10)M10 FORMAT(1X,’2X’,17,’***’)6、若有格式输⼊语句如下:INTEGER A(4)READ(*,2O)A20 FORMAT(4I2)如果在执⾏时从键盘输⼊□1□23□456□789↙ (其中□为空格, ↙为回车键)则读⼊后的A(3)值为 __6___.A)56 B) 456 C) 34 D) 37、执⾏下列赋值语句R=25**（6/12）后，变量R的值为_7___：A）5.0 B)0 C)1 D)1.08、下列有关数组的说法正确的是__8___.A) 数组定义语句只能定义⼀维或⼆维数组B) 数组元素下标不能出现负值C) 在赋值语句中出现的A(3)肯定是数组元素D) 程序中使⽤的数组必须进⾏说明9、下列说法中正确的是__9___.A)输⼊字符串常量时,其长度必须和所定义的变量长度相等B)字符串常量在⽤键盘输⼊时,两边必须⽤撇号C)两个字符型变量⽐较,该两个变量的长度必须⼀致D)定义字符型变量⽤CHARACTER语句10、在下⾯的模块定义中，错误的语句是__10___.A) MOUDLE APIB) REAL::PIC) PI=3.14D) END MOUDLE API11、阅读下列FORTRAN90程序：DO I=4，2，-1A=1.0DO J=I，4，2A=A+1.0ENDDOENDDOWRITE(*，*)AEND运⾏上述程序后，输出的A值为 __11___.A) 5.0 B) 4.0 C) 3.0 D) 2.012、执⾏READ*,A,B,C语句时键⼊2*3,4,5，则变量A,B,C的值依次是__12___.A)2,3,4 B) 3,4,5 C)6,3,4 D)3,3,413、在过程调⽤中当虚参是数组时，对应的实参应该是同⼀类型的数组或__13___.A)常量B)变量C)数组元素D)函数名14、阅读下列程序INTEGER A(3,3)DATA A/1,2,3,4,5,6,7,8,9/WRITE(*,100)((A(K,J),J=1,K),K=1,3)100 FORMAT(1X,10I2)END程序执⾏后, 输出的结果为__14___.A)□1□4□5□7□8□9 B) □1□2□3□4□5□7C)□1□4□7□2□5□3 D) □1□2□5□3□6□915、阅读下列FORTRAN90程序:READ(*,*)AB=0.0IF(A>1.0)B=B+2.0IF(A>2.0)B=B-1.0WRITE(*,*)BEND在执⾏时,从键盘输⼊5.0↙ (其中↙为回车键)则输出的B值为__15___.A) 2.0 B) -1.0 C) 0.0 D) 1.016、阅读下列程序INTEGER:: A(3,3) A(:,1)=(/1,4,7/) A(:,2)=(/2,5,8/) A(:,3)=(/3,6,9/) WRITE(*,10)(A(I,I),I=1,3) 10 FORMAT(1X,3I2) END 程序执⾏后, 输出的结果为__16___. A) □1□4□7 B) □2□5□8 C) □3□6□9 D) □1□5□917、M 是由INTEGER,DIMENSION(10)::M 语句定义的⼀个⼀维数组，则数组⽚断M(2:8:3)包含的三个元素是__17___.A) M(2),M(5),M(8) B) M(2),M(8),M(3) C) M(2),M(3),M(4 ) D) M(5),M(6),M(7)18、下⾯程序：READ *, KWRITE(*, 100) K 100 FORMAT(I5) END在运⾏时输⼊值12345后，其输出结果为__18___.A) 12345 B) 1234 C)2345 D)01234 19、阅读下列程序 READ*,N SUM=1.0 F=1 K=1 DO WHILE(KA)K K N K 1)1(1111--=∑-+B) K KN K 1)1(111∑-=-+C) KK NK 1)1(111-=∑-+D) KKNK 1)1(11∑=-+20、阅读下列程序CHARACTER(LEN=5) STRREAD(*,100)STRWRITE(*,200)STR100 FORMAT(A9)200 FORMAT(A4)END如果在执⾏时由键盘输⼊FORTRAN90输出的结果为__20___.A)FORTR B)ORTR C)RAN9 D)AN9⼆、阅读下列程序，写出程序的运⾏结果(每题6分，共24分)程序1：PROGRAM EXAM2IMPLICIT NONECHARACTER(LEN=20)::LINEINTEGER :: I, N=5,M=10DO I=1,NLINE=' 'LINE(M+I: M+I)='#'PRINT*,LINEENDDOEND程序2：X=1.0Y=2.0CALL SUB(X,Y,Z,3.0)WRITE(*,100)X,Y,Z100 FORMAT(1X,F3.1)ENDSUBROUTINE SUB(A,B,X,Z)A=A+1B=B+2.0Y=1.0X=Y+ZEND程序3：PROGRAM EXAM3IMPLICIT NONEINTEGER:: I,MAXI,NUM=5INTEGER,DIMENSION(:),ALLOCATABLE:: ARRAY_LISTALLOCATE(ARRAY_LIST(NUM))ARRAY_LIST=(/20,10,30,50,40/)MAXI=1DO I=2,NUMIF(ARRAY_LIST(I)>ARRAY_LIST(MAXI))MAXI=I ENDDOWRITE(*,*)MAXI,ARRAY_LIST(MAXI) DEALLOCATE(ARRAY_LIST) END程序4： TYPE SSREAL X CHARACTER(LEN=5) STR INTEGER N END TYPE TYPE(SS)::A READ*,A WRITE(*,100)A100 FORMAT(1X,F4.2,A6,I3) END 如果在执⾏时由键盘输⼊ 34.5,’****’,23三、阅读下列程序，在空⽩处填写适当的内容(每空2分，共20分) 1．下列FORTRAN 程序的功能是从键盘输⼊⼀个整数,当该整数能被5整除时输出“YES ”,否则输出“NO ”。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
一．选择题1．语句OPEN（3，FILE=‘ABC’）打开的是文件。
A．有格式顺序存取B．无格式顺序存取C．有格式直接存取D．无格式直接存取2．调用子程序时，假设实参可以是常数、内在函数及表达式，其相应形参是。
A．变量名B．数组名C．过程名D．*3．下列数据中，不符合FORTRAN90常量表示的是。
A．-25.6 B．3.2344D0 C．’BOOT’’=’D．TRUE4．圆心在原点的两个同心圆,半径分别为2和4。
描述点(X,Y)在小圆外，大圆内(包括在两圆周上)的表达式是。
A．ABS（X）<=4.0 .AND. ABS(Y)>=2.0 B．2.0>=SQRT(X*X+Y*Y)<=4.0C．X*X+Y*Y<=16.0 .AND. X*X+Y*Y>=4.0 D．（X.OR.Y）>=2.0 .AND. (X .OR.Y)<=4.05.下列字符串中可用作FORTRAN90变量名的是。
A．ABC B. A-BCD C. 2ABC D. AB.C6.下列数据中不符合FORTRAN90常数表示的为。
A. 21.50B. +0.0D0C. .TRUE.D. $10007.表达式：－B+SQRT(B*B-4.0*A*C).LE.3E-5值的类型是。
A. 逻辑型B. 整型C. 实型D. 字符型8.按隐含约定，设X=2.5,Y=1.0,Z=3.0, 执行赋值语句I=X+Y/Z后I的值为。
A. 2.0B. 2C. 3D. 3.09.下列语句中那个语句是错误的是。
A. READ(*,*)XB. READ*,XC. PRINT(*,*)XD. PRINT *,X10.说明语句REAL A(1:2,-1:10)说明数组A的元素个数为。
A. 11B. 12C. 22D. 2411.M能被N整除的FORTRAN表达式为。
A. (M/M)=0B. (M MOD N).EQ.0C. (M/N).EQ.0D. MOD(M,N).EQ.012．以下关于FORTRAN90中有关虚参、实参的说法中，不正确的是。
A．实参和虚参个数一定要相等B．实参和虚参个数可以不相等C．虚参可以用数组 D．实参可以用数组13. 下列关于FORTRAN 90源程序编辑规则的叙述之中,正确的是。
A. 任何以符号“!”开头的内容均是注释行。
B. 主程序第一行必须是PROGRAM语句。
C. 要实现有格式输入输出，必须有FORMAT语句。
D. 每个子程序中必须有一个RETURN语句。
14. 阅读下列程序F=1.0DO J=3,7,2DO K=J-1,JF =F*KENDDOENDDOWRITE(*,'(I3,F8.1)') J,FEND程序运行结果是。
A. 3 6.0B. 5 120.0C. 9 5040.0D. 9362880.015. 阅读下列程序A=3.5CALL suba(A,A,A)WRITE(*,'(F4.1)') ACONTAINSSUBROUTINE suba(X,Y,Z)Y=Y-2.0; Z=Z+XEND SUBROUTINEEND程序运行的结果是。
A. 7.0B. 5.0C. 3.0D. 1.516. 阅读下列程序CHARACTER A*4,B*5,C*4DATA A,B,C/'BIG’,'MIDDLE','SMALL'/WRITE(*,20) A,B,C20 FORMAT(1X,A2,A3,A4)END程序运行结果是。
A. BIGMIDDLEB. *********C. BIGMIDSMAD. BIMIDSMAL17. 阅读下列程序FUN(c,d)=a*c+b/dDATA a,b/1.0,-1.0/WRITE(*,'(F4.1)')FUN(a,b)-FUN(b,a)END程序运行结果是。
A. 0.0B. 4.0C. 2.OD. 3.O18. 阅读下列程序READ(*,500)R,WWRITE(*,500)R,W500 FORMAT(F5.2,F5.3)END程序运行时输入初始值01234567899,结果显示的是。
A. 12.34*****B. 12.3456.789C. **********D. 123.4567.89919. 阅读下列程序DIMENSION M(3,3)DATA M/1,2,3,4,5,6,7,8,9/WRITE(*,100) (M(3,J),J=1,3)100 FORMAT(3I2)END程序运行结果是。
A. 2 5 8B. 3 6 9C. 4 5 6D. 7 8 920. 阅读下列程序DIMENSION S(3)DATA S/1.0,2.0,3.0/WRITE(*,*) LA(3,S)CONTAINSFUNCTION LA(N,X)DIMENSION X(N)LA=0L=2DO I=1,NLA=LA+X(I)/LENDDOEND FUNCTIONEND程序运行结果是。
A. 1.0000000B. 2.0000000C. 1D. 221. 阅读下列程序DIMENSION N(2)DO I=1,2N(I)=0ENDDOK=2DO I=1,KDO J=1,KN(J)=N(I)+1ENDDOENDDOWRITE(*,100),N100 FORMAT(I3,I3)END程序运行结果是。
A. 2 3B. 3 3C. 2 2D. 3 222. 阅读下列程序INTEGER A(3,3)DATA A/9,8,7,6,5,4,3,2,1/WRITE(*,10)((A(M,N),N=1,M),M=1,3)10 FORMAT(I2/,2I2/,3I2)END程序运行结果是。
A.9 6 3B.9 8 7C.9D.95 2 5 4 8 56 51 1 7 4 1 32 123．CHARACTER*4 A,B,C*5DATA A,B,C/'YOUR','BOYS','GIRLS'/WRITE(*,'(1X,A4,A5,A6,A1)')A,B,C,'!'END程序运行结果是。
A. YOURBOYSGIRLS!B. YOUR凵BOYS凵GIRLS!C. YOUR凵BOYSGIRLS!D. YOURBOYS凵GIRLS!24．FORTRAN 90规定程序中名称的长度不能超过个字符。
A．8 B．15 C．31 D．6325．关于FORTRAN 90程序单元，以下四种说法中正确的是。
A．一个FORTRAN 90程序由多个程序单元组成，其中有一个且只能有一个主程序单元B．一个FORTRAN 90程序由多个程序单元组成，其中有一个且只能有一个模块单元C．一个FORTRAN 90程序允许有多个程序单元，但每类程序单元只能有一个D．一个FORTRAN 90程序允许有多个程序单元，但主程序单元和模块单元只能有一个26. 下列表达式中，正确的______________。
A. ∣A*x+B*y+C*z∣B．‘A’<= ch <= ‘Z’C．X>100 = = .TRUE. D．‘HAPPY ’+‘NEW ’+‘YEAR.’27. FORTRAN 90规定，变量类型声明的优先顺序是。
A．隐含约定（I-N规则）、IMPLICIT声明、类型声明B．类型声明、隐含约定（I-N规则）、IMPLICIT声明C．类型声明、IMPLICIT声明、隐含约定（I-N规则）D．IMPLICIT声明、类型声明、隐含约定（I-N规则）28. FORTRAN90源程序书写语句时采用英文字母大小写的最正确说法是。
A.必须全部用大写B.必须全部用小写C.关键字必须大写,其余必须用小写D.关键字最好用大写,其余可用大写可用小写29.以下FORTRAN90的独立程序单位中，不可包含有可执行语句的是。
A.主程序单位 B.函数子程序单位 C.子例行子程序单位 D.数据块子程序单位30.若数组说明浯句为:REAL,DIMENSION(-3:3,-2:2,-1:1):: a则数组元素s(2，1，0)是第个元素。
A. 60B. 61C. 62D. 6331.若说明语句为: COMPLEX(KIND=8)::c=(3.23l,2.445)REAL(KIND=8),PARAMETER::e=2.818281828459045则下述说法中不正确的是。
A. c和e的类别参数相同D. c为双精度复型,e为双精度实型C. c和e在程序内都可重新赋值D. c为普通变量,可重新赋值。
e具参数属性,程序内不可重新赋值32．数组声明语句为：INTEGER，DIMENSION(-5:-1,-3:3,11:15) ：：num,数组元素num(-2,1,13)是存储结构中第个元素。
A．70 B．85 C．90 D．9433．指出下列符号中，合法的FORTRAN90变量名是。
①shanghai ②gh3.5 ③sum 1 ④#3r ⑤abc3d ⑥32 ⑦A m ⑧a-1A. ①②③④ B．⑤⑥⑦⑧ C. ①③⑤⑦ D．②④⑥⑧34．表达式10／4／2.0的值是。
A，整数1 B．实数1．0 C．实数1．25 D．实数L 335. 设有程序片段： CHARACTER(len=10) ：：a=’abcdefghij’CHARACTER(1en=5) ：：cC=a(:5)； a(:5)=a(3:7)； a(3:7)=cPRINT *，a执行后，输出结果是。
A．cdabcdehij B．jfghiabcde C．fghiiabcde D．abcdefghij36. 下列程序片段执行后，输出的结果是。
n=0DO k=5，1，-1m=0DO j=k，5n=k+j; m=m+k*j+nENDDOENDDOPRINT *，mA． 33 B． 34 C．35 D．3637.FORTRAN90源程序书写风格的正确说法是。
A. 自由格式,程序从任一列开始书写,但一行只能写一个语句B. 自由格式,程序从任一列开始书写,一行可写多个语句,语句间用分号隔开C. 必须是固定格式,程序从第7列开始写,但一行只能写一个语句D. 必须是固定格式,程序从第7列开始写,一行可写多个语句,语句间用分号隔开38.数组说明语句为:REAL,DIMENSION(-1:1,-2:2,-3:3)::a数组元素以a(1,1,1)是第个元素。
A. 71B. 72C. 73D. 7439.说明语句为:CHARACTER(len=5)::kharCHARACTER(len=10),PARAMETER::line='Vive Chine'下述语句中不正确的是。