循環(huán)結(jié)構(gòu)(又稱為重復(fù)結(jié)構(gòu))2014

1、循環(huán)結(jié)構(gòu)（又稱為重復(fù)結(jié)構(gòu)）循環(huán)結(jié)構(gòu)（又稱為重復(fù)結(jié)構(gòu)）在這種結(jié)構(gòu)中，按給定的條件連續(xù)重復(fù)多次執(zhí)行A框中的一組算法步驟。A框稱為循環(huán)體。一般來說，循環(huán)結(jié)構(gòu)有二種：當(dāng)循環(huán)和直到循環(huán)。當(dāng)循環(huán)結(jié)構(gòu)的特點：當(dāng)條件成立時，重復(fù)執(zhí)行循環(huán)體；當(dāng)條件不成立時，不執(zhí)行循環(huán)體并立即退出循環(huán)。直到循環(huán)的特點是：重復(fù)執(zhí)行循環(huán)體，直到條件成立時退出循環(huán)。條件A框是否當(dāng)循環(huán) A框條件否是直到循環(huán) 當(dāng)循環(huán)結(jié)構(gòu)中，循環(huán)體可能一次都沒執(zhí)行；而直到循環(huán)的循環(huán)體至少被執(zhí)行一次。計算12個實驗數(shù)據(jù)的平均值 開始輸入實驗數(shù)據(jù)at=t+an=n+1輸出 t/12 的值結(jié)束計數(shù)器變量n賦初值0實驗數(shù)據(jù)總和變量t賦初值0N=12否是一、用一、用

2、For-Next語句實現(xiàn)循環(huán)結(jié)語句實現(xiàn)循環(huán)結(jié)構(gòu)構(gòu) 預(yù)先能確定重復(fù)次數(shù)的循環(huán)問題可以使用For-Next來實現(xiàn).FOR -NEXT語句的一般格式是：For = To Step NextFOR -NEXT語句的執(zhí)行過程是：1.對循環(huán)變量設(shè)置初值。2.判斷循環(huán)變量的值是否大于終值，若大于，則退出循環(huán)，否則，執(zhí)行循環(huán)體。3.執(zhí)行循環(huán)體后，循環(huán)變量的值增加一個步長的值，再執(zhí)行上述步驟 2。 計算1+2+3+10的值t = 0For i = 1 To 10t = t + iNext iPrint t=; t計算1+3+5+7+9的值t = 0For i = 1 To 10 Step 2 t = t + i

3、Next iPrint t計算2+4+6+8+10的值t = 0For i = 2 To 10 Step 2t = t + iNext iPrint t計算1+3+5+7+前20項的值t = 0For i = 1 To 40 Step 2t = t + iNext iPrint t計算10+9+8+1的值s = 0For i = 10 To 1 Step -1s = s + iNext iPrint s計算1+1/2+1/3+1/10的值s = 0For i = 1 To 10s = s + 1 / iNext iPrint s計算1/2+1/22+1/231/2100的值s = 0For i

4、 = 1 To 100 s = s + 1 / 2 iNext iPrint s方法一：s = 0M = 1For I = 1 To 100 s = s + MNext Is = 0M = 1For I = 1 To 100 M = M / 2 s = s + MNext I方法二：計算12個輸入數(shù)據(jù)的平均值開始輸入實驗數(shù)據(jù)at=t+an=n+1輸出 t/12 的值結(jié)束計數(shù)器變量n賦初值0實驗數(shù)據(jù)總和變量t賦初值0N=12否是s = 0For i = 1 To 12input as = s + aNext iPrint s / 12計算s=1*2*3*4*1010!s = 1For i = 1

5、 To 10 s = s * iNext iPrint s計算s=1-2+3-4+5-6+7-8+9-10s = 0t = 1For i = 1 To 10s = s + t * iNext iPrint ss = 0t = 1For i = 1 To 10s = s + t * it = -tNext iPrint s填數(shù) 3_*8256=_3*6528For i = 1 To 9If (30 + i) * 8256 = (i * 10 + 3) * 6528 Then Print iEnd IfNext i統(tǒng)計200以內(nèi)37的倍數(shù)有幾個？并把符合要求的數(shù)字輸出。c = 0For i = 1

