循環(huán)結(jié)構(gòu)程序設(shè)計(jì)

1、第3章循環(huán)結(jié)構(gòu)程序設(shè)計(jì)第3章循環(huán)結(jié)構(gòu)程序設(shè)計(jì)第1節(jié)For循環(huán)程序?qū)嵗締?wèn)題描繪】計(jì)算一副撲克牌的點(diǎn)數(shù)，此中牌A為1點(diǎn)，牌J、Q、K分別為11、12、13點(diǎn)，大、小王不算點(diǎn)?！締?wèn)題剖析】依據(jù)題意，要計(jì)算一副撲克牌的點(diǎn)數(shù)，能夠先求出一栽花色牌的點(diǎn)數(shù)和，再乘以4即可。進(jìn)一步剖析，求一栽花色牌的點(diǎn)數(shù)和，即是求113的連續(xù)自然數(shù)之和。我們用S表示所求數(shù)的和，用T表示加數(shù)，這樣能夠讓T從1變化到13，每次讓T不停加入到S中，就能夠求出S的值，最后乘以4即可?！舅惴ㄔO(shè)計(jì)】自然語(yǔ)言置初值，即S=0，T=1；使S=S+T，所求出的和仍放入S中；使T增添1，即T=T+1；假如T小于等于13，轉(zhuǎn)第二步，不然轉(zhuǎn)第五步

2、；輸出計(jì)算結(jié)果。程序流程圖和結(jié)構(gòu)化流程（N-S）圖S:=0，T：=1TNSS+T，T=T+1輸出S的值【程序設(shè)計(jì)】程序清單programex3_1;25Pascal編程入門(mén)vars,t:integer;begins:=0;S置初值為0fort:=1to13doFor循環(huán)語(yǔ)句s:=s+t;writeln(total:,s*4);end.運(yùn)轉(zhuǎn)示例total:364【知識(shí)拓展】1在程序辦理過(guò)程中，常常需要對(duì)某一條或一組語(yǔ)句重復(fù)履行多次，以最后達(dá)成某項(xiàng)任務(wù)，這就是循環(huán)。關(guān)于重復(fù)次數(shù)已知，而不依靠循環(huán)中語(yǔ)句的結(jié)果，常用計(jì)數(shù)循環(huán)（for/to/do語(yǔ)句）。2for循環(huán)語(yǔ)句格式：格式一：for控制變量:=初

3、值to終值do循環(huán)體語(yǔ)句；格式二：for控制變量:=初值downto終值do循環(huán)體語(yǔ)句；此中for、to、downto、do為保存字，do后邊的語(yǔ)句稱為循環(huán)體。此中循環(huán)控制變量能夠是整型、字符或布爾型，但不可以為實(shí)型。一般地，能夠是次序種類(lèi)數(shù)據(jù)。初值、終值表達(dá)式往常要與控制變量的種類(lèi)相同。在for語(yǔ)句中假如使用的是to,稱為遞加型計(jì)數(shù)循環(huán)語(yǔ)句，假如使用的是downto，稱為遞減型計(jì)數(shù)循環(huán)語(yǔ)句。3For語(yǔ)句的履行過(guò)程：先將初值表達(dá)式的值計(jì)算出來(lái)并賦給循環(huán)控制變量。判斷循環(huán)控制變量的值能否已“超出”終值（關(guān)于遞加型循環(huán)來(lái)說(shuō)，“超出”是指“大于”；對(duì)遞減型循環(huán)來(lái)說(shuō)，“超出”是指“小于”）。如已超出，

