1、計算機(jī)程序設(shè)計語言 （FORTRAN語言 ）（ 總分： 36.00 ，做題時間：90 分鐘 )（ 總題數(shù)： 36，分?jǐn)?shù)： 36.00）1. 編譯程序能將高級語言編寫的源程序轉(zhuǎn)換成 （ ） 。 A解釋程序 B 匯編程序 C映象程序 D目標(biāo)程序（分?jǐn)?shù)： 1.00 ）A.B.C.D. 解析：2. 一個完整的 FORTRAN源程序 （ ） 。 A至少包括一個主程序 B至少包括一個主程序和一個子程序 C由一個主程序與一個以上的子程序組成 D由一個主程序與一個子程序組成（分?jǐn)?shù)： 1.00 ）A. B.C.D.解析：3. 語句函數(shù)定義語句在程序內(nèi)合法的位置是（ ）A在程序塊開頭語句之后， END語句之前 B

2、在程序塊開頭語句之后，可執(zhí)行語句之前 C在說明語句之后， END語句之前 D在說明語句之后，可執(zhí)行語句之前（分?jǐn)?shù)： 1.00 ）A.B.C.D. 解析：4. 下列關(guān)于函數(shù)子程序虛實參數(shù)的錯誤說法是（ ） 。A可以沒有形參數(shù) B 虛實結(jié)合的數(shù)組長度可以不同 C實參表與虛參表類型可以不同 D 函數(shù)名可以作為虛參(分?jǐn)?shù)： 1.00 )A.B.C. D. 解析：5. 下列敘述中正確的是 ( ) 。A FORTRAN程序塊中，無名公用語句只能有一個 B FORTRAN子程序中，至少應(yīng)有一個 RETURN語句 C FORTRAN程序塊中，最后一行必須是 END語句D FORTRAN程序塊中，必須有變量說明

3、語句(分?jǐn)?shù)： 1.00 )A.B.C. D. 解析：6. 運行下面的程序時得不到所需的結(jié)果，其主要原因是( )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 CONTINUEEND A沒有給 X(11) 賦初值 B 發(fā)生除以零的情況 C發(fā)生負(fù)數(shù)開平方的情況 D 循環(huán)參數(shù)設(shè)置錯誤(分?jǐn)?shù)： 1.00 )A.B.C.D. 解析：7. 下列數(shù)據(jù)中，不符合 FORTRAN常量表示法的是 ( ) 。 A -25.6 B 2.758D3 C

4、 'FOOT"=' D TRUE(分?jǐn)?shù)： 1.00 )A.B.C.D. 解析：8. 有一段說明語句如下：DIMENSION A(5) ， B(5)EQUIVALENCE(A(3) ，B(4) )說明語句 EQUIVALENCE(A(3) ，B(4) ) 在程序中的作用是 ( ) A用于在數(shù)組 A 和 B 之間傳遞數(shù)據(jù)B說明數(shù)組 A和 B 是同一個數(shù)組C說明數(shù)組 A和 B共用相同的存儲單元D說明數(shù)組 A和 B的部分元素共用相同的存儲單元(分?jǐn)?shù)： 1.00 )A.B. C.C. 解析：9. 在數(shù)據(jù)塊子程序中 ( ) 。A只能給無名公用區(qū)中的成員賦初值 B只能給有名公用區(qū)中

5、的成員賦初值C不分有名或無名，凡是公用區(qū)成員皆可賦初值 D只能給公用區(qū)中的數(shù)組賦初值(分?jǐn)?shù)： 1.00 )A.B.C.D. 解析：10. 下列語句函數(shù)的定義中，正確的是 ( ) 。AFUNCTION(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分?jǐn)?shù)： 1.00 )A.B. C.D.解析：11. 對任意輸入的 X，下列程序執(zhí)行后 K的值為 ( ) 。 READ(*， *) XK=SIN(X)WRITE(*， *) KENDA在區(qū)

