24程序的循環(huán)結(jié)構(gòu)（二）

1For For = = To To Step Step Next Next 循環(huán)變量循環(huán)變量= =初值初值執(zhí)行循環(huán)體（語句組）執(zhí)行循環(huán)體（語句組）循環(huán)變量增加一個(gè)步長循環(huán)變量增加一個(gè)步長是是否否循環(huán)變量超過終值 Dim i As Integer Dim s As Integer s=0 For i=1 To 5 Step 1 s=s+i Next i Print s=;s i s Next i 1 1（0+1） 2 2 3 （1+2） 3 3 6 （3+3） 4 4 10 （6+4） 5 5 15 （10+5） 6累加器：s=s+i(一般s的初值為0)例1 閱讀程序，分析結(jié)果 Dim i As Integer Dim t As Integer t=1 For i=1 To 5 Step 1 t=t*i Next i Print t=;t i t Next i 1 1（1*1） 2 2 2 （1*2） 3 3 6 （2*3） 4 4 24 （6*4） 5 5 120 （24*5） 6累乘器：t=t*i(一般t的初值為1)例2 閱讀程序，分析結(jié)果例3 編程計(jì)算s=1+3+5+99（計(jì)算1100之間的 奇數(shù)和）一、分析問題：一、分析問題： 設(shè)循環(huán)變量為設(shè)循環(huán)變量為i,i, s s計(jì)算累加和。計(jì)算累加和。二、設(shè)計(jì)算法：二、設(shè)計(jì)算法：三、編寫程序：三、編寫程序：ClsDim i As Integer, s As Integers=0For i=1 To 100 Step 2 s=s+iNext IPrint s=;s四、調(diào)試程序四、調(diào)試程序1.1.循環(huán)變量循環(huán)變量“超過超過”終值的含義：終值的含義：2.For2.For循環(huán)的循環(huán)體執(zhí)行次數(shù)：循環(huán)的循環(huán)體執(zhí)行次數(shù)：3.3.累加器：累加器：s=s=s+is+i( (一般一般s s的初值為的初值為0)0)4.4.累乘器：累乘器：t=tt=t* *i i( (一般一般t t的初值為的初值為1)1)1.編程計(jì)算1100之間的偶數(shù)和。 （參考答案：2550）2.編程計(jì)算s=100+90+80+10。 (參考答案：550）1 1、編程打印出所有的、編程打印出所有的“水仙花數(shù)水仙花數(shù)”。一、分析問題：一、分析問題： “水仙花水仙花”數(shù)是一個(gè)三位整數(shù)，它的數(shù)是一個(gè)三位整數(shù)，它的百位百位a a，十位，十位b b，個(gè)位，個(gè)位c c，s s= =a3 a3 + + b3 b3 + + c3c3，若，若s=s=i i，則是水仙花數(shù)，否則不是水仙花數(shù)。，則是水仙花數(shù)，否則不是水仙花數(shù)。二二、設(shè)計(jì)算法：、設(shè)計(jì)算法：三、編寫程序：三、編寫程序：Dim i As Integer, s As IntegerDim a As Integer, b As Integer, c As IntegerFor i=100 To 999 a=i100 b=i10 Mod 10 c=i Mod 10 s=a3+b3+c3 If s=i Then Print I End IfNext i四、調(diào)試程序四、調(diào)試程序如：如：153= 13 + 53 + 33153= 13 + 53 + 33