4、則跳到步驟。假如未超出終值，則履行do后邊的語(yǔ)句（稱為循環(huán)體）。循環(huán)變量遞加(或遞減)。返回履行步驟。循環(huán)結(jié)束，履行for循環(huán)下邊的一個(gè)語(yǔ)句4使用For語(yǔ)句的的注意事項(xiàng)：循環(huán)控制變量一定為次序種類(lèi)。比如，能夠是整型、字符型、布爾型，不可以為實(shí)型，如：fori=3.5to8.5dowrite(i)是錯(cuò)誤的。循環(huán)控制變量的值遞加或遞減的規(guī)律是：假如遞加型循環(huán)，則按Succ函數(shù)規(guī)律變26第3章循環(huán)結(jié)構(gòu)程序設(shè)計(jì)化；假如遞減型循環(huán)，則按Pred函數(shù)規(guī)律變化。比如：fork:=atozdowrite(k)將按次序打印出26個(gè)小寫(xiě)英文字母“abcdz”。循環(huán)體能夠是一條基本語(yǔ)句，也能夠是一條復(fù)合語(yǔ)句。比如：

5、forj:=1tondobeginreadln(x);wreteln(x+1)end;循環(huán)語(yǔ)句的范圍直到end才結(jié)束。循環(huán)控制變量不得在循環(huán)體內(nèi)再被賦值。比如：forx;=1to10dobeginx:=2*z+1;end；是錯(cuò)誤的。循環(huán)控制變量的初值和終值一經(jīng)確立，循環(huán)次數(shù)就確立不變了。循環(huán)的次數(shù)可用以下公式計(jì)算：0若初值終值遞加型循環(huán)的循環(huán)次數(shù)=Ord(終值)-Ord(初值)+1若初值終值0若初值終值遞減型循環(huán)的循環(huán)次數(shù)=Ord(初值)-（終值）+1若初值終值【同步練習(xí)】1宰相的麥子：相傳古印度宰相達(dá)依爾，是國(guó)際象棋的發(fā)明者。有一次，國(guó)王因?yàn)樗呢暙I(xiàn)要獎(jiǎng)賞他，問(wèn)他想要什么。達(dá)依爾說(shuō)：“只需在

6、國(guó)際象棋棋盤(pán)上（共64格）擺上這么些麥子就行了：第一格一粒，第二格兩粒，后邊一格的麥子老是前一格麥子數(shù)的兩倍，擺滿整個(gè)棋盤(pán)，我就感恩不盡了?！眹?guó)王一想，這還不簡(jiǎn)單。于是令人扛來(lái)一袋麥子，可很快用完了，又扛來(lái)一袋，很快用完了國(guó)王很奇異，請(qǐng)你幫國(guó)王計(jì)算一下，要多少麥子。（1立方米的麥子約為1.42108粒）問(wèn)題剖析：關(guān)于編程類(lèi)問(wèn)題的描繪，要特別注意正確、全面地理解題意,要學(xué)會(huì)從描繪性語(yǔ)言中抽象出詳細(xì)的數(shù)據(jù)，并成立數(shù)學(xué)模型。在此題中依據(jù)“國(guó)際象棋棋盤(pán)上共有64格，第一格一27Pascal編程入門(mén)粒，第二格兩粒，后邊一格的麥子老是前一格麥子數(shù)的兩倍”的題意，我們能夠成立數(shù)學(xué)模型：第一格為20，第二格為

7、21，第三格為22，第64格為263，設(shè)64格中應(yīng)放麥子數(shù)為S，則可用下邊的公式表示：S=20+21+22+23+2631立方米的麥子約為1.42108粒，那么S粒麥子的體積T為：T=S/（1.42108）立方米。這樣我們將問(wèn)題轉(zhuǎn)變?yōu)橐话銛?shù)學(xué)模型，再依據(jù)數(shù)學(xué)模型寫(xiě)出算法設(shè)計(jì)，再寫(xiě)出詳細(xì)程序就水道渠成。程序清單programp3_1_2（input,output）;varn,s,t:integerbegins:=0;forn:=0to63dos:=s+2n;t:=s/(1.42*108)writeln(s=,s,)writeln(t=,t);end.運(yùn)轉(zhuǎn)示例S=1.84467441E+19T=1

