09結(jié)構(gòu)工程師考試(計(jì)算機(jī)應(yīng)用基礎(chǔ))備考講義(13)

　　3.計(jì)算轉(zhuǎn)移語(yǔ)句

　　計(jì)算轉(zhuǎn)移語(yǔ)句的一般形式為:

　　GOTO (n1, n2,……, nm), e

　　其中, ni (i = 1, 2,……, m)是被轉(zhuǎn)向的語(yǔ)句標(biāo)號(hào),共m個(gè); e是一個(gè)整型算術(shù)表達(dá) 式,其值不得小于1且不得大于m。當(dāng)e的值等于1時(shí),程序轉(zhuǎn)向標(biāo)號(hào)nl的語(yǔ)句,當(dāng)e 的值等于2時(shí)轉(zhuǎn)向標(biāo)號(hào)n2的話句,當(dāng)e的值為m時(shí)轉(zhuǎn)向標(biāo)號(hào)為nm的語(yǔ)句。整型算術(shù)表 達(dá)式e前的逗號(hào)可以省略。計(jì)算轉(zhuǎn)移語(yǔ)句通常也和GOTO語(yǔ)句結(jié)合起來使用。 例如,有如下一個(gè)程序:

　　READ*,M

　　GOTO (20, 30, 40, 50) M

　　20 N=M GOTO 60

　　30 N=M*2 GOTO 60

　　40 N=M*3 GOTO 60

　　50 N=M*4

　　60 WRITE*,N

　　END轉(zhuǎn)自環(huán) 球 網(wǎng)校edu24ol.com轉(zhuǎn)自環(huán) 球 網(wǎng)校edu24ol.com轉(zhuǎn)自環(huán) 球 網(wǎng)校edu24ol.com

　　程序運(yùn)行時(shí),若輸入1,則轉(zhuǎn)向標(biāo)號(hào)為20的語(yǔ)句,x的值為1 ;若輸入2,則轉(zhuǎn)向標(biāo)號(hào)為 30的語(yǔ)句,x的值為4;輸入3,轉(zhuǎn)向標(biāo)號(hào)為40的語(yǔ)句,x的值為9,輸入4,轉(zhuǎn)向標(biāo)號(hào) 為50的語(yǔ)句,x的值為16

　　(二)邏輯條件語(yǔ)句

　　1.邏輯IF語(yǔ)句

　　邏輯IF 語(yǔ)句用來實(shí)現(xiàn)選擇結(jié)構(gòu)。它的一般形式為:

　　IF (邏輯表達(dá)式)內(nèi)嵌語(yǔ)句

　　其中內(nèi)嵌語(yǔ)句是單獨(dú)的一個(gè)可執(zhí)行語(yǔ)句。邏輯IF語(yǔ)句執(zhí)行時(shí),首先計(jì)算邏輯表達(dá)式的值, 如果邏輯表達(dá)式的值為"真",則執(zhí)行內(nèi)嵌語(yǔ)句,若內(nèi)嵌語(yǔ)句非轉(zhuǎn)移語(yǔ)句,則執(zhí)行該語(yǔ)句 后繼續(xù)按順序往下執(zhí)行,若內(nèi)嵌語(yǔ)句是轉(zhuǎn)移語(yǔ)句,則轉(zhuǎn)向指定的語(yǔ)句;如果邏輯表達(dá)式的 值為"假",則不執(zhí)行內(nèi)嵌語(yǔ)句,而直接執(zhí)行該語(yǔ)句后面的語(yǔ)句。

　　例如,從鍵盤讀入一個(gè)代表百分制成績(jī)的數(shù)據(jù),如果數(shù)據(jù)在90-100之間就輸出 ‘Excellent' ,在80-89之間輸出‘Good' ,在60-79之間輸出‘Pass' ,在60以下則輸出 ‘Not pass' 。其程序可以如下編寫:

　　READ (*.*) IPOINT

　　IF (IPOINT. GT .100. OR. IPOINT. LT. 0) WRITE (*,*) 'DATA ERROR'

　　IF (IPOINT.GE.90.AND. IPOINT. LE.100) WRITE (*.*) 'Excellent'

　　IF (IPOINT.GE.80.AND.IPOINT.LE89) WRITE ( * . *'Good'

　　IF (IPOINT.GE.60.AND. IPOINT. LE. 79) WRITE (*.*) 'Pass'

　　IF (IPOINT.GE.0.AND. IPOINT. LE.59) WRITE (*.*) 'Not Pass'

　　END轉(zhuǎn)自環(huán) 球 網(wǎng)校edu24ol.com轉(zhuǎn)自環(huán) 球 網(wǎng)校edu24ol.com轉(zhuǎn)自環(huán) 球 網(wǎng)校edu24ol.com

2010年注冊(cè)結(jié)構(gòu)工程師考試報(bào)名時(shí)間信息匯總
 結(jié)構(gòu)工程師基礎(chǔ)科目(一)考試普通化學(xué)練習(xí)題匯總
2010年結(jié)構(gòu)師考試9月18、19日

更多信息請(qǐng)?jiān)L問：結(jié)構(gòu)工程師頻道    結(jié)構(gòu)工程師論壇