2-順序結(jié)構(gòu)程序設(shè)計(2)

1、授課教師: 袁麗蓉Email: School of EngineeringSun YatSen University Gungzhou China第二章第二章 順序結(jié)構(gòu)程序設(shè)計（順序結(jié)構(gòu)程序設(shè)計（2）l 賦值語句l 簡單的輸入輸出語句l 程序控制語句l 程序舉例FORTRAN程序設(shè)計Page2賦值語句n賦值語句的類型：算術(shù)賦值語句，邏輯賦值語句，字符賦值語句n格式： L = R L：變量名、數(shù)組名、數(shù)組元素名等； R：一個表達式或常量； =：賦值符號。n說明：1）賦值語句具有先計算、后賦值雙重功能； 2）=和數(shù)學(xué)中的等號不同； 3）左端的變量和右端的表達式都有自己的類型、種別，它們的類型可以不

2、同；如果類型不同先按照表達式的計算規(guī)則得到表達式的值，再轉(zhuǎn)換為與變量相同的類型，然后賦值給變量。program mainimplicit noneInteger M,Nreal x,yM=5/2N=5.9/2X=5/2Y=5.0/2endFORTRAN程序設(shè)計Page3輸入輸出的概念n輸入和輸出是相對于計算機內(nèi)存而言的。n輸入：數(shù)據(jù)從外部設(shè)備(如鍵盤、磁盤、光盤等)輸送到計算機內(nèi)存的過程，又叫做“計算機從外部設(shè)備讀取數(shù)據(jù)”n輸出：數(shù)據(jù)從內(nèi)存輸送到外部設(shè)備(如顯示器、打印機、磁盤等)的過程，又叫做“計算機向外部設(shè)備寫數(shù)據(jù)”。n輸入輸出語句提供的信息： 1）在什么外部設(shè)備上輸人或輸出。 2）輸人或

3、輸出哪些數(shù)據(jù)。 3）用什么格式輸人或輸出。nFortran提供的輸入語句：read 輸出語句：print和writeFORTRAN程序設(shè)計Page4簡單的輸入輸出語句n簡單的輸入語句： read *，變量表 read(*,*)變量表n說明：1）從計算機系統(tǒng)隱含指定的輸入設(shè)備上輸入數(shù)據(jù)； 2）輸入變量中的數(shù)據(jù)（要求一一對應(yīng)）； 3）自由輸入格式。n注意：1）個數(shù)相同，類型一致；少了則等待，多了也沒用。 2）使用多個read 語句時，每一個read語句都是從一個新的輸入行開 始讀數(shù)。 3）輸入數(shù)據(jù)之間可出現(xiàn)斜線“”。read語句遇到“”，結(jié)束讀數(shù)。 4）如果read語句中有幾個連續(xù)的變量要賦以相同

4、的值，則可用重復(fù) 因子r，r表示某一數(shù)據(jù)重復(fù)出現(xiàn)的次數(shù)。 5）在一個數(shù)之間不能插入空格，空格是兩個數(shù)據(jù)間的分隔符。 program mainimplicit noneinteger x,y,zread*,xread*,y,zprint*,x,y,zend12 31,22,31,22,312*312/3FORTRAN程序設(shè)計Page5簡單的輸入輸出語句n固定格式輸出語句： print *，輸出表 write（*，*）輸出表n說明：1）Print語句的輸出設(shè)備由計算機系統(tǒng)隱含指定(打印機或顯示 器)，面用write語句則可以在任何設(shè)備（如磁盤、磁帶等)上輸 出，它的用途比print語句廣泛。 2）

5、write（*，*）第一個*表示輸出設(shè)備，第二個*表示輸出格式。 3）當(dāng)輸出語句中無輸出表時，則意味著輸出一個“空白行”。 4）系統(tǒng)對表控輸出中的不同類型的數(shù)據(jù)給出不同的（但固定的）輸 出格式。program example2implicit nonereal maxnum,minnum,x1,x2,x3read*,x1,x2,x3maxnum=max(x1,x2,x3)minnum=min(x1,x2,x3)print*,the max num is ,maxnumwrite(*,*)the min num is,minnumend1.1,2.2,3.3the max num is 3.30