8、.29906648E+112閱讀下邊的程序，說(shuō)明該程序的作用。程序清單programp3_1_3（input,output）;vara,b,c:integer此處integer表示整型數(shù)據(jù)begingwriteln(請(qǐng)隨意輸入一個(gè)數(shù)：);readln(b);forc:=1to5dobeginread(a);ifabthenb:=a;28第3章循環(huán)結(jié)構(gòu)程序設(shè)計(jì)end;writeln(最后的值是：，b:5);end.運(yùn)轉(zhuǎn)示例請(qǐng)隨意輸入一個(gè)數(shù)：64713811最后的值是：13第2節(jié)當(dāng)循環(huán)程序?qū)嵗締?wèn)題描繪】農(nóng)場(chǎng)主的估算報(bào)告放暑期學(xué)校組織夏令營(yíng)到達(dá)一個(gè)農(nóng)場(chǎng)，農(nóng)場(chǎng)主熱忱的招待了他們。在觀光時(shí)，同學(xué)們發(fā)此

9、刻農(nóng)場(chǎng)的左上角圈出了一塊地方，這兒陽(yáng)光充分，通風(fēng)也不錯(cuò)，但卻什么也沒(méi)有，感覺(jué)很奇異。農(nóng)場(chǎng)主告訴大家因?yàn)檗r(nóng)場(chǎng)四周由很多小朋友因沒(méi)錢(qián)交學(xué)費(fèi)而綴學(xué)，所以決定引進(jìn)品種不錯(cuò)的雌雄一對(duì)小白兔，在這飼養(yǎng)。小白兔需經(jīng)過(guò)一個(gè)月才能長(zhǎng)大，長(zhǎng)大后每個(gè)月都生雌雄一對(duì)小白兔。想等小白兔生殖到1000對(duì)的時(shí)候，在散發(fā)給四周貧窮的人，希望能幫助他們從頭進(jìn)入講堂。現(xiàn)正在寫(xiě)一份估算報(bào)告，此中估計(jì)所需時(shí)間卻卻沒(méi)算出來(lái)。同學(xué)們此刻就讓我們來(lái)幫助這位好意的農(nóng)場(chǎng)主算出時(shí)間。【問(wèn)題剖析】這問(wèn)題從表面來(lái)看好象沒(méi)有什么規(guī)律，不如設(shè)計(jì)一張表格來(lái)計(jì)算一下。月份123456兔子數(shù)（對(duì)）12481632因?yàn)榈谝粋€(gè)月小白兔沒(méi)長(zhǎng)大，所以兔子數(shù)是1對(duì)。到

10、了第二個(gè)月小白兔長(zhǎng)大了，生了一對(duì)小白兔，兔子數(shù)是2對(duì)。第三個(gè)月小白兔也長(zhǎng)大了，大白兔是2對(duì)，它們都生了一對(duì)小白兔，兔子數(shù)是4對(duì)。依此類(lèi)推，發(fā)現(xiàn)除了第一個(gè)月，其余都是：前一個(gè)月的兔子數(shù)2=本月兔子數(shù)。我們發(fā)現(xiàn)這又是一個(gè)循環(huán),直到兔子數(shù)為1000對(duì)的時(shí)候結(jié)束。但是用for語(yǔ)句明顯不可以，因?yàn)槲覀儾恢姥h(huán)的次數(shù)。下邊我們用當(dāng)型循環(huán)（while/do語(yǔ)句）來(lái)編寫(xiě)程序。農(nóng)場(chǎng)主的估算能夠描繪以下:月份:=1;兔子數(shù):=1;預(yù)約義第一個(gè)月的兔子數(shù)是1對(duì)while兔子數(shù)1000do當(dāng)兔子數(shù)小于1000對(duì)時(shí)進(jìn)入循環(huán)begin29Pascal編程入門(mén)月份:=月份+1;兔子數(shù):=兔子數(shù)*2;end;【程序設(shè)計(jì)】程