6、間 -1 ，1 中的一個值 B 一定等于 0C在區(qū)間 (-1 ，1) 中的一個值 D K=0或 K=1或 K=-1（分?jǐn)?shù)： 1.00 ）A. B.C.D.解析：12. 設(shè)有格式輸入語句如下： READ（*， * ，10） X10 FORMAT（1X， F5.2） 能使變量 X的值為 2.63 的鍵盤輸入為 （ ） 。A 22.6300 B 002630 C2.6300 D 263000（分?jǐn)?shù)： 1.00 ）A. B.C.D.解析：13. 當(dāng)輸入 1，2，3，4 下列程序執(zhí)行后的輸出結(jié)果為 （ ）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（分?jǐn)?shù)： 1.00 ）A.B. C.C. 解析：14. 閱讀下列 FORTRAN程序： DO I=1， 5 SUM=SUM+I ENDDO WRITE（*， *） SUM END 上述程序運行后，輸出結(jié)果是 （ ） A15 B 15.0 C 不確定 D0(分?jǐn)?shù)： 1.00 )A.B.C.D. 解析：15. 閱讀下列 FORTRAN程序： S(X)=2*X*X-Y+1.0 DATA A， B，Y/3*2.0/ P=S(A)*S(B-A)4-S(Y)-S(B) WR

8、ITE(*， *) P END 上述程序運行后，輸出的 P值為( ) A9.0 B -9.0 C 7.0 D -7.0(分?jǐn)?shù)： 1.00 )A. B.C.B. 解析：16. 下列程序執(zhí)行后的輸出結(jié)果為 ( ) CHARACTER *6 S S='ABCDEF CALL SS(S) ENDSUBROUTINE SS(S1) CHARACTER S1*3 WRITE(*， *) S1 ENDAABC BBC CCDE DDEF(分?jǐn)?shù)： 1.00 )A.B.C. D. 解析：17. 下列程序的執(zhí)行結(jié)果 K是( ) K=0DO 10 I=1 ， 2DO 10 J=I ， 210 K=K+I/J

9、WRITE(*，*)KENDA0 B2 C2.5 D 1（分?jǐn)?shù)： 1.00 ）A.B.C. D.解析：18. 下列關(guān)于子例行子程序虛實參數(shù)的正確說法是（ ） 。A應(yīng)至少有一個形參數(shù) B 數(shù)組元素可以作為實參 C數(shù)組元素可以作為虛參 D 常數(shù)可以作為虛參（分?jǐn)?shù)： 1.00 ）A.B. C.D.解析：19. 當(dāng)輸入 150 時，下列程序執(zhí)行后的輸出結(jié)果為 （ ） 。 READ（*， *） XY=0.0Y=1.0Y=2.0ELSEY=3.0END IFWRITE（*， *） YENDA0.0 B 1.0 C 2.0 D 3.0（分?jǐn)?shù)： 1.00 ）A.B. C.D.解析：20. 當(dāng)輸入 1，2，3，

10、4，5，6 下列程序執(zhí)行后的輸出結(jié)果為 DIMENSION A（2， 3）READ（*， *） ACALL SS1（A）ENDSUBROUTINE SS1（B）DIMENSION B（3， 2）WRITE（*，*） B（3 ， 1）ENDA2 B3 C4 D5（分?jǐn)?shù)： 1.00 ）A.B.C.D. 解析：21. 下列程序執(zhí)行后的輸出結(jié)果為 （ ） 。 F1（X）=2.0/（1.0+X） F2（Y）=F1（Y）*Y+1.0 A=F1（1.0）+F2（1.0） WRITE（*， 10） A 10 FORMAT（IX， E8.2） ENDA 3.00 B 3.0 C 3.00E+00 D 0.30E

11、+01（分?jǐn)?shù)： 1.00 ）A. B.C.B. 解析：22. 閱讀下列 FORTRAN程序： S=1.0DO 100 K=3， 1，-1 DO 100 N=-1 ，-3 100 S=2*S WRITE（*， *） S END 運行上述程序后，輸出的 S值為（ ） A1.0 B 8.0 C 512.0 D 4.0（分?jǐn)?shù)： 1.00 ）A.B.C. D. 解析：23. 閱讀下列 FORTRAN程序： INTEGER A（4， 5） DATA A/5*1 ， 5*2 ，5*3 ，5*4/ M=0 DO 10 K=1 ，4 10 M=M+A（K， K+1） WRITE（*， *） MEND執(zhí)行上述程序

12、后，輸出的 M值為( )A8 B9 C10 D11（分?jǐn)?shù)： 1.00 ）A.B.C. D. 解析：24. 閱讀下列 FORTRAN程序： INTEGER M（3， 3） DATA M/1，2，3，4，5，6，7，8， 9/ DO 10 1=1 ，3 WRITE（*，100） （M（I ，J） ， J=1，I） 10 CONTINUE 10 FORMAT （1X， 312） END 上述程序執(zhí)行后，輸出結(jié)果是 （ ） 。 A1 4 7 2 5 8 3 6 9 B1 2 3 4 5 6 7 8 9 C1 2 5 3 6 9 D1 4 5 7 8 9(分?jǐn)?shù)： 1.00 )A. B.C.D.解析：25