6、 To 200 If i Mod 37 = 0 Then c = c + 1 Print i End IfNext iPrint c若一個三位數(shù)x=100a+10b+c(a,b,c都是個為數(shù)），滿足a3+b3+c3=x,則x稱為水仙花數(shù)，找出所有的水仙花數(shù)。For n = 100 To 999a = Int(n / 100)b = Int(n - 100 * a) / 10)c = n Mod 10If a 3 + b 3 + c 3 = n Then Print nNext n有一個五位數(shù)字組成的編號1_ _47,千位和百位不知，但是這個五位數(shù)是57或67的倍數(shù)，輸出所有滿足這些條件的五位數(shù)

7、，并統(tǒng)計這樣數(shù)的個數(shù)。分析10047=10047+0=10047+0*10010147=10047+100=10047+1*10010247=10047+200=10047+2*10010347=10047+300=10047+3*100.10947=10047+900=10047+9*10011047=10047+1000=10047+10*10011147=10047+1100=10047+11*100.11947=10047+1900=10047+19*10012047=10047+2000=10047+20*100.19947=10047+9900=10047+99*100c = 0F

8、or j = 0 To 99 n = 10047 + j * 100 If n Mod 57 = 0 Or n Mod 67 = 0 Then c = c + 1 Print n End If Next j Print c用10元和50元兩種紙幣組成240元，共有哪幾種組合方式？分析x代表10元的張數(shù)當(dāng)50元0張：x=(240-0*50)/10 當(dāng)50元1張：x=(240-1*50)/10當(dāng)50元2張：x=(240-2*50)/10當(dāng)50元3張：x=(240-3*50)/10當(dāng)50元4張：x=(240-4*50)/10For i = 0 To 4 x = (240 - 50 * i) / 10

9、Print 五十元張數(shù); i, 十元張數(shù); xNext ix代表50元的張數(shù)當(dāng)10元0張：x=(240-0*10)/50 當(dāng)10元1張：x=(240-1*10)/50當(dāng)10元2張：x=(240-2*10)/50。當(dāng)10元24張：x=(240-24*10)/50For i = 0 To 24 x = (240 - 10 * i) / 50If x = Int(x) Then Print 五十元張數(shù); x, 十元張數(shù); iEnd IfNext i當(dāng)一個直角三角形，一條直角邊的長度為8， 且斜邊不超過100時，所有滿足條件的直角三角形有哪幾種組合？For i = 9 To 100 x = Sqr(i

10、 * i - 8 * 8) If x = Int(x) Then Print i, x,8Next i包裝600個變形金剛，要求是：1，包裝的規(guī)格分別是：小盒每盒12個，大盒每盒15個。2,每種規(guī)格的盒數(shù)都不能為0。請設(shè)計一個算法，輸出所有可能的包裝方案。方法一:For i = 1 To 49x = (600 - 12 * i) / 15If x = Int(x) ThenPrint 小盒個數(shù); i, 大盒個數(shù); xEnd IfNext iFor i = 1 To 39x = (600 - 15 * i) / 12If x = Int(x) ThenPrint 小盒個數(shù); X, 大盒個數(shù); i

11、End IfNext i當(dāng)型(while) 循環(huán)： Do While 語句組 Exit Do 語句組 Loop當(dāng)型（while）循環(huán)的執(zhí)行過程是：先判斷是否成立，若不成立則退出循環(huán)，執(zhí)行Do while的下一個語句；若成立，則執(zhí)行Do-Loop之間的語句（稱為循環(huán)體），執(zhí)行完循環(huán)體，再去判斷，當(dāng)條件成立時繼續(xù)執(zhí)行循環(huán)體。直到型(Until) 循環(huán)： Do 語句組 Exit Do 語句組Loop Until 直到型（until）循環(huán)的執(zhí)行過程是：先執(zhí)行Do-loop之間的語句（稱為循環(huán)體）；執(zhí)行完循環(huán)體，再去判斷，當(dāng)條件成立時退出循環(huán)，否則繼續(xù)執(zhí)行循環(huán)體，直到條件成立，退出循環(huán)。t = 0i=1

12、Do while i= 10t = t + ii=i+1LoopPrint t=; tt = 0For i = 1 To 10t = t + iNext iPrint t=; t計算1+2+3+10的值 1.Do while 和 FOR 對比計算1+3+5+7+9的值t = 0i = 1 Do while i= 1 s = s + ii=i-1loopPrint s從1+2+3+4+，加到什么數(shù)時和大于10000。打印出這個加數(shù)及這時的和。N=0 s=0n=n+1s=s+nn=0s=0do while s=10000 n=n+1 s=s+nloopprint n,s這兩句代碼次序能互換嗎？這兩