11、序清單programp4-1(input,output);varmonth,rabbit:integer;beginmonth:=1;rabbit:=1;whilerabbit0DOBEGINWriteln(k);k:=k-1END;此中(1)WHIlE和DO是PASCAL保存重點(diǎn)字，是WHILE循環(huán)語(yǔ)句的構(gòu)成部分。保存重點(diǎn)字DO后邊的“語(yǔ)法”只好是一條語(yǔ)句，稱為“循環(huán)體”；假如循環(huán)體中需要包括多個(gè)語(yǔ)句則應(yīng)當(dāng)如上例所示，采納一條復(fù)合語(yǔ)句。2WHILE循環(huán)的履行功能當(dāng)履行到WHILE語(yǔ)句時(shí)求出布爾表達(dá)式的值30第3章循環(huán)結(jié)構(gòu)程序設(shè)計(jì)(2)若布爾表達(dá)式的值為真，則履行循環(huán)體內(nèi)的語(yǔ)句；若為“假”，履

12、行步驟4重復(fù)步驟1和2循環(huán)結(jié)束，履行循環(huán)后邊的語(yǔ)句。3本例While循環(huán)的結(jié)構(gòu)化流程圖以下：While布爾表達(dá)式循環(huán)體語(yǔ)句【同步練習(xí)】1周末小明碰到一個(gè)風(fēng)趣的題目:找出四位整數(shù)abcd中知足下述關(guān)系的數(shù)：（ab+cd）（ab+cd）=abcd請(qǐng)你幫小明編寫(xiě)一個(gè)程序，找出知足條件的所有的數(shù)。問(wèn)題剖析：這道題屬于搜尋問(wèn)題，因?yàn)槭撬奈徽麛?shù)，不難看出范圍是從10009999，所求的數(shù)終究在哪里，沒(méi)法確立，只有在這個(gè)范圍內(nèi)從小到大一個(gè)一個(gè)進(jìn)行搜尋，對(duì)每一個(gè)數(shù)看它的高兩位數(shù)與低兩位數(shù)和的平方能否與該數(shù)相等。ab和cd兩個(gè)數(shù)能夠在abcd中將高兩位與低兩位分別開(kāi)來(lái)。我們能夠這樣考慮，將abcd整除100，可

13、獲得高兩位ab。如：abcd=1234，1234div100=12。有了ab，也便可用下邊的式子把低兩位cd分別出來(lái)：abcdab100=abcdab00=cd如：123412100=12341200=34同學(xué)們認(rèn)真想一想，在求解的過(guò)程中，條件都是相同的，不過(guò)abcd這個(gè)數(shù)不同。實(shí)質(zhì)上是在頻頻做同一個(gè)步驟。下邊我們用當(dāng)型循環(huán)來(lái)解這道題。31Pascal編程入門(mén)程序清單Programxuhuan(input,output);Vari,m,n,k:integer;BeginI:=1000；給I賦值，即abcd假定一個(gè)數(shù)；WhileI=9999do判斷I（即abcd）的值能否高出范圍，；假如超出則不

14、履行循環(huán)Begin體中的語(yǔ)句，結(jié)束循環(huán)；M:=Idiv100;分別出ab和cd兩個(gè)數(shù)，假如切合條件，就寫(xiě)出來(lái)；N:=I-m*100;K:=(m+n)*(m+n);Ifk=IthenWriteln(切合條件的四位整數(shù)是：，I);I:=I+1I的值加1；End;End.運(yùn)轉(zhuǎn)示例切合條件的四位整數(shù)是：2025切合條件的四位整數(shù)是：3025切合條件的四位整數(shù)是：98012從n個(gè)數(shù)中精選出最大的數(shù)。問(wèn)題剖析：此題能夠借助于古代比武的“打擂臺(tái)”來(lái)比喻：先有隨意一人站在擂臺(tái)上，而后第二個(gè)人上來(lái)與它比武，勝者留在臺(tái)上，這樣頻頻進(jìn)行下去，直到第n個(gè)人比完為止（要注意：一共比n-1次），這樣最后留在臺(tái)上的人必定是

