fortran90程序設(shè)計(jì)chapter7

1、第七章第七章循環(huán)結(jié)構(gòu)程序設(shè)計(jì)循環(huán)結(jié)構(gòu)程序設(shè)計(jì)循環(huán)結(jié)構(gòu)是三種基本控制結(jié)構(gòu)之一。使用循環(huán)結(jié)構(gòu)是優(yōu)化程序結(jié)構(gòu)的一種有效方法。本章將詳細(xì)介紹循環(huán)結(jié)構(gòu)及其程序設(shè)計(jì)方法有關(guān)內(nèi)容。7.17.1循環(huán)結(jié)構(gòu)概述循環(huán)結(jié)構(gòu)概述7.1.17.1.1循環(huán)及循環(huán)結(jié)構(gòu)循環(huán)及循環(huán)結(jié)構(gòu)在求解復(fù)雜問(wèn)題時(shí)常常遇到大量重復(fù)或相似的處理過(guò)程(計(jì)算過(guò)程、操作過(guò)程)。對(duì)于這些處理過(guò)程我們不難按順序結(jié)構(gòu)設(shè)計(jì)和編寫(xiě)程序。例如：從鍵盤(pán)輸入5個(gè)數(shù)求5個(gè)數(shù)之和并打印輸出計(jì)算結(jié)果。求解這個(gè)問(wèn)題我

2、們甚至?xí)患偎妓鞯夭捎庙樞蚪Y(jié)構(gòu)設(shè)計(jì)出求解算法編寫(xiě)出相應(yīng)程序。求解算法如下：(1)初始化：賦初值0.0至sum。(2)輸入一個(gè)數(shù)x并累加到sum中。(3)輸入一個(gè)數(shù)x并累加到sum中。(4)輸入一個(gè)數(shù)x并累加到sum中。(5)輸入一個(gè)數(shù)x并累加到sum中。(6)輸入一個(gè)數(shù)x并累加到sum中。(7)輸出結(jié)果sum。(8)結(jié)束。根據(jù)上述算法編寫(xiě)程序如下：sum=0.0READxsum=sumxREADxsum=sumxREADxsum=sum

3、xREADxsum=sumxREADxsum=sumxPRINTsum=sumEND71循環(huán)結(jié)構(gòu)概述171[例7.1]求S=123…N的值(N由鍵盤(pán)輸入N2)。編寫(xiě)程序。解：求解這一問(wèn)題將執(zhí)行N1次加法運(yùn)算如果將等式寫(xiě)成S=012…N則執(zhí)行N次加法運(yùn)算不同的是參與運(yùn)算的操作數(shù)不同而已。顯然該問(wèn)題易采用循環(huán)結(jié)構(gòu)實(shí)現(xiàn)之。用整型變量S保存和值用N保存求和最大值用I作計(jì)數(shù)器。編寫(xiě)程序如下：[例7.2]讀入某班級(jí)考試成績(jī)(人數(shù)不定)計(jì)算其平均成績(jī)

4、并輸出。編寫(xiě)程序。解：由于學(xué)生人數(shù)不定所以輸入的學(xué)生成績(jī)個(gè)數(shù)不確定以輸入1作為結(jié)束標(biāo)志(因?yàn)槌煽?jī)不可能為負(fù)數(shù))從而動(dòng)態(tài)確定學(xué)生人數(shù)n。平均成績(jī)計(jì)算公式是：av=(x1x2…xn)n對(duì)于計(jì)算平均成績(jī)問(wèn)題核心問(wèn)題是一個(gè)求和問(wèn)題類似[例7.1]問(wèn)題。程序易采用循環(huán)結(jié)構(gòu)和循環(huán)語(yǔ)句來(lái)實(shí)現(xiàn)。編寫(xiě)程序如下：從上述例題中可看出循環(huán)結(jié)構(gòu)或循環(huán)語(yǔ)句由兩部分組成：一部分是循環(huán)體指需要重復(fù)執(zhí)行的處理過(guò)程(語(yǔ)句序列、語(yǔ)句塊)另一部分是循環(huán)控制機(jī)制指根據(jù)條件判斷循