13、句代碼次序能互換嗎？求輸入的一個數(shù)的各位數(shù)字之和。（分析：一個整數(shù)有一位至多位數(shù)字組成，要求出這個數(shù)的各位數(shù)字，用這個數(shù)除以10的余數(shù)就是這個數(shù)的個位數(shù)字，然后將它用整除的方法縮小10倍后，繼續(xù)求出它得個位數(shù)字，一直到它位0時，就求出了這個數(shù)的所有各位數(shù)字。）X=int(x/10)t=x mod 10Input xs=0do while x0t=x mod 10s=s+tx=int(x/10)loopprint s輸入一個不大于10位的二進(jìn)制數(shù)n，將其轉(zhuǎn)換成對應(yīng)的十進(jìn)制數(shù)提示：（10101）2=1*20+0*21+1*22 +0*23+1*24）input x i = 0s = 0Do Whi

14、le x 0 t = x Mod 10 s =_ x = Int(x / 10) _LoopPrint s或者t = x Mod 2input x i = 0s = 0Do While x 0 t = x Mod 10 s = s + t * 2 i x = Int(x / 10) i = i + 1LoopPrint s從1+2+3+4+，加到什么數(shù)時和大于10000。打印出這個加數(shù)及這時的和。直到型(Until) 循環(huán)： Do 語句組 Exit Do 語句組Loop Until s = 0n = 0Do n = n + 1 s = s + nLoop Until s 10000Print

15、n, ss = 0n = 0Do While s = 10000n = n + 1s = s + nLoopPrint n, s求輸入的一個數(shù)的各位數(shù)字之和。Do loop untilInput x s = 0Dot = x Mod 10s = s + tx = Int(x / 10)Loop Until x = 0Print sInput xs=0do while x0t=x mod 10s=s+tx=int(x/10)loopprint s計算5個輸入數(shù)據(jù)的平均值1.do while loop2.do loop untils = 0i = 1Do While i 5Print s / 5求

16、輸入若干個學(xué)生成績的和，輸入-1表示結(jié)束。S=0input xdo while x-1s=s+xinput xloopprint s對輸入的數(shù)據(jù)求和，當(dāng)所求的和超過100，則停止輸入，并輸出求和結(jié)果。S=0do while s100print s求十個數(shù)中最大值打擂臺法_max=xi=1do while _ _ if xmax then _ i=i+1 _print _開始結(jié)束Max=x, i=1輸入xTFimaxMax=xi=1+1輸出MAXTFInput xmax=xi=1do while imax then max=x i=i+1 loopprint max方法二：max=0（或一個很小

17、的數(shù)）i=1do while imax then max=x i=i+1 loopprint max求十個數(shù)中最小值Input xmin=xi=1do while i=9 input x if xmin then min=x i=i+1 loopprint min方法二：min=10000（或一個很大的數(shù)）i=1do while i=10 input x if xmin then min=x i=i+1 loopprint min開始輸出 S的值結(jié)束輸入NS=0 T=1 A=1A=N否是A=A+1計算S=1!+2!+3!+N!請將流程圖填寫完整。開始輸出 S的值結(jié)束輸入NS=0 T=1 A=1

18、A=N否是A=A+1T=T*AS=S+TInput NS=0T=1A=1Do while A=NT=T*AS=S+TA=A+1Loop Print S另外根據(jù)流程圖寫另外根據(jù)流程圖寫for結(jié)構(gòu)結(jié)構(gòu)Input NS=0T=1For A=1 to NT=T*AS=S+TNext APrint SFor 結(jié)構(gòu)：求斐波納契數(shù)列求斐波納契數(shù)列1，1，2，3，5，8，13，21。前。前n項（第一項和第二項不算）項（第一項和第二項不算）Input nf1=1f2=1i=1Do while i= 1 - 0.00001Print is = 0t = 1i = 0Do While s 1 - 0.00001 _

19、 i = i + 1 s = s + 1 / t Loop Print is = 0t = 1i = 0Do While s nn=n-m nm m、n為公約數(shù) m=nInput m Input n Do While m n If m n Then m = m - n Else n = n - m End If LoopPrint m求兩自然數(shù)m，n的最大公約數(shù)和最小公倍數(shù)。方法一：分析：求最大公約數(shù)的算法思想： (1)對于已知兩數(shù)m，n，使得mn； (2)i=n (3)若i能夠同時整除m和n則i為m，n的最大公約數(shù),轉(zhuǎn)(6) (4)i=i-1 (5)重復(fù)(3)(4) (6)輸出最大公約數(shù)i和

