循環(huán)結(jié)構(gòu)與數(shù)組

1、循環(huán)結(jié)構(gòu)和數(shù)組、循環(huán)結(jié)構(gòu)、循環(huán)控制結(jié)構(gòu)為計(jì)算機(jī)程序說(shuō)明迭代計(jì)算提供了控制手段?；芈房刂平Y(jié)構(gòu)必須表示以下三個(gè)方面中的兩個(gè)：也就是說(shuō)，循環(huán)執(zhí)行語(yǔ)句。循環(huán)條件；詳細(xì)說(shuō)明循環(huán)方式。在PASCAL語(yǔ)言中，使用while、repeat和for三個(gè)語(yǔ)句描述循環(huán)控制結(jié)構(gòu)。例如，求S=1 2 3 100的值，使用分析：S計(jì)算所有合計(jì)，一次添加一個(gè)數(shù)字需要分配100次。如上語(yǔ)句所示，這100個(gè)賦值語(yǔ)句都具有共同的特征，可以抽象為S:=S I格式。其中I從1更改為100。要簡(jiǎn)化程序設(shè)計(jì)，必須采用可用于重復(fù)特定門段的程序結(jié)構(gòu)。這是循環(huán)結(jié)構(gòu)。計(jì)數(shù)循環(huán)for語(yǔ)句，在for語(yǔ)句中為(1)增量循環(huán)：For控制變量：=to d

2、o (2)減少循環(huán)：For控制變量：=downto do，使用For循環(huán)語(yǔ)句的準(zhǔn)則(2)for語(yǔ)句的初始值(3)確定了原始值和最終值后，循環(huán)數(shù)不變，不能在迭代語(yǔ)句內(nèi)將分配操作應(yīng)用于控制變量。(4)Do后面的門可以是任何門，我們一般稱之為循環(huán)體。示例：S=1 2 3查找值100；程序片段：Var i，s:integerbegin s :=0；For i:=1至100 do s :=s I；Writeln(s=，s)；End，analytics:用s計(jì)算所有合計(jì)，一次加一個(gè)數(shù)字需要100次分配。如上語(yǔ)句所示，這100個(gè)賦值語(yǔ)句都具有共同的特征，可以抽象為S:=S I格式。其中I從1更改為100。要

