【文章內(nèi)容簡介】 amp。amp。如果用戶回答的不是 Y或 y EXIT amp。amp。退出循環(huán) ENDIF ENDDO USE amp。amp。關(guān)閉數(shù)據(jù)表 RETURN amp。amp。返回命令窗口 例題：條件循環(huán) 循環(huán)條件為邏輯常量 .T.，循環(huán)條件永遠(yuǎn)成立，這種循環(huán)被稱為絕對循環(huán)。這時，在循環(huán)體內(nèi)應(yīng)該有 EXIT語句退出循環(huán)。 使用循環(huán)結(jié)構(gòu)時，為使程序最終能退出循環(huán)，在循環(huán)體中必須要有使循環(huán)條件的值的發(fā)生改變的語句，或者有 EXIT語句。否則程序?qū)⒂肋h(yuǎn)重復(fù)地執(zhí)行循環(huán)體，這種情況稱為 死循環(huán) 。 調(diào)試過程中遇到死循環(huán)時，按鍵盤的 ESC鍵可結(jié)束程序的運(yùn)行。 條件循環(huán) 求 1到 100之間全部數(shù)之和 i=1 amp。amp。設(shè)置計數(shù)變量 i的初值為 1 s=0 amp。amp。設(shè)置求和變量 s的初值為 0 DO WHILE i=100 amp。amp。循環(huán)條件為 i不超過 100 s=s+i amp。amp。使 s的值增加 i i=i+1 amp。amp。使 i的值增加 1 ENDDO ?”1到 100的和為” ,s amp。amp。顯示求和變量的值 RETURN amp。amp。返回命令窗口 例題：條件循環(huán) s i 初值 0 1 循環(huán) 1: 1 2 循環(huán) 2: 1+2 3 循環(huán) 3 : 1+2+3 4 循環(huán) 4 : 1+2+3+4 5 循環(huán) 5: 1+2+3+4+5 6 …… 循環(huán) 100: 1+2+… +100 101 例題：條件循環(huán) 對于讀者表的所有讀者根據(jù)不同的身份來收取押金。其中，教研人員收取 50元，工作人員收取 30元，研究生收取 20元。 將所有讀者的姓名，身份和押金顯示出來 例題：條件循環(huán) USE 讀者 amp。amp。打開讀者表 DO WHILE NOT EOF() amp。amp。循環(huán)條件為記錄指針不指向文件尾 DO CASE CASE 身份 =?教研人員’ amp。amp。判斷當(dāng)前記錄的身份字段的值是否為教研人員 yj=50 amp。amp。對 yj賦值為 50 CASE 身份 =?工作人員’ amp。amp。判斷當(dāng)前記錄的身份字段的值是否為工作人員 yj=30 amp。amp。對 yj賦值為 30 CASE 身份 =?研究生’ amp。amp。判斷當(dāng)前記錄的身份字段的值是否為研究生 yj=20 amp。amp。對 yj賦值為 20 ENDCASE ?姓名 ,身份 ,yj amp。amp。顯示當(dāng)前記錄的姓名和身份字段及變量 yj的值 SKIP amp。amp。向下移動記錄指針 ENDDO USE amp。amp。關(guān)閉數(shù)據(jù)表 RETURN amp。amp。返回命令窗口 例題：條件循環(huán) FOR 循環(huán)變量 =初值 TO終值 [STEP 步長值 ] 語句序列 ENDFOR|NEXT 步長型循環(huán) 步長型循環(huán) 執(zhí)行該語句時，系統(tǒng)首先自動將初值賦給循環(huán)變量，然后判斷循環(huán)變量是否超過終值。若步長值為正數(shù)，則循環(huán)變量大于終值為超過；若步長值為負(fù)數(shù)，則循環(huán)變量小于終值為超過。若沒有超過，則執(zhí)行循環(huán)體，并將循環(huán)變量增加一個步長值。然后，再去判斷循環(huán)變量是否超過終值。如果沒有超過終值，則再次執(zhí)行循環(huán)體；否則，轉(zhuǎn)去執(zhí)行 ENDFOR后面的語句。 在缺省步長值時，默認(rèn)的步長值為 1。 初值 、 終值 、 步長值 都是數(shù)值型表達(dá)式。這些表達(dá)式的值在第一次循環(huán)時被計算出來，在以后循環(huán)的執(zhí)行過程中不再會被改變。 循環(huán)變量超過終值 循環(huán)變量 =初值 步長型循環(huán) 循環(huán)變量 =循環(huán)變量 +步長 .N. 循環(huán)體 .Y. ENDFOR后面的語句 使用步長型循環(huán)實現(xiàn)例 s=0 amp。amp。設(shè)置求和變量為 s FOR i=1 TO 100 amp。amp。設(shè)置循環(huán)變量 i的初值為 1，終值為 100，步長為 1 s=s+i amp。amp。使 s的值增加 i ENDFOR ?”1到 100的和為” ,s amp。amp。顯示求和變量的值 RETURN amp。amp。返回命令窗口 例題：步長型循環(huán) 判斷某數(shù)是否為質(zhì)數(shù) 除了 1和它本身之外不能被任何一個整數(shù)所整除的數(shù)為質(zhì)數(shù)。除了 2以外的質(zhì)數(shù)均為素數(shù)。 要判斷一個數(shù) n是否素數(shù)，只需用 2到 n1的各個整數(shù)去除 n。如果都不能整除 n，則 n就是素數(shù)。只要有一個數(shù)能整除 n，則 n就不是一個素數(shù)。 例題：步長型循環(huán) INPUT 請輸入一個大于 2的整數(shù) to n amp。amp。接收從鍵盤輸入的整數(shù)賦值給變量 n FOR i=2 TO n1 amp。amp。設(shè)置循環(huán)變量 i的初值為 2，終值為 n1，步長為 1 IF MOD(n,i)=0 amp。amp。若 i整除 n，則退出循環(huán) EXIT ENDIF ENDFOR IF in1 amp。amp。退出循環(huán)后，判斷 i是否大于 n1 ?n,?是一個素數(shù)’ amp。amp。若 i等于 n，則說明 2到 n1沒有一個數(shù)整除 n ELSE ?n,?不是一個素數(shù)’ amp。amp。否則，說明是在 i整除 n的情況下退出循環(huán) ENDIF RETURN amp。amp。返回命令窗口 例題：步長型循環(huán) SCAN [范圍 ] [FOR 條件 ] 語句序列 ENDSCAN 掃描型循環(huán) 掃描型循環(huán) 執(zhí)行該語句時，系統(tǒng)首先將記錄指針指向給定范圍內(nèi)滿足指定條件的第一條記錄上。如果此時記錄指針指向的不是文件尾，即 EOF()為假值，則執(zhí)行循環(huán)體。執(zhí)行完，系統(tǒng)自動將記錄指針定位到給定范圍內(nèi)下一條滿足指定條件的記錄，然后重新判斷記錄指針是否指向文件尾。若不是文件尾，則再次執(zhí)行循環(huán)體，否則轉(zhuǎn)去執(zhí)行 ENDSCAN后的語句。 當(dāng)缺省范圍和條件時，數(shù)據(jù)表的所有記錄都將執(zhí)行循環(huán)體的語句。 循環(huán)體 .F. 紀(jì)錄指針指向第一條記錄 指針是否指向文件尾 掃描型循環(huán) 紀(jì)錄指針指向下一條記錄 .T. ENDSCAN后面的語句 USE 讀者 amp。amp。打開讀者表 SCAN amp。amp。對所有記錄進(jìn)行掃描 DO CASE CASE 身份 =?教研人員’ amp。amp。判斷當(dāng)前記錄的身份字段的值是否為教研人員 yj=50 amp。amp。對 yj賦值為 50 CASE 身份 =?工作人員’ amp。amp。判斷當(dāng)前記錄的身份字段的值是否為工作人員 yj=30 amp。amp。對 yj賦值為 30 CASE 身份 =?研究生’ amp。amp。判斷當(dāng)前記錄的身份字段的值是否為研究生 yj=20 amp。amp。對 yj賦值為 20 ENDCASE ?姓名 ,身份 ,yj amp。amp。顯示當(dāng)前記錄的姓名和身份字段及變量 yj的值 ENDSCAN USE amp。amp。關(guān)閉數(shù)據(jù)表 RETURN amp。amp。返回命令窗口 例題：掃描循環(huán) 在一個循環(huán)結(jié)構(gòu)的循環(huán)體內(nèi)包含另一個循環(huán)結(jié)構(gòu)，則稱為 多重循環(huán) ，或稱為 循環(huán)的嵌套 。 前面所介紹的幾種循環(huán)語句不僅自身可以嵌套自身，也可以互相嵌套，實現(xiàn)多重循環(huán) 但是，每一層次的循環(huán)開始語句和循環(huán)結(jié)束語句必須互相對應(yīng)，層次分明，不能互相交叉。 多重循環(huán) 顯示出 3到 100之間的所有素數(shù)，并求這些數(shù)的和 s=0 amp。amp。設(shè)置求和變量 s的初值為 0 FOR n=3 TO 99 STEP 2 amp。amp。設(shè)置循環(huán)變量 n的初值為 3，終值為 100，步長為 2 FOR i=3 TO INT(SQRT(n)) amp。amp。設(shè)置 i的初值為 2，終值為 n的平方根的整數(shù)值 IF MOD(n,i)=0 amp。amp。若 i整除 n，則退出循環(huán) EXIT ENDIF ENDFOR IF i INT(SQRT(n)) amp。amp。退出循環(huán)后，判斷 i是否大于內(nèi)層循環(huán)的終值 ?n amp。amp。說明沒有發(fā)生 i整除 n的情況，即 n是素數(shù) s=s+n amp。amp。使求和變量 s的值增加 n ENDIF ENDFOR ??素數(shù)的和為’ ,s RETURN amp。amp。返回命令窗口 例題 編程輸出乘法九九表 例題：多重循環(huán) s=0 amp。amp。設(shè)置求和變量 s的初值為 0 FOR i=1 TO 9 amp。amp。外層循環(huán)變量 i從 1到 9 FOR j=1 to i