六、控制語句

　　一般情況下, FORTRAN程序是按語句順序執(zhí)行的,但需要時,可以改變這種順序。 這種改變可以通過各種控制轉移語句、邏輯條件語句等來實現。

　　(一)轉移語句

　　1.無條件轉移語句

　　無條件轉移語句的一般形式為:

　　GOTO n

　　當程序流程到達GOTO語句時,隨后就轉向語句標號為n的語句。標號為n的語句必須 是可執(zhí)行語句,但它在程序中的排列位置,可以在引導到它的GOTO語句之后,也可以 在該GOTO 語句之前。無條件轉移語句常和其他控制語句結合起來使用。

　　2.算術條件轉移語句轉自環(huán) 球 網校edu24ol.com轉自環(huán) 球 網校edu24ol.com轉自環(huán) 球 網校edu24ol.com

　　算術條件轉移語句的一般形式為:

　　IF (e) nl, n2, n3

　　其中, e必須是算術表達式,當表達式運算結果e<0時,程序轉向標號為n1的語句;當 e=0時,轉向標號為n2的語句;當e>0時,轉向標號為n3的語句。

　　例如,計算邊長為B的正方形中挖去半徑為R的圓后的面積,若B<2R,則給出相 關信息。該問題的FORTRAN程序可用別遼條件轉移語句編寫如下。

　　C Computation of area.

　　READ*B.R

　　IF (B-2*R) 5, 15, 15

　　5 WRITE (*, 10)

　　10 FORMAT ('Error message: B less than 2*R‘)

　　GOTO 20

　　15 AREA=B*B-3.14159*R*R

　　WRITE *AREA

　　20 CONTINUE

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

　　本例中,在算術條件轉移語句的第1個分支后,使用了GOTO語句;倘沒有此語句,則 程序按順序仍會執(zhí)行標號為15的語句,從而得出不正確的結果。

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

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