20、最小公倍數(shù)n*m/i (7)程序結(jié)束Input m Input nIf m n Then _ _ _End if i=n Do while _ or _ _ Loop Print 最大公約數(shù)=, i Print 最小公倍數(shù)=, m*n/iInput m Input nIf m n Then t = m m = n n = tEnd if i=n Do while (m mod i0) or (n mod i 0) i=i-1 Loop Print 最大公約數(shù)=, i Print 最小公倍數(shù)=, m*n/i用輾轉(zhuǎn)相除法輾轉(zhuǎn)相除法求兩自然數(shù)m，n的最大公約數(shù)。分析：求最大公約數(shù)的算法思想：(1)對

21、于已知兩數(shù)m，n，使得mn；(2) m除以n得余數(shù)r；(3) mn，nr，若n=0，則循環(huán)結(jié)束 ，m為最大公約數(shù)；否則從(2) 重 復(fù)執(zhí)行。 例 求 m=14 ,n=6 的最大公約數(shù). m n r 14 6 2 6 2 0 2 0 N=0input minput nIf m n Then t = m m = n n = tendifDo r= m mod n m=n n=r Loop until n=0 Print 最大公約數(shù)=, m 求兩自然數(shù)m，n的最小公倍數(shù)Input a Input b i = 1s = a * iDo While s Mod b 0i = i + 1s = a * i

22、LoopPrint s有一張紙，其厚度為x毫米,將它對折多少次,其厚度將超過珠穆朗瑪峰的高度.珠穆朗瑪峰高度為8844.43米Input x i = 0Do While x = 8844430 x = x * 2i = i + 1Loopprint 需折疊 ; i ;”次Input x s = 0i = 0Do While s = 8844430i = i + 1s = x * 2 iLoop print 需折疊 ; i ;”次猴子吃桃問題。小猴子第一天摘下若干個桃子，當(dāng)即吃掉一半，還不過癮，又多吃一個，第二天吃掉剩下的一半，又多吃一個，以后每天如此，到第十天時，只剩下1個，問猴子總共摘了多少

23、桃子。分析：這是一個遞推問題，先從最后一天的桃子數(shù)X10推出倒數(shù)第二天的桃子數(shù)X9，再由X9推出倒數(shù)第三天的桃子數(shù)X8，第一天的桃子數(shù)X1。設(shè)第n天的桃子數(shù)為Xn,它前一天的桃子數(shù)為Xn-1，則：X(n)=X(n-1)/2-1 推出X(n-1)=2*(Xn+1)x10=1x9=2*(x10+1)=4x8=2*(x9+1)=10X = 1For n = 9 To 1 Step -1 X = 2 * (X + 1) 計算前一天的桃子數(shù)Next nPrint Xx=0For j = 1 To 3 For i = 1 To 2 x = x + 1 Next iNext jPrint x,i,j6 3

24、4x=0c=0For j = 1 To 2 For i = 1 To 2 x = x + 1 Next ic = c + 1Next jPrint c,i,j,x2 3 3 4輸出如下圖形：* * * * * For i = 1 To 5 For j = 1 To 10 Print *; Next j PrintNext i找出符合下列要求的五位數(shù)1_4_7，該數(shù)能被57或67整除。方法一：For i = 0 To 9 For j = 0 To 9 n = 10407 + i * 1000 + j * 10 If n Mod 57 = 0 Or n Mod 67 = 0 Then Print

25、n End If Next jNext i方法二：For i = 0 To 9 S = 10407 + i * 1000 For j = 0 To 9 n = S + j * 10 If n Mod 57 = 0 Or n Mod 67 = 0 Then Print n End If Next jNext iS=1!+2!+3!+10!s = 0For i = 1 To 10t = 1For j = 1 To i t = t * jNext j s = s + tNext iPrint s百雞百錢問題：公雞每只5元，母雞每只3元，小雞1元3只，現(xiàn)在用100元錢買100只雞，求公雞，母雞，小雞各