15、最強(qiáng)者。設(shè)計(jì)算法:從n個(gè)數(shù)中任選一數(shù)放在變量X中，并設(shè)一計(jì)數(shù)器m=0（這里變量X就是比武的擂臺(tái)，m=0表示還沒(méi)有進(jìn)行比較）;32第3章循環(huán)結(jié)構(gòu)程序設(shè)計(jì)將下一個(gè)數(shù)與X中的數(shù)進(jìn)行比較;使m的值加1（計(jì)一次數(shù)）；若m的值小于（n-1），則從頭進(jìn)行第步，不然履行下一步；輸出此時(shí)X的值，即為n個(gè)數(shù)中的最大者；結(jié)束。程序清單PROGRAM323(input,output);VARn,x,m,y:integer;BEGINwrite(輸入共需參加比較的總數(shù):);readln(n);write（先將n個(gè)數(shù)的第一個(gè)數(shù)輸入給變量x）;readln(x);m:=0;whilem=ythenx:=y;m:=m+1;E

16、ND;write(n,個(gè)數(shù)中最大的是：,x);END.運(yùn)轉(zhuǎn)示例輸入共需參加比較的總數(shù):3先將n個(gè)數(shù)的第一個(gè)數(shù)輸入給變量x:1輸入一個(gè)其余參加比較的數(shù)2輸入一個(gè)其余參加比較的數(shù)103個(gè)數(shù)中最大的是：10第3節(jié)直到循環(huán)程序?qū)嵗?3Pascal編程入門(mén)【問(wèn)題描繪】小明和小強(qiáng)是好朋友，他倆都喜歡數(shù)學(xué)，一個(gè)周末的下午他們進(jìn)行了一場(chǎng)競(jìng)賽，題目是這樣的：隨意給出兩個(gè)正整數(shù)M和N，求出M和N的最大條約數(shù)，看誰(shuí)算的又快又準(zhǔn)。請(qǐng)你用計(jì)算機(jī)編寫(xiě)一程序幫助他倆又快又準(zhǔn)的計(jì)算出M和N的最大條約數(shù)。【問(wèn)題剖析】設(shè)用M作為被除數(shù)，N作為除數(shù)，R作為余數(shù)。這樣我們就能夠用展轉(zhuǎn)相除法求出M和N的最大條約數(shù)，展轉(zhuǎn)相除法的詳細(xì)算法

17、以下：第1步：輸入M和N的值；第2步：求出M除以N所得的余數(shù)R；第3步：將N的值賦給M，R的值賦給N；第4步：若R=0，則M為所求得的最大條約數(shù)，轉(zhuǎn)第5步，不然轉(zhuǎn)第1步；第5步：輸出最大條約數(shù)M的值。依據(jù)上述算法，我們能夠用結(jié)構(gòu)化流程（N-S）圖表示該算法：輸入M和N的值RM除以N的余數(shù)MN，NRR=0輸出M的數(shù)值【程序設(shè)計(jì)】程序清單Programp3_3_1（input,output）;varm,n,r:real;beginwrite(輸入兩個(gè)正整數(shù)：)；readln(m,n);ifnmthenbeginr:=n;n:=m;m:=r;end;repeat34第3章循環(huán)結(jié)構(gòu)程序設(shè)計(jì)r:=mmo

18、dn;m:=n;n:=r;untilr=0;writeln(m,和,n,最大條約數(shù)是：，m)end.運(yùn)轉(zhuǎn)示例輸入兩個(gè)正整數(shù)：11277112和77最大條約數(shù)是：7輸入兩個(gè)正整數(shù)：123412和34最大條約數(shù)是：2【知識(shí)拓展】1在程序設(shè)計(jì)中，假如需要在履行了某操作過(guò)程以后，再依據(jù)某一指定條件判斷是否重復(fù)履行，應(yīng)采納直到循環(huán)語(yǔ)句，即repeat-until語(yǔ)句實(shí)現(xiàn)循環(huán)。此語(yǔ)句的含義是：“重復(fù)履行循環(huán)體，直到指定條件為真時(shí)為止”。2Repeat-until語(yǔ)句格式：repeatuntil它的N-S圖以下列圖所示。循環(huán)體語(yǔ)句until布爾表達(dá)式此中repeat和until為保存字。3它的履行過(guò)程：履行