6、0000the min num is 1.100000FORTRAN程序設(shè)計Page6stop語句n停止程序運行n作用：調(diào)試程序中使用，程序運行到此，會停止運行，并在屏幕上顯示提示標(biāo)記。n格式： stop n 其中n是不超過五位數(shù)的數(shù)字或字符串。FORTRAN程序設(shè)計Page7Pause語句npause語句即暫停語句。n作用：調(diào)試程序中使用，程序運行到此，會暫時停止，并在屏幕上顯示提示標(biāo)記，等待操作者輸入其它命令后程序繼續(xù)運行。n格式：pause n 其中n是不超過五位數(shù)的數(shù)字或字符串。 FORTRAN程序設(shè)計Page8END語句nEND語句是程序結(jié)束語句n作用： 1）結(jié)束本程序單元的運行，每

7、個完整的fortran程序都必須有END語句。 2）在FORTAN子程序中，同樣用END語句結(jié)束程序單元，同時還有返回被調(diào)用處的功能。FORTRAN程序設(shè)計Page9Parameter語句n參數(shù)說明語句：給常量命名的語句，即用一個名字代表一個常量。n作用：避免重復(fù)輸入，便于變更。n格式：1) real pi parameter（pi=3.1415926） 2) real，parameter: pi=3.1415926n說明：1）parameter語句是一種非執(zhí)行語句，在程序中要求被寫在與它有 關(guān)的類型說明語句之后以及所有可執(zhí)行語句之前。 2）一旦一個名字被定義成符號常量后，就不能再賦值。 3）

8、符號常量不能作為語句標(biāo)號，不能在格式說明語句中代替常 數(shù)，也不能出現(xiàn)在復(fù)型常量中(符號常量只能是整型、實型、邏 輯型和字符型常量) 除此之外，凡出現(xiàn)常量的地方均可用符號常 量代替。FORTRAN程序設(shè)計Page10Parameter語句應(yīng)用舉例n求園的周長和面積 program main real,parameter:PI=3.1415926,RA=2.0 real peri,area peri=2.0*PI*RA area=PI*RA*RA Print *,peri,areaendFORTRAN程序設(shè)計Page11分析程序，寫出結(jié)果 implicit noneinteger M,Nreal

9、a,b,xm=7n=4a=2.4b=1.2x=m/2+n*a/b+1/2print*,xendFORTRAN程序設(shè)計Page12分析程序，寫出結(jié)果implicit noneinteger M,Nreal a,b,xm=7n=4a=-2.4b=1.2x=mod(m,n)+sign(a,b)print*,xendFORTRAN程序設(shè)計Page13程序舉例n例2.4 已知：f(x)=x*3+sin(x)*sin(x)+ln(x*4+1),輸入自變量的值，求對應(yīng)的函數(shù)值。program mainimplicit nonereal x,yprint*,please input x:read*,xy=x*

10、3+sin(x)*sin(x)+log(x*4+1)print*,yendFORTRAN程序設(shè)計Page14程序舉例n例2.5 將兩個變量的值互換分析：用變量x，y存放待交換的數(shù)據(jù)，用臨時變量t保存其中一個變量，如x的值，在通過x=y，y=t實現(xiàn)交換。program mainimplicit nonereal x,yprint*,please input x,y:read*,x,yt=xx=yy=tprint*,x,yendFORTRAN程序設(shè)計Page15程序舉例n例2.6 輸入一個三位整數(shù)，將它反向輸出，如輸入123，輸出321.分析：用N代表輸入的三位整數(shù)，M代表要輸出的整數(shù)，N1代表個位，N2為十位，N3為百位。 則N=N3*100+N2*1