26、買幾只？For x = 1 To 99 For y = 1 To 99 z = 100 - x - y If 5 * x + 3 * y + z / 3 = 100 Then Print x, y, z Next yNext x百雞百錢問題：公雞每只5元，母雞每只3元，小雞1元3只，現(xiàn)在用100元錢買100只雞，求公雞，母雞，小雞各買幾只？x = 1 Do While x 100 y = 1 Do While y 100 z = 100 - x - y If 5 * x + 3 * y + z / 3 = 100 Then Print x, y, z y = y + 1 Loop x = x

27、+ 1 Loop百雞百錢問題：公雞每只5元，母雞每只3元，小雞1元3只，現(xiàn)在用100元錢買100只雞，求公雞，母雞，小雞各買幾只？For x = 1 To 19 For y = 1 To 33 z = 100 - x - y If 5 * x + 3 * y + z / 3 = 100 Then Print x, y, z Next yNext x數(shù)組 數(shù)組的概念一維數(shù)組-2147483648 +2147483647 Dim a(5) As IntegerFor i = 1 To 5 順序輸入 Input a(i) Next iFor i = 1 To 5 順序輸出 Print a(i)Nex

28、t ia(i)Dim a(5) As IntegerFor i = 1 To 5 順序輸入和輸出 Input a(i) Print a(i)Next i12個數(shù)據(jù)的平均值s = 0For i = 1 To 12input as = s + aNext iPrint s / 12已知數(shù)組中放了5個數(shù)，輸出其中的最大值，并輸出最大值的位置。Dim d(5) as integeri=1K=d(i)N=iDo while ik then K=d(i) N=iEndifi=i+1LoopPrint k,nDim d(5) as integeri=1K=d(i)N=iDo while ik then K=

29、d(i) N=iEndifLoopPrint k,n求斐波納契數(shù)列求斐波納契數(shù)列1，1，2，3，5，8，13，21。前。前n項（第一項和第二項不算）項（第一項和第二項不算）Input nf1=1f2=1i=1Do while i=n f3=f1+f2 Print f3 f1=f2 f2=f3 i=i+1loopInput nf1=1f2=1for i=1 to n f3=f1+f2 Print f3 f1=f2 f2=f3next iFor 結(jié)構(gòu)：斐波那契數(shù)列Dim A(60) As SinglePrivate Sub Command1_Click()A(1) = 1A(2) = 1For i

30、 = 1 To 58A(i + 2) = A(i + 1) + A(i)Next iPrint A(60)判斷素數(shù)1Input ni = 2f = TrueDo While i n If n Mod i = 0 Then f = False endif i = i + 1 Loop If f Then Print 是素數(shù) Else Print 不是素數(shù) End IfInput ni = 2f = TrueDo While i n If n Mod i = 0 Then f = False Exit do endif i = i + 1 Loop If f Then Print 是素數(shù) Else

31、 Print 不是素數(shù) End If判斷素數(shù)2Input n i = 2Do While i Sqr(n) Then Print 是素數(shù) Else Print 不是素數(shù) End If輸出100以內(nèi)的素數(shù)For n = 2 To 100i = 2f = TrueDo While i nIf n Mod i = 0 Then f = False i = i + 1 Loop If f Then Print n End If Next n冒泡排序1（升序）Dim d(4) As Integerd(1) = 5d(2) = 4d(3) = 3d(4) = 2For i = 1 To 3 For j =

32、 4 To i + 1 Step -1 If d(j) d(j - 1) Thenx = d(j)d(j) = d(j - 1)d(j - 1) = xEnd IfNext jNext iPrint d(1), d(2), d(3), d(4)冒泡排序2Dim d(4) As Integerd(1) = 5d(2) = 4d(3) = 3d(4) = 2For i = 3 To 1 Step -1 For j = 1 To i If d(j) d(j + 1) Then x = d(j) d(j) = d(j + 1) d(j + 1) = x End If Next jNext iPrint

33、 d(1), d(2), d(3), d(4)任意十個數(shù)升序排序Dim d(10) As IntegerFor k = 1 To 10 Input d(k) Next kFor i = 1 To 9For j = 10 To i + 1 Step -1If d(j) d(j - 1) Thenx = d(j)d(j) = d(j - 1)d(j - 1) = xEnd IfNext jNext I For k = 1 To 10Print d(k)Next k順序查找Dim d(5) As IntegerInput Keyd(1) = 35: d(2) = 24: d(3) = 63：d(4)