19、循環(huán)體；計(jì)算布爾表達(dá)式的值，若為false則返回，不然，退出循環(huán)體履行下一語(yǔ)句。4它的特色是：先履行（循環(huán)體），后判斷（布爾表達(dá)式）。repeat-until是一個(gè)整體，它是一個(gè)語(yǔ)句（結(jié)構(gòu)型語(yǔ)句），在這個(gè)句中能夠包括若干個(gè)語(yǔ)句，不要誤以為repeat是一個(gè)語(yǔ)句，until是一個(gè)語(yǔ)句；5Repeat語(yǔ)句與while語(yǔ)句都能夠?qū)崿F(xiàn)循環(huán)結(jié)構(gòu)，且能夠互相轉(zhuǎn)變，但有四點(diǎn)不同：Repeat語(yǔ)句While語(yǔ)句先履行語(yǔ)句，后判斷條件。先判斷后履行語(yǔ)句。指定語(yǔ)句能夠是多條語(yǔ)句，無(wú)需用指定語(yǔ)句只好是一條語(yǔ)句或一條復(fù)合語(yǔ)begin和end。句。35Pascal編程入門(mén)當(dāng)條件不可即刻重復(fù)履行。當(dāng)條件成即刻重復(fù)履行。不

20、論條件能否成立，總要履行一次指當(dāng)條件一開(kāi)始就不可即刻，則不履行循環(huán)定語(yǔ)句序列。中的指定語(yǔ)句。【同步練習(xí)】1利用格里高公式求。=1-1+1-1+,直到最后一項(xiàng)的值小于10-6為止。4357問(wèn)題剖析：解此題的重點(diǎn)就是求右側(cè)數(shù)值序列的和，序列有明顯的特色：分母是從1開(kāi)始的奇數(shù)，加、減號(hào)輪番出現(xiàn)，所以，我們能夠用n=n+2表示序列數(shù)值的變化，用f=-f來(lái)設(shè)置它們各項(xiàng)的符號(hào)位。畫(huà)出程序的N-S圖。程序清單programex2_34;varf:integer;n,t,pai:real;beginpai:=0;t:=1;n:=1.0;f:=1;repeatpai:=pai+1;n:=n+2.0;f:=-f;

21、t:=f/nuntilabs(t)1e-6;pai:=pai*4;writln(pai=,pai:10:8);readlnend.pai:=0;t:=1;n:=1;f:=1pai:=pai+tn:=n+2.0f:=-ft:=f/nuntilabs(t)maxTHENmax:=aELSEIFa=9avg:=s/i;writeln(最大值是:,max,最小值是:,min);writeln(10個(gè)數(shù)和是:,s,10個(gè)數(shù)均勻值是:,avg：5：1);END.運(yùn)轉(zhuǎn)示例最大值是:10最小值是:110個(gè)數(shù)和是:5510個(gè)數(shù)均勻值是:5.5第4節(jié)多重循環(huán)程序?qū)嵗締?wèn)題描繪】一個(gè)炊事員上街采買(mǎi),用500元錢(qián)買(mǎi)了

22、90只雞,此中母雞一只15元,公雞一只10元,小雞一只5元,正好把錢(qián)買(mǎi)完。問(wèn)母雞、公雞、小雞各買(mǎi)多少只？【問(wèn)題剖析】設(shè)母雞I只，公雞J只，小雞為k只，我們可列方程組：I+J+K=9015I+10J+5K=500明顯這是一個(gè)不定方程組，一般狀況下有多解。由方程可得I和J、K的取值范圍：0I90，0J90，0K90我們用窮舉法在范圍內(nèi)搜尋求解?！境绦蛟O(shè)計(jì)】程序清單programex3_4_1;vari,j,k:integer;beginfori:=0to90doforj:=0to90dofork:=0to90doif（i+j+k=90）AND（15*i+10*j+5*k=500）thenwrite

