《计算机程序设计语言FORTRAN语言》由会员分享，可在线阅读，更多相关《计算机程序设计语言FORTRAN语言（14页珍藏版）》请在金锄头文库上搜索。
1、计算机程序设计语言（FORTRA语言）（ 总分： 36.00 ，做题时间：90 分钟 )（ 总题数： 36，分数： 36.00）1. 编译程序能将高级语言编写的源程序转换成 （ ） 。A. 解释程序B 汇编程序C 映象程序D 目标程序（分数： 1.00 ）A.B.C.D. V解析：2. 一个完整的FORTRA源程序（）。A. 至少包括一个主程序B. 至少包括一个主程序和一个子程序C. 由一个主程序与一个以上的子程序组成D. 由一个主程序与一个子程序组成（分数： 1.00 ）A. VB.C.D.解析：3. 语句函数定义语句在程序内合法的位置是 （ ）A. 在程序块开头语句之后，END语句之前B.
2、 在程序块开头语句之后，可执行语句之前C. 在说明语句之后，END语句之前D. 在说明语句之后，可执行语句之前（分数： 1.00 ）A.B.C.D. V解析：4. 下列关于函数子程序虚实参数的错误说法是 （ ） 。A. 可以没有形参数B .虚实结合的数组长度可以不同C.实参表与虚参表类型可以不同D .函数名可以作为虚参(分数： 1.00 )A.B.C. VD.解析：5. 下列叙述中正确的是 ( ) 。A. FORTRA程序块中，无名公用语句只能有一个B. FORTRA子程序中，至少应有一个 RETURNS句C. FORTRA程序块中，最后一行必须是END语句D. FORTRA程序块中，必须有变
3、量说明语句(分数： 1.00 )A.B.C. VD.解析：6. 运行下面的程序时得不到所需的结果，其主要原因是 ( )INTEGER X(11)DATA X/9， 8， 7， 6， 5， 4， 3， 2， 1， 0， -1/DO 10 1=1， X(1) ， -1WRITE(*， *)1.0/SQRT(25.0-REAL(X(1) )* * 2)10 CONTINUEENDA. 没有给X(11)赋初值B .发生除以零的情况C. 发生负数开平方的情况D 循环参数设置错误(分数： 1.00 )A.B.C.D. V解析：7. 下列数据中，不符合 FORTRA常量表示法的是()。A. -25.6 B
4、. 2.758D3C. FOOT= D . TRUE(分数： 1.00 )A.B.C.D. V解析：8. 有一段说明语句如下：DIMENSION A(5) ， B(5)EQUIVALENCE(A(3) ，B(4) ) 说明语句 EQUIVALENCE(A(3) ，B(4) ) 在程序中的作用是 ( )A. 用于在数组 A和B之间传递数据B. 说明数组A和B是同一个数组C. 说明数组A和B共用相同的存储单元D. 说明数组A和B的部分元素共用相同的存储单元(分数： 1.00 )A.B. VC.D.解析：9. 在数据块子程序中 ( ) 。A. 只能给无名公用区中的成员赋初值B. 只能给有名公用区中的
5、成员赋初值C. 不分有名或无名，凡是公用区成员皆可赋初值D. 只能给公用区中的数组赋初值(分数： 1.00 )A.B.C.D. V解析：10. 下列语句函数的定义中，正确的是 ( ) 。A. FUNCTION(I， J， K)=I*J+J*J+K*KB. F(X， Y， Q(I)=SIN(X)+COS(Y)+Q(I)C. S(X， Y， Z)=(X+Y+Z)* * 2+S(X*X ， Y， Z)D. F(X， Y)=(X+Y)/X/Y+P分数： 1.00 )A.B. VC.D.解析：11. 对任意输入的X,下列程序执行后 K的值为()。READ(*， *) XK=SIN(X)WRITE(*，
6、*) KENDA. 在区间-1,1中的一个值B .一定等于0C.在区间(-1 , 1)中的一个值 D . K=0或K=1或K=-1（分数： 1.00 ）A. VB.C.D.解析：12. 设有格式输入语句如下： READ（*， * ，10） X10 FORMAT（1X，F5.2）能使变量X的值为2.63的键盘输入为（）。A22.6300 B 002630 C2.6300 D 263000（分数： 1.00 ）A. VB.C.D.解析：13. 当输入 1，2，3，4 下列程序执行后的输出结果为 （ ）DIMENSION A（2，2）READ（*， *） ASUM=0DO 10 I=1 ， 2DO
7、20 J=1 ，210 A（I ， J）=A（I ， J）+I+JWRITE（*，*） A（1 ， 2）ENDA6 B5 C7 D4（分数： 1.00 ）A.B. VC.D.解析：14. 阅读下列FORTRA程序：DO I=1 ， 5 SUM=SUM+I ENDDOWRITE（*，*） SUMEND 上述程序运行后，输出结果是 （ ） A15 B15.0 C 不确定 D0(分数： 1.00 )A.B.C.D. V解析：15. 阅读下列FORTRA程序：S(X)=2*X*X-Y+1.0DATA A，B，Y/3*2.0/P=S(A)*S(B-A)4-S(Y)-S(B)WRITE(*，*) PEND
8、上述程序运行后，输出的 P值为()A9.0 B -9.0 C 7.0 D -7.0(分数： 1.00 )A. VB.C.D.解析：16. 下列程序执行后的输出结果为 ( )CHARACTER *6 SS=ABCDEFCALL SS(S)ENDSUBROUTINE SS(S1)CHARACTER S1*3WRITE(*， *) S1ENDAABC BBC CCDE DDEF(分数： 1.00 )A.B.C. VD.解析：17. 下列程序的执行结果 K是()K=0DO 10 I=1 ， 2DO 10 J=I ， 210 K=K+I/JWRITE(*， *)KENDA0 B2 C2.5 D 1（分数
9、： 1.00 ）A.B.C. VD.解析：18. 下列关于子例行子程序虚实参数的正确说法是 （ ） 。A. 应至少有一个形参数 B 数组元素可以作为实参C. 数组元素可以作为虚参D 常数可以作为虚参（分数： 1.00 ）A.B. VC.D.解析：19. 当输入 150 时，下列程序执行后的输出结果为 （ ） 。 REA D（*， *） XY=0.0IF（X.GT.O.0） THENY=1.0ELSE IF（X.GE.150） THENY=2.0ELSEY=3.0END IFWRITE（*， *） YENDA. 0.0 B . 1.0 C . 2.0 D . 3.0（分数： 1.00 ）A.B.
10、 VC.D.解析：20. 当输入 1，2，3，4，5，6 下列程序执行后的输出结果为 DIMENSION A（2，3）REA D（*， *） ACALL SS1（A）ENDSUBROUTINE SS1（B）DIMENSION B（3，2）WRITE（*，*） B（3 ，1）ENDA2 B3 C4 D5（分数： 1.00 ）A.B.C.D. V解析：21. 下列程序执行后的输出结果为 （ ） 。F1（X）=2.0/（1.0+X）F2（Y）=F1（Y）*Y+1.0A=F1（1.0）+F2（1.0）WRITE（*， 10） A10 FORMAT（IX，E8.2）ENDA3.00 B 3.0 C3.0
11、0E+00 D0.30E+01（分数： 1.00 ）A. VB.C.D.解析：22. 阅读下列FORTRA程序：S=1.0DO 100 K=3， 1，-1DO 100 N =-1 ，-3100 S=2*SWRITE（*，*） SEND运行上述程序后，输出的 S值为（）A1.0 B 8.0 C 512.0 D 4.0（分数： 1.00 ）A.B.C. VD.解析：23. 阅读下列FORTRA程序：INTEGER A（4， 5）DATA A/5*1 ， 5*2， 5*3， 5*4/M=0DO 10 K=1， 410 M=M+A（K， K+1）WRITE（*， *） MEND执行上述程序后，输出的
12、M值为()A8 B9 C10 D11（分数： 1.00 ）A.B.C. VD.解析：24. 阅读下列FORTRA程序：INTEGER M（3， 3）DATA M/1， 2， 3， 4， 5， 6， 7， 8， 9/DO 10 1=1 ， 3WRITE（*， 100） （M（I ， J） ， J=1， I）10 CONTINUE10 FORMAT （1X， 312）END上述程序执行后，输出结果是 （ ） 。A1 4 72 5 83 6 9B1 2 34 5 67 8 9C12 53 6 9D14 57 8 9(分数： 1.00 )A. VB.C.D.解析：25. 定义一个长度为10的一维整型数
13、组 M,并且要求分别给数组元素赋值为M(K)=K+1，但M(10)=1。下列各程序段中错误的是()。ADIMENSION M(10)M(10)=1DO 10 K=1 ， 1010 M(K)=K+1BDIMENSION M(10)M(10)=1DO 10 K=1 ， 910 M(K)=K+1C DIMENSION M(10)M(10)=1DO 10 K=2 ，1010 M(K-1) =KD DIMENSION M(10)DO 10 K=1 ，1010 M(K)=K+1M(10)=1(分数： 1.00 )A.B.C. VD.解析：26. 阅读下列FORTRA程序:M=3DO K=1， MM=5WRITE(*，*) K ，M ENDDOEND 上述程序的运行结果是 ( ) A1 52 53 54 55 5B1 52 53 5C. 编译出错，不能运行D1 32 33 3(分数: 1.00 )A.B.C. VD.解析:27. 阅读下列FORTRA程序:LOGICAL P， QREAD(*， 100)P ， Q100 FORMAT(2L4)F(P) THENY=1.0ELSE IF(Q) THENY=2.0ELSE IF(.NOT.P.OR.Q)THENY=3.0ELSEY=0.0VENDIFWR