34、 = 12: d(5) = 62flag = 0i = 1Do While i = 5 And flag = 0 If d(i) = Key Then flag = ii = i + 1Loop If flag = 0 Then Print 沒有找到 Else Print 第 & flag & 個數(shù)據(jù)是你要找的。 End IfPrint Int(3 / 2) 1Print Fix(3 / 2) 1 Print 3 2 1Print Int(-3 / 2) -2Print Fix(-3 / 2) -1Print -3 2 -1 Print Int(5 / 4) 1Print Fi

35、x(5 / 4) 1 Print 5 4 1對分查找Dim d(5) As IntegerInput Keyd(1) = 15：d(2) = 24：d(3) = 33：d(4) = 52：d(5) = 62L = 1：R = 5：flag = 0Do While L = R And flag = 0 m = Fix(L + R) / 2) m = int(L + R) / 2) ： m = (L + R) 2 If d(m) = Key Then flag = m Else If Key d(m) Then R = m - 1 Else L = m + 1 End If End If Loop

36、 If flag = 0 Then Print 沒有找到 Else Print 第 & flag & 個數(shù)據(jù)是你要找的。 End If選擇排序Dim d(4) As Integerd(1) = 3d(2) = 1d(3) = 7d(4) = 2For i = 1 To 3pos = iFor j = i + 1 To 4If d(j) d(pos) Then pos = jNext jx = d(i)d(i) = d(pos)d(pos) = xNext iPrint d(1), d(2), d(3), d(4)畫圓形Circle (500, 800), 100, RGB(25

37、5, 0, 0)題目：畫10個同心圓For i = 100 To 1000 Step 100Circle (1800, 1500), i, RGB(255, 0, 0)Next i輸入數(shù)字n,計算n！Input n s = 1 For i = 1 To n s = s * i Next i print s求1-1/21+1/31-1/41+.+1/91-1/101s = _t = 1For i = 21 To 101 Step 10_t = -ts = s + t * aNext iPrint ss = 1t = 1For i = 21 To 101 Step 10a = 1 / it = -

38、ts = s + t * aNext iPrint s 計算圖6-6-2電路中A、B二端的等值電阻，其中R0=100，R1=200，R2=300 分析：采用由右向左遞退的方法。把整個電路按虛線分成若干級。第一級為A2B2兩點之間的電阻。顯然A2B2兩點之間的電阻為R1與 R0 串聯(lián)后再與R2并聯(lián)。根據(jù)物理公式可以求出A2B2兩點之間的電阻，記為R0。而A1B1兩點之間的電阻又可以看成是R1與R0串聯(lián)后再與R2并聯(lián)。假設(shè)為R0。同樣，AB兩點之間的電阻又可以看成是R1與R0串聯(lián)后再與R2并聯(lián)。顯然，重復(fù)計算三次，就可以求出AB兩點之間的電阻。當(dāng)然，在這樣的三次計算中，電阻R0的初值是100。R0

39、 = 100 R1 = 200R2 = 300For i = 1 To 3 Step 1R0 = R0 + R1R0 = R 0* R2 / (R0 + R2)Next iPrint R=; R0每個電阻都為200，計算AB兩端的電阻值R1 = 200R0 = 200For N = 1 To 4R0 = R0 + 2 * R1R0 = R0 * R1 / (R0 + R1)Next NPrint R=; R0設(shè)有一曲線y=9-x2，要求該曲線與坐標(biāo)軸在第一象限所圍的面積(如圖)。 YX930提示：將X軸上的區(qū)間0，3，分成若干等分，從各分點作Y軸的平行線與曲線相交。再從個交點向左作X軸的平行線

40、（如圖所示），構(gòu)成若干個矩形。設(shè)計一個程序求這些矩形面積的和，就可以求出所圍面積的近似值。如果把區(qū)間a，b分成n等分，則X軸上（n-1個）分點的坐標(biāo)從左到右依次為：(b-a)/n、 (b-a)*2/n 、(b-a)*3/n 、(b-a)*i/n、(b-a)*(n-1)/n因而，第i個矩形的高為： 9-（(b-a)*i/n） 2z = 0For i = 1 To 99s = (3 / 100) * (9 - (3 * i / 100) 2)z = z + sNext iPrint z復(fù)習(xí)下列程序運行的內(nèi)循環(huán)總次數(shù)為。FOR M=1 TO 2 FOR N=1 TO M+1 NEXT N NEXT M5次S=0J=1DO WHILE J6J=J+2S=S+J*2LOOPPRINT S,J輸出的結(jié)果是。 30 7S=0：P=3