《24程序的循環(huán)結(jié)構(gòu)(二)》由會員分享,可在線閱讀,更多相關(guān)《24程序的循環(huán)結(jié)構(gòu)(二)(9頁珍藏版)》請在裝配圖網(wǎng)上搜索。
1、1For For = = To To Step Step Next Next 循環(huán)變量循環(huán)變量= =初值初值執(zhí)行循環(huán)體(語句組)執(zhí)行循環(huán)體(語句組)循環(huán)變量增加一個步長循環(huán)變量增加一個步長是是否否循環(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 A
2、s 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 編程計算s=1+3+5+99(計算1100之間的 奇數(shù)和)一、分析問題:一、分析問題: 設(shè)循環(huán)變量為設(shè)循環(huán)變量為i,i, s s計算累加和。計算累加和。二、設(shè)計算法:二、設(shè)計算法:三、編寫程序:三、編寫程序:ClsDim i As In
3、teger, 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.編程計算1100之間的偶數(shù)和。 (參考答案:2550)2.編程計算s=100+90+80+10。 (參考答案:550)1 1、編程打印出所
4、有的、編程打印出所有的“水仙花數(shù)水仙花數(shù)”。一、分析問題:一、分析問題: “水仙花水仙花”數(shù)是一個三位整數(shù),它的數(shù)是一個三位整數(shù),它的百位百位a a,十位,十位b b,個位,個位c c,s s= =a3 a3 + + b3 b3 + + c3c3,若,若s=s=i i,則是水仙花數(shù),否則不是水仙花數(shù)。,則是水仙花數(shù),否則不是水仙花數(shù)。二二、設(shè)計算法:、設(shè)計算法:三、編寫程序:三、編寫程序: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