09結構工程師考試(計算機應用基礎)備考講義(22)

　　4.以下程序段轉自環(huán) 球 網校edu24ol.com轉自環(huán) 球 網校edu24ol.com轉自環(huán) 球 網校edu24ol.com

　　PROGRAM MAIN

　　EXTERNAL FX

　　Y=TX (FX, 3, 2)

　　PRINT *,Y

　　END

　　FUNCTION TX (FUN, A, B)

　　TX= (FUN (A) - FUN (B)) /2.0

　　END

　　FUNCTION FUN (X)

　　FX=X*X

　　END

　　運行的結果為(C) 兩次調用函數，(32-22)/2=2.5

　　(A) 9 (B) 4 (C) 2.5 (D) 6.5

　　5.對以下程序段

　　EXTERNAL LENGTH

　　CHARACHER NAME * 2

　　READ (*,*) NAME, SCORE

　　CALL DRAW (NAME, SCORE, LENGTH)

　　END

　　SUBROUTINE DRAW (N, S, F)

　　CHARACTER N*2, LINE*20

　　INTEGER F

　　M=F (S)

　　DO 10 1= 1, M

　　LINE (I: I) =’ *’

　　10 CONTINUE

　　WRITE (*, 100) N, LINE

　　100 FORMAT (1X, A2, A6)

　　END

　　FUNCTION LENGTH (X)

　　LENGTH = INT (X) /100

　　END轉自環(huán) 球 網校edu24ol.com轉自環(huán) 球 網校edu24ol.com轉自環(huán) 球 網校edu24ol.com

　　若輸入, D', 356.8,則程序運行結果為(A)

　　(A) D* * *; (B) D* * * * ;(C) D356.8 (D)D3

　　6.以下程序段

　　DIMENSION A (4)

　　READ*,A

　　I=1

　　10 J = I + 1

　　20 IF (A (I) . LT. A (J)) THEN

　　T=A (J)

　　A (J)=A (I)

　　A (I)=T

　　ENDIF

　　J=J+l

　　IF (J.LE.A) GOTO 20

　　I=I+1

　　IF (1. LE.3) GOTO 10

　　PRINT*, A (4)

　　END

　　若輸入4, 2, 3, 5,則程序運行結果為(B) 相當于把數列從大到小排列，最后5，4，3，2，故選B

　　(A) 4 (B) 2 (C) 3 (D) 5

2010年注冊結構工程師考試報名時間信息匯總
 結構工程師基礎科目(一)考試普通化學練習題匯總
2010年結構師考試9月18、19日

更多信息請訪問：結構工程師頻道    結構工程師論壇