《Do循環(huán)語句》教學(xué)課件

2.4程序的循環(huán)結(jié)構(gòu)Do循環(huán)語句

Do循環(huán)語句1、Do語句的功能：用于建立循環(huán)次數(shù)未知的循環(huán)結(jié)構(gòu)2、Do語句的格式：格式一（當(dāng)循環(huán)）

DoWhile<條件>

循環(huán)體

Loop

S＝0N＝0DoWhileN<=10

S=S+1

N=N+1

Loop

Do循環(huán)語句功能：

執(zhí)行Do語句先判斷條件，當(dāng)條件滿足，則執(zhí)行循環(huán)體，然后執(zhí)行Loop語句就回到DoWhile再判斷，直到條件不滿足，跳出循環(huán)，執(zhí)行Loop下一語句。

Do語句的第二種格式（直到循環(huán)）

1、直到形循環(huán)格式

Do

循環(huán)體

Loopwhile<條件>

S=0

N=0

Do

N=N+1

S=S+N

LoopwhileN<100

Do語句的第二種格式（直到循環(huán)）

2、格式二功能：

執(zhí)行Do語句，就進(jìn)入循環(huán)，直接執(zhí)行循環(huán)體，在判斷條件，當(dāng)條件滿足，回到上面執(zhí)行循環(huán)體，直到條件不滿足，跳出循環(huán)，執(zhí)行Loop下一語句。三種循環(huán)求解S=1+2+……+100和值PrivateSubCommand1_Click()DimNAsinteger,SAsintegerS=0

ForN=1To100S=S+NNextNPrint“S＝";SEndSub1、三種循環(huán)求解S=1+2+……+100和值PrivateSubCommand1_Click()DimsAsInteger,nAsIntegers=0n=0DoWhilen<=100s=s+nn=n+1LoopPrintsEndSub2、三種循環(huán)求解S=1+2+……+100和值PrivateSubCommand1_Click()Dimsasinteger,nasintegerS=0N=0DoS=S+NN=N+1Loopuntil(n>100)

printSEndsub3、實(shí)踐“猴子摘桃”猴子吃桃：

每次吃掉一半多一個(gè)，直到第10天只剩一個(gè)，第一天共摘了多少個(gè)桃子？實(shí)踐“猴子摘桃”PrivateSubCommand1_Click()DimdayAsInteger,SAsIntegerS=1Forday=9To1Step-1S=(S+1)*2NextdayPrint"s=";SEndSub循環(huán)語句嵌套的定義雙重循環(huán)語句：在循環(huán)體內(nèi)含有另一個(gè)循環(huán)語句的結(jié)構(gòu)

如:For循環(huán)變量1=初值To終值Step步長

For循環(huán)變量2=初值To終值Step步長

循環(huán)體

Next循環(huán)變量2

Next循環(huán)變量100循環(huán)語句嵌套的定義多重循環(huán)：如循環(huán)體內(nèi)再包含循環(huán)結(jié)構(gòu)，我們將這種循環(huán)結(jié)構(gòu)稱作多重循環(huán)。多重循環(huán)的原則是:外層循環(huán)與內(nèi)層循環(huán)必須層層相套，循環(huán)體之間不能交叉。每個(gè)循環(huán)必須有一個(gè)唯一的循環(huán)控制變量。問題：

求解1–2+3－4+…+99－100PrivateSubCommand1_Click()DimiAsinteger,SAsintegerS=0

Fori=1To100s=s+(-1)^(i+1)*iNextiPrint“S＝";SEndSub問題：1-1/2+1/3–1/4+…+1/99–1/100PrivateSubCommand1_Click()DimiAsinteger,SAsintegerS=0