23、ln(i:5,j:5,k:5);end;38第3章循環(huán)結(jié)構(gòu)程序設(shè)計(jì)運(yùn)轉(zhuǎn)示例0108018812682348342845085【知識(shí)拓展】1以上的程序是一個(gè)三重的for循環(huán)嵌套。循環(huán)體由PASCAL語(yǔ)句構(gòu)成，自然也能夠包含F(xiàn)OR語(yǔ)句，這就構(gòu)成了循環(huán)的嵌套，形成多重循環(huán)。2為了減少無(wú)用的循環(huán)次數(shù)，我們進(jìn)一步研究題目，剖析后，能夠?qū)⒀h(huán)次數(shù)減小，這里I的值能夠是0到33（因?yàn)榧偃?00元錢(qián)所有用來(lái)買(mǎi)母雞，最多能夠買(mǎi)500/15只），相同J的值能夠從0到50。知道I和J的值，又可求出K的值為90-I-J，這樣又可減少循環(huán)嵌套的層數(shù)。以上的程序能夠優(yōu)化為：programrex4_6;vari,j,k:i

24、nteger;beginfori:=0to33doforj:=0to50dobegink:=90-i-j;if15*i+10*j+5*k=500thenwriteln(i:5,j:5,k:5);end;end.優(yōu)化后的程序運(yùn)轉(zhuǎn)速度會(huì)大大提升。在此后設(shè)計(jì)程序時(shí)，同學(xué)們不單要注意怎樣解題，還要盡量使程序優(yōu)化，提升運(yùn)轉(zhuǎn)速度?！就骄毩?xí)】1試編寫(xiě)能夠打印輸出以下列圖形的程序：#39Pascal編程入門(mén)問(wèn)題剖析：這道題屬于打印平面圖形問(wèn)題。程序的設(shè)計(jì)以下：由兩個(gè)并列循環(huán)外加一個(gè)嵌套循環(huán)構(gòu)成的。各環(huán)的作用為：1。外層循環(huán)控制打印的行數(shù)，此倒三角形共需8行，故外層循環(huán)的設(shè)置為遞減型循環(huán)。嵌套在外環(huán)內(nèi)的第一個(gè)

25、并列循環(huán)為空格輸出，依據(jù)圖形變化控制輸出不同數(shù)目的空格。3外環(huán)內(nèi)第二個(gè)并列循環(huán)為控制三角形每行中“#”號(hào)的個(gè)數(shù)。程序清單programex2_36;vari,j,k:integer;bginfori:=8downto1dobeginforj:=1to8idowrite();fork:=2*i-1downto1dowriteln;end;readlnend.2求s=1!+2!+3!+10!的值。問(wèn)題剖析：這個(gè)問(wèn)題是求10自然數(shù)的階乘之和，能夠用for循環(huán)來(lái)實(shí)現(xiàn)，經(jīng)過(guò)10次的循環(huán)可求出1!,2!,10!,并同時(shí)累加起來(lái),可求得S的值。而求T=N!,又能夠用一個(gè)for循環(huán)來(lái)實(shí)現(xiàn)，40第3章循環(huán)結(jié)構(gòu)程序設(shè)計(jì)構(gòu)成了二重循環(huán)。程序清單programex4_5;vart,s:real;i,j,n:integer;beginS:=0;forn:=1to10dobegint:=1;forj:=1tondot:=t*j;S:=S+t;end;writeln(s=,s:0:0);end.3333求100999中的水仙花數(shù)。（若三位數(shù)ABC，ABC=A+B+C，則稱ABC為水仙花數(shù)。比如153，13+53+33=1+125+27=153，則153是水仙花數(shù)。）問(wèn)題剖析：依據(jù)