【正文】
循環(huán)可以嵌套 , 其規(guī)則與 FOR…NEXT循環(huán)相同 。 NEXT j PRINT NEXT i END * ** *** **** ***** * *** ***** ******* ********* 2*i1 如何讓圖形右移顯示 TAB(20i) DO…LOOP循環(huán)語(yǔ)句 一 、 先判斷條件的 DO…LOOP循環(huán)語(yǔ)句 格式: DO [ WHILE | UNTIL〈 條件 〉 ] [〈 循環(huán)體 〉 ] [ EXIT DO ] LOOP 功能: 先判斷循環(huán) 〈 條件 〉 , 當(dāng)條件為真 (WHILE)或?yàn)榧?(UNTIL)時(shí) , 執(zhí)行 〈 循環(huán)體 〉 ;否則 , 退出循環(huán) 。 ’SPACE$(5i)。 圖形 * ** *** **** ***** 分析 :外 :用循環(huán)變量 i 控制打印的行數(shù) : 15 內(nèi) :用循環(huán)變量 j 控制每行打印的列數(shù) (*的個(gè)數(shù) ), *的個(gè)數(shù)與行數(shù) I的關(guān)系 :j=i, 1?i 用 TAB函數(shù)控制每行 “ *” 的起點(diǎn)位置 k。s FOR i=1 to 6 t$=“” FOR j=1 TO i t$=t$+STR$(i) NEXT j s=s+VAL(t$) NEXI i PRINT “s=“。a,”不及格人數(shù)” 。條件循環(huán)語(yǔ)句 (WHILE … WEND)的格式和功能是什么 ? ,統(tǒng)計(jì) 30名同學(xué)成績(jī)中及格和不及格的人數(shù)。 NEXT j PRINT NEXT i * END ** *** **** ***** 作業(yè) : 上機(jī)題 ( 下冊(cè) ) : P15 4 、 19 答疑時(shí)間:每周三, 9, 10節(jié) 答疑地點(diǎn): 210層,信管教研室。 ’SPACE$(5i)。 圖形 * ** *** **** ***** 分析 :外 :用循環(huán)變量 i 控制打印的行數(shù) : 15 內(nèi) :用循環(huán)變量 j 控制每行打印的列數(shù) (*的個(gè)數(shù) ), *的個(gè)數(shù)與行數(shù) I的關(guān)系 :j=i, 1?i 用 TAB函數(shù)控制每行 “ *” 的起點(diǎn)位置 k。=。*。=。*。 例如: FOR a=1 TO 5 FOR b=1 TO 10 FOR c= 1 TO 20 … NEXT c NEXT b NEXT a 下面的嵌套是錯(cuò)誤的: FOR a=l TO 5 FOR b=3 TO 9 NEXT a NEXT b 例 5. 打印乘法 “ 九九表 ” 。 (注 :1m3小麥約 108) i=1 : s=1 WHILE WEND v=s/+8 PRINT “粒數(shù) s=“。n END s=0: n=0:i=1 WHILE i = 100 IF I MOD 2=0 THEN s=s+i i=i+1 n=n+1 WEND print “s=“。n END s=0: n=0 FOR i=2 TO 100 STEP 2 s=s+i n=n+1 NEXT i PRINT “s=“。s 問(wèn):求 1100間偶數(shù)的和及偶數(shù)個(gè)數(shù) , 并輸出這些偶數(shù) ? 程序 : s=0: n=0:i=2 WHILE i = 100 s=s+i i=i+2 n=n+1 WEND PRINT “s=“。 (3)程序運(yùn)行時(shí)遇到死循環(huán),可以用Ctrl+Break鍵 ,使之強(qiáng)制終止程序。 說(shuō)明 : (1)條件 可是關(guān)系型表達(dá)式或邏輯型表達(dá)式 , 甚至可是一個(gè)常數(shù) , QB將一切非零的數(shù)都視作 “ 真 ” 。 … … 。 方法 1分析:設(shè)初值為 0, 終值為 100, 步長(zhǎng)為 3. 程序: CLS FOR n=0 TO 100 STEP 3 PRINT n, NEXT n END FOR n=0 TO 100 IF n MOD 3=