Implicit typing




Yüklə 43.74 Kb.
tarix28.02.2016
ölçüsü43.74 Kb.
期中考要到了,在此提供去年的考題,供大家參考考試的題型期末考就不再提供了。
學號:_________ 姓名:________ (滿分100)
※ 所有選擇及填充題中出現的變數名稱,除了有特別宣告其 type 者外,其餘變數一概以 IMPLICIT TYPING 的方式宣告其 type
選擇題: 每題 2 分,單選
( )1. 下列何者為不正確的表示法?

a. IF (A .GT. B), A = B * C b. IF (A .LT. B) THEN

c. IF (A .LT. B) THEN A = B * C

A = B + C ELSE

ENDIF A = 2 * B

d. IF (A .LT. B) C =A + B ENDIF


( )2.執行下列程式片段後會列印出什麼來?

DO 10 I =5, 5, –2 a. 5 7 9 b. 9

PRINT *,I c. 5 d. 5

10 CONTINUE 7

9

e. –2 f. 以上皆非


( )3. 下列那一 WHILE Loop 不會自動停止?

a. I=11 b. I=11

DO WHILE (I .GT. 0) DO WHILE (I .GT. 0)

I=I–1 I=I–2

END DO END DO

c. I=11 d. I=11

DO WHILE (I .NE.0) DO WHILE (I .GT. 0)

I=I–2 I=I/2

END DO END DO

e. I=11


DO WHILE (I .NE. 0) f. 以上皆非

I=I–1


END DO
( )4. FLAG 與 SWITCH 都是 LOGICAL 的變數,FLAG=.TRUE.,SWITCH=.FALSE.,由下列答案中選擇一個可以滿足 FLAG ______ SWITCH 的答案:

a. .NEQV. b. .NOT. c. .EQ. d. .NE. e. = f. 以上皆非


( )5. 那一種指令一定要有標號?

a. Assignment 指令 b. 宣告指令

c. Do Loop d. IF 指令

e. PRINT * 或 READ * 指令 f. 以上皆非 g. 以上皆對

填充題:(每題 3 分)

______________6. 下列指令中的 M 值會被列印幾次?

DO 10 M = 3, –87, –2

PRINT *,M

10 CONTINUE
______________7. 運算式 I = REAL(35 / 10) + 0.9 的答案是?
______________8. 執行下列程式片段後, J 值為何?

INTEGER K, M, J, Y

K = 25

M = 7


Y = 3

J = MOD(K, M) + REAL(K) / Y


______________9. (–3 ** (3 / 2) + 2 *3) 的運算後的值是?
______________10. 執行下列程式片段後,I 值為何?

I = 6


J =7

IF((I + 4) .GT. (J – I) )THEN

I = J*I

ELSE


I = 2 * J

ENDIF


I = I –2
______________11. 執行下列程式片段後,SUM=?

SUM = 13


DO 10 I = 1, 8, 2

IF (I .GT. 5) THEN

SUM = SUM + I

ELSE


SUM = I * SUM

ENDIF


10 CONTINUE
______________12. 下列程式片段中,I 的值會被列印幾次?

DO 10 I = 3, 102, 3

PRINT *,I

10 CONTINUE

______________13. 下列指令片段中的 J 值會被列印幾次?

DO 10 J = 10, –71, –2

PRINT *,J

10 CONTINUE


______________14. 執行下面程式片段後,列印出來的是什麼?

K =2


DO 5 J = 1, 7

K = K + J

PRINT *, K

5 CONTINUE

______________15. 執行下列程式片段後,M 值為何?

INTEGER K, L, X

REAL M

K = 3


L = 5

X = 4


M = (L / K + K / X) * REAL(L)
______________16. 已知:
IF (SCORE .GT. 60.0) THEN

GRADE = ’D’

ELSE IF (SCORE .GT. 70.0) THEN

GRADE = ’C’

ELSE IF (SCORE .GT. 80.0) THEN

GRADE =’B’

ELSE IF (SCORE .GT. 90.0) THEN

GRADE =’A’

END IF
當 SCORE 為 75 時,GRADE 為何?
______________17.( –2**2**3)的結果為何?(可直接寫數值或用Xy表示,但不能用 Xyz 表示)

(以下每題 4 分)

18. 已知:X、Y、Z 為實數,X = 4.0,Y = 5.0,Z = 3.0,FLAG = .TRUE.

請問下列各式的值是甚麼?

______________ .NOT.FLAG.AND.Y+Z.GE.X–Z+Y

______________ X+Y/Z.GE.5.5

______________ 0.0.GT.X.AND.X.LT.3.5.OR.Z.GT.X

______________FLAG.AND..NOT.Y+Z.GE.X–Z+Y


19. 已知:A、B、C 為整數,A = 9,B = 5,C = 15,FLAG = .TRUE.

請問下列各式的值是甚麼?

______________ .NOT.B.LT.5.EQV.MOD(A, 2).EQ.0

______________ C.EQ.A+B.OR..NOT.FLAG

______________ A.NE.7.AND.C.GE.6.OR.FLAG

______________ .NOT.A.GT.5.OR.C.LE.A+B


20. (10 分)寫一個完整的 FORTRAN 程式來計算並列印這次期中考全班同學成績的平均值。

(規則:1、須用DO LOOP來讀取每位同學的期中考成績,

2、輸入資料的格式:學號,期中考成績,

3、全班同學人數不確定,

4、須加入該有的宣告及提示文字)

21. (18 分)一顆球自100公尺高的平台垂直下墬,球的初始速度為0,請寫一 FORTRAN 程式,

(1)計算這顆球在經過 1秒、2秒、3秒及 4秒時距離地面的高度為何?又

(2)當球撞擊地面時的速度為何?

相關公式: 其中,ν為球在時間 t 的下墬速度,為初始速度,g 為重力加速度,為 9.8m/s2

其中,為球在時間 t 時距離地面的高度,為球的初始高度

(規則:須加入該有的宣告及提示文字)


22. (18分)利用

其中:


等號右邊的第一項為項次0 為項次1為項次2,‧‧‧

項次n =項次n-1 x ,n > 1。


請寫一完整的程式估算sin(X)的值。

(規則:須加入該有的宣告及提示文字)








Verilənlər bazası müəlliflik hüququ ilə müdafiə olunur ©azrefs.org 2016
rəhbərliyinə müraciət

    Ana səhifə