圖3. if…then…else if…then…else if…then……else多支路語句

當(dāng)支路越來越多時,，用嵌套的 if 語句就顯得太繁瑣。如果多支路的選擇是由同一個變量或表達(dá)式的不同結(jié)果值所決定的,，其實也可以用 case 語句來實現(xiàn),，而且更顯簡潔、清晰,。如圖3的例子,，用 case 語句可以改寫成：

圖4.  case多支路語句

程序執(zhí)行中，需要多次規(guī)律性的重復(fù)處理時,，特別是一些數(shù)組的運算處理時,，就需要用到循環(huán)語句。Pascal 語言中循環(huán)語句主要有while…do 語句,、repeat…until 語句和 for…do 語句,。

while…do 語句的基礎(chǔ)格式如下：

while 判斷條件 do 循環(huán)體語句;

每輪循環(huán)之前,，都先進(jìn)行條件判斷，當(dāng)判斷條件滿足時,，則執(zhí)行循環(huán)體,；當(dāng)判斷條件不滿足，則結(jié)束循環(huán),。循環(huán)體可以是單個語句,，也可以是由 begin 和 end；包含起來的程序塊,，但其語句中一定要包含有能改變判斷條件控制變量的語句,，能使判斷條件不滿足，以免形成死循環(huán),。

圖5.  while…do循環(huán)語句

與 while…do 語句相反,，repeat…until 語句是先執(zhí)行循環(huán)體，然后再看判斷條件是否滿足,，如果滿足則結(jié)束循環(huán),，所以循環(huán)體至少會被執(zhí)行一次。循環(huán)體可以是單個語句,，也可以由多個語句組成,，但不一定用 begin 和 end；包含起來,，repeat 和 until 本身具備包含程序塊的功能,。其基礎(chǔ)格式如下：

repeat 循環(huán)體語句 until 判斷條件;

圖6.  repeat…until循環(huán)語句

while…do 語句和 repeat…until 語句中循環(huán)次數(shù)不定，根據(jù)某一條件來決定是否繼續(xù)循環(huán),，如果要進(jìn)行固定次數(shù)的循環(huán),，可以用 for…do 語句：

for 計次變量:=初始值 to 終止值 do 循環(huán)體；

for 計次變量:=初始值 downto 終止值 do 循環(huán)體,；

其中,，計次變量一般為整數(shù)類型（也可以是字符類型）；第一輪循環(huán)時,，計次變量被賦予初始值,，此后每輪循環(huán)計次變量都會遞增（to 關(guān)鍵字）或遞減（downto 關(guān)鍵字）1；如果計次變量沒超過終止值,，則執(zhí)行循環(huán)體,，否則結(jié)束循環(huán)。

循環(huán)體內(nèi)還可以用 continue 和 break 這兩個關(guān)鍵字對循環(huán)做額外的控制,，上述的三種循環(huán)語句內(nèi)都可使用,，一般配合條件語句決定什么情況下要 continue 或 break；continue 起效時,，在該輪次循環(huán)內(nèi),，循環(huán)體里在其后的語句將不再執(zhí)行,，而是立即進(jìn)行下一輪次循環(huán)是否進(jìn)行的條件判斷；break 則直接就此結(jié)束循環(huán),；它們的影響范圍只在它們所處的那一層級的循環(huán)語句,。

圖7. for…do循環(huán)語句

for…do 語句還有一種特殊形式的for…in…do 循環(huán)，本文不再贅述,，感興趣的可以移步Free Pascal wiki了解,。

較為復(fù)雜的運算，可能會用到循環(huán)語句的嵌套,，Pascal語言中允許任何類型的循環(huán)語句嵌套于任何類型的循環(huán)語句內(nèi),。

圖8.  循環(huán)語句嵌套