3、簡(jiǎn)化程序設(shè)計(jì)，必須采用可用于重復(fù)特定門段的程序結(jié)構(gòu)。這是循環(huán)結(jié)構(gòu)。范例：26個(gè)大寫字母，以正數(shù)或相反順序輸出varch3360char。begin for ch :=A to Z do write(ch)；Writeln，for ch :=Z downto A do write(ch)；End .示例：Nocomachns定理，任何n3都輸入N個(gè)連續(xù)奇數(shù)和N(n100)，以輸出對(duì)應(yīng)于n3的表達(dá)式。var I、n、a:long int；循環(huán)變量，連續(xù)奇數(shù)，當(dāng)前項(xiàng)，類型長(zhǎng)邊讀取(n)；輸入連續(xù)奇數(shù)號(hào)a:=(n * (n-1) 1。計(jì)算最小奇數(shù)for I:=1 to n-1 do輸出表達(dá)式的前n-1

4、項(xiàng)begin write(a，)。a:=a2；End；writeln(a)；輸出項(xiàng)目n readln；End.main，如：白雞問(wèn)題，一只公雞5美元，一只母雞3美元，1美元可以買3只小雞?，F(xiàn)在100元。我想買100只雞。公雞、母雞、小雞各能買多少只？我們把公雞和母雞的所有可能數(shù)量都列為for循環(huán)兩次。如果現(xiàn)在公雞只有I萬(wàn)只，母雞只有J，那么小雞只計(jì)算k=100-i-j。然后通過(guò)下面的布爾表達(dá)式i*5 j*3 k/3=100判斷現(xiàn)在100只雞的總值是否為100美元。如果是，則輸出I、j和k。var I、j、k:integer；begin for I:=1 to 20 do for j:=1 to

5、 33 do begin k:=100-I-j；if I * 5j * 3k/3=100 then writeln(I 33605、j33605、k 33605)；End；For readln；End.main，F(xiàn)OR循環(huán)機(jī)械練習(xí)題，1 .n！=1*2*3*N。(N7) 2 .100以內(nèi)的所有2，3，5除以殘留物為1的數(shù)量3。找到100999之間的水仙花數(shù)。水仙花數(shù)是這個(gè)數(shù)等于你們數(shù)的立方和。例如：153=13 53 33。，練習(xí)題參考過(guò)程var i，n:integerSum:integerBegin write(輸入n :)；readln(n)；sum 3360=1；for I :=1 to

6、 n do sum :=sum * I；Writeln(n，=，總計(jì))；End .練習(xí)2參考過(guò)程var i，n，s:integerBegin for i:=1到100 do if (I mod 2=1)和(I mod 3=1)和(I mod 5=1)then writeln(I)；End .var m、a、b、c:integerBegin for m:=100至999 do begin a:=m div 100b :=(m-a* 100)div 10；C :=m mod 10if a* a* a b* b * b c * c * c=m then writeln(m)end end .條件循環(huán)

7、、For循環(huán)語(yǔ)句應(yīng)用于已知次數(shù)的循環(huán)結(jié)構(gòu)，但有時(shí)根據(jù)是否滿足以下條件來(lái)確定是否結(jié)束循環(huán)：While循環(huán)語(yǔ)句和Repeat循環(huán)語(yǔ)句。接下來(lái)，我將分別介紹這兩個(gè)語(yǔ)句的使用方法。while語(yǔ)句，while語(yǔ)句用于“滿足條件時(shí)執(zhí)行循環(huán)”，因此也稱為“類型循環(huán)”。While語(yǔ)句的語(yǔ)法格式如下：while do while循環(huán)語(yǔ)句的執(zhí)行流程如圖所示。While語(yǔ)句使用以下說(shuō)明：(1)如果布爾表達(dá)式為true，則執(zhí)行循環(huán)體；如果為false，則完全不進(jìn)入循環(huán)體。(2)如果布爾表達(dá)式的值最初為假，則while循環(huán)不會(huì)一次執(zhí)行一次。(3)相反，如果布爾表達(dá)式始終為真，則循環(huán)不會(huì)結(jié)束，而是成為“死循環(huán)”。若要避免

8、發(fā)生此情況，回路本體必須具有變更布林表示式結(jié)果的動(dòng)作。repeat語(yǔ)句，Repeat語(yǔ)句用于循環(huán)結(jié)構(gòu)：“重復(fù)循環(huán)主體，直到指定條件為真”。這有時(shí)稱為“結(jié)束循環(huán)”。Repeat語(yǔ)句的語(yǔ)法格式為repeat循環(huán)語(yǔ)句until布爾表達(dá)式repeat循環(huán)語(yǔ)句的執(zhí)行流。Repeat語(yǔ)句使用說(shuō)明。(1)先執(zhí)行循環(huán)主體，然后如果布爾表達(dá)式的值為false，則繼續(xù)循環(huán)，如果為true，則結(jié)束循環(huán)。(2)與while循環(huán)類似，循環(huán)中必須存在影響布爾表達(dá)式的操作，以便結(jié)束repeat循環(huán)迭代。否則，循環(huán)是死循環(huán)。(3)與while循環(huán)不同，repeat循環(huán)至少執(zhí)行一次循環(huán)，無(wú)論布爾表達(dá)式是否為真。另外，請(qǐng)記住，w

9、hile循環(huán)和repeat語(yǔ)句都屬于條件循環(huán)語(yǔ)句，因此通?？梢孕扈崔D(zhuǎn)換這兩個(gè)語(yǔ)句，使用任何語(yǔ)句時(shí)都取決于實(shí)際情況。示例：要在一年后獲取第n個(gè)閏年，請(qǐng)輸入y和n，以輸出y年后第n個(gè)閏年的年編號(hào)。如果y可以被4整除，但不能被100整除，或者y不能被400整除，則y是閏年。判斷y是閏年的布爾表達(dá)式(y mod 4=0) and (y mod 1000)或(r mod 400=0)開始時(shí)，每年都要進(jìn)行判斷。如果確定y年是閏年，則下一個(gè)閏年為y 4*s(s1)。也就是說(shuō)，每隔4年就可能有閏年。因此，設(shè)置步驟變量s。初始值為1。找到第一個(gè)閏年時(shí)，s改成了4。、var y、n、s:integer；年份編號(hào)，

10、間隔的閏年數(shù)，千長(zhǎng)值begin write(begining year and numbers:)；Readln (y，n)；輸入年數(shù)和間隔的閏年數(shù)s:=1。初始化步長(zhǎng)值repeat if (y mod 4=0) and (y mod 1000)或(y mod 400=0) then begin y為閏年時(shí)的年度編號(hào)writeln (y，yeln)步長(zhǎng)值為4 end設(shè)置為。then _ _ _ _ _ _ _ _ _ _ _ until _ _ _ _ _ _ _ _ end . main、var y、nReadln (y，n)；s:=1；Whilen0 do begin if (y mod 4=0)和(y mod 1000)或(y mod 400=0) then begin writeln (y，year)；n:=n-1；s:=4；End；then y:=y s；結(jié)束結(jié)束。n:=n-1；間隙中的閏年數(shù)-1，y:=y s；移至s年，然后n=0；閏年n直到輸出為止：計(jì)算Sum=1 3 5 n(n為大于1的奇數(shù))，Sum10000時(shí)n的最大值，Var n，Sum，integer