【正文】 行序列 n [OTHERWISE 語句行序列 ] ENDCASE 執(zhí)行過程：依次計算每一個 CASE語句對應的條件表達式 ， 遇到 第一個 為真值者 ， 則執(zhí)行該語句下面對應的語句序列段 ， 執(zhí)行完后 ， 直接跳轉至 ENDCASE后 。 如果所有的條件都不為真值 ， 若無 OTHERWISE子句 ， 則不執(zhí)行任何語句序列 ， 跳轉至ENDCASE后；有可選項 OTHEWISE時 ， 執(zhí)行 OTHERWISE子句對應的語句序列 ， 再跳轉至 ENDCASE后 。 如果有多個條件表達式為真值 ， 也僅僅執(zhí)行第一個條件表達式為真值者對應的語句序列 。 DO CASE和 ENDCASE必須成對出現 。 DO CASE與第一個 CASE之間的任何語句將不會被執(zhí)行 。 例 5 用情況語句重新編制例 4，比較情況語句與條件轉向語句的用法。 循 環(huán) 結 構 三種循環(huán)語句 1． DO WHILE循環(huán) (1) 語句格式： DO WHILE條件表達式 循環(huán)體語句序列 ENDDO (2)執(zhí)行過程： ① 執(zhí)行到 DO WHILE語句時 ， 首先計算 條件表達式 的值 ，為真時 ， 順序執(zhí)行循環(huán)體中的語句 ， 即執(zhí)行循環(huán)體；為假時 ，跳到 ENDDO的下面一句去執(zhí)行 ， 即跳出循環(huán)體 ， 循環(huán)結束 。 ② 執(zhí)行到循環(huán)結束語句 ENDDO時 ， 系統(tǒng)返回循環(huán)起始語句 ， 再一次執(zhí)行 DO WHILE語句 。 (3)說明： ENDDO和 DO WHILE語句必須成對出現；在循環(huán)體內必須有使 條件表達式 逐漸為假的語句 ， 否則 ， 將進入死循環(huán) 。 圖 5– 11 DO WHILE循環(huán)語句流程圖 當條件表達式為假時，退出循環(huán)；循環(huán)體END DO 結束循環(huán)，執(zhí)行一條語句否則，重復執(zhí)行例：將一張厚度 多少次后厚度超過珠峰的高度？ 2． SCAN循環(huán) 語句格式 ： SCAN [范圍 ] [FOR條件 ] 循環(huán)體語句序列 ENDSCAN 其中， SCAN為循環(huán)起始語句， ENDSCAN為循環(huán)結束語句。 語句功能 ：對當前表指定范圍內滿足條件的記錄依次執(zhí)行 循環(huán)體語句序列 所規(guī)定的操作。范圍省略值為 ALL。 例：使用循環(huán)在一行內顯示女職工姓名。 3． FOR循環(huán) (1) 語句格式： FOR 循環(huán)變量名 =數值表達式 1 TO 數值表達式 2 [STEP數值表達式 3] 循環(huán)體語句序列 ENDFOR/NEXT (2) 執(zhí)行過程 (3) 說明： ① 在執(zhí)行循環(huán)體時 ， 若對初值 、 終值和步長三個表達式中所含變量的值作了修改 ， 不會影響循環(huán)初值 、 循環(huán)終值和步長 。 ② 循環(huán)初值 、 循環(huán)終值和步長值必須合理 ， 否則 ， 不執(zhí)行循環(huán) 。 ③ 執(zhí)行循環(huán)體時 ， 若修改了循環(huán)變量值 ， 將會影響到循環(huán)執(zhí)行次數 。 例：計算 N！ =1*2*3*……*N 例：計算 ∑I=1+2+3+……+N 例：找出 3位的水仙花數，若一個 3位正整數的各位數字的立方和等于該數本身，則稱這樣的數為水仙花數。 算法：枚舉。把 100999之間的每一個數都檢驗一遍，輸出滿足定義的即可。 循環(huán)結構的兩條專用語句 1． 退出循環(huán)語句 —— EXIT 前面介紹的循環(huán)語句格式中 ， 一旦進入循環(huán) ， 循環(huán)次數實際上已經確定 。 但在實際應用中 ， 常希望在某種情況下 ，強迫循環(huán)語句結束 ， 去繼續(xù)執(zhí)行循環(huán)語句后的其它語句 。EXIT語句可實現這一要求 。 語句格式 ： EXIT 語句功能 ：立即退出循環(huán) ， 轉去執(zhí)行循環(huán)終端語句之后的語句 。 EXIT語句通常包含在 IF語句或 DO CASE語句中 ， 當某條件出現時 ， 才被執(zhí)行 。 通常用于無限次循環(huán)的控制 ， 例如： DO WHILE . T . 語句行序列 IF 條件表達式 EXIT ENDIF ENDDO 類似地 ， EXIT可出現在 DO CASE 的某語句序列中 。 例 13 打印某種報表，每打印完一張，便提示用戶是否還要打印，由用戶輸入的信息來進行控制，試編程序實現這種功能。 依題意畫流程圖如圖所示 。 程序如下： 繼續(xù)打印嗎？跳出循環(huán)ENDIF 語句打印報表重復執(zhí)行循環(huán)體設置初始狀態(tài)為 . .F.圖 5–15 例 13的流程圖 CLEAR ALL DO WHILE .T . 打印報表程序段 CLEAR ANSWER=MESSAGEBOX(繼續(xù)打印嗎 ? ,36, 打印提示 ) IF ANSWER=7 EXIT ENDIF ENDDO 2． 短路循環(huán)語句 —— LOOP 語句格式 ： LOOP 語句功能 ：強迫結束本次循環(huán)體的執(zhí)行 ， 使流程返回循環(huán)開始語句 。 循環(huán)結構應用舉例 1. 循環(huán)語句與其它分支判斷語句的嵌 套 所謂嵌套 ， 即為：在一個語句結構中 ， 包含了另一個完整的語句結構 。 2． 多重循環(huán) 多重循環(huán)即循環(huán)的嵌套 ， 在一個循環(huán)的循環(huán)體中 ， 包含有另一個循環(huán) 。 我們稱外層循環(huán)為外循環(huán) ， 被包含的循環(huán)稱為內循環(huán) 。 以 DO WHILE為例 ， 多重循環(huán)的一般格式如圖 5–20所示 。 例 18 編制一張九九乘法表 ， 要求格式如下： * 1 2 3 4 5 6 7 8 9 1 1