13、. 定義一個長度為 10 的一維整型數(shù)組 M，并且要求分別給數(shù)組元素賦值為M(K)=K+1 ，但 M(10)=1 。下列各程序段中錯誤的是 ( ) 。A DIMENSION M(10)M(10)=1DO 10 K=1 ，1010 M(K)=K+1B DIMENSION 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(分?jǐn)?shù)： 1.00 )A.B.C. D.解析：26. 閱讀下列 F

14、ORTRAN程序：M=3DO K=1， MM=5WRITE(*， *) K ， MENDDOEND 上述程序的運行結(jié)果是 ( )A1 52 53 54 55 5B1 52 53 5C編譯出錯，不能運行D1 32 33 3(分?jǐn)?shù)： 1.00 )A.B.C. D.解析：27. 閱讀下列 FORTRAN程序： LOGICAL P，QREAD(*， 100)P ，Q100 FORMAT(2L4)F(P) THENY=1.0ELSE IF(Q) THENY=2.0Y=3.0ELSEY=0.0VENDIFWRITE(*， *) YEND在執(zhí)行上述程序時，由鍵盤輸入 FABDTXY，Z最后輸出的 Y值為(

15、)A0.0 B 1.0 C 2.0 D 3.0(分?jǐn)?shù)： 1.00 )A.B. C.D.解析：28. 閱讀下列 FORTRAN程序：PARAMETER(L=3)INTEGER N(L)DATA N/3*0/DO 20 I=1 ， LDO 20 J=1 ， LN(J)=N(1) +120 CONTINUEWRITE(*， *) N(L)END 上述程序運行后，輸出結(jié)果是 ( ) 。A3 B5 C7 D9(分?jǐn)?shù)： 1.00 )A.B.C.D. 解析：29. 閱讀下列 FORTRAN程序： X=1.0Y=2.0CALL SUB(X， Y，Z，3.0) WRITE(*，100) X ，Y， Z 100

16、FORMAT(1X， 13.1) ENDSUBROUTINE SUB(，AB，X， Z)A=A+1B=B+2Y=1.0X=Y+ZEND 執(zhí)行上述程序后，輸出的結(jié)果為 ( )A2.05.04.0B4.01.02.0C4.02.04.0D2.04.04.0(分?jǐn)?shù)： 1.00 )A.B.C. D. 解析：30. 下列程序執(zhí)行后的輸出結(jié)果為 ( ) K=0DO 10 1=1 ，6，2 DO 10 J=I ， 6， 3 10 CONTINUE WRITE(*， *) K ENDA18 B30 C25 D36(分?jǐn)?shù)： 1.00 )A.B.C.D. 解析：31. 閱讀下列 FORTRAN程序：CHARACT

17、ER A*5A='ABCDE'CALL S(A)ENDSUBROUTINE S(X)CHARACTER X*3WRITE(*，*)XEND 執(zhí)行上述程序后，輸出的 X值為( ) A'AB B DE' CCDE DABC(分?jǐn)?shù)： 1.00 )A. B.C.B. 解析：32. 閱讀下列 FORTRAN程序： INTEGER S(2， 4) ， A(2) DATA S/4*1 ， 4*2/ CALL SUB(S， 2，4，A) M=A(1) -A(2) WRITE(*， *) M END SUBROUTINE SUB(，SN，K， A) INTEGER S(N，K)

18、，A(N) DO 20 I=1 ， N A(I)=0 DO 10 J=1 ， K 10 A(I)=A(I)+S(I ，J) A(I)=A(I)/K 20 CONTINUE END 執(zhí)行上述程序后，輸出的 M值為( ) A0 B1 C2 D3(分?jǐn)?shù)： 1.00 )A.B. C.D.解析：33. 當(dāng)輸入 150H，f1 ，下列程序執(zhí)行后的輸出結(jié)果為 ( ) READ(*， *) XY=0.0Y=1.0Y=2.0ELSEY=3.0END IFWRITE（*，*）YENDA0.0 B 1.0 C 2.0 D 3.0（分?jǐn)?shù)： 1.00 ）A.B.C.D. 解析：34. 閱讀下列 FORTRAN程序：DO 20 K=2 ，5，2S=1.0DO 10 J=K