第3章最基本的FORTRAN語句FORTRAN程序設計1FORTRAN語句

FORTRAN語句分為可執行語句和不可語句。可執行語句：計算機在執行的過程中是要執行的。標準格式書寫時，根據具體情況語句標號可以寫也可以不寫。不可執行語句：計算機在執行的過程中是不執行的。標準格式書寫時，語句標號一定不能寫或語句標號一定要寫（僅指FORMAT語句）。2算術賦值語句

算術賦值語句的一般格式：

xxxxxv=e

其中：v是變量名或數組元素。

e是算術表達式。作用：將算術表達式e的結果賦給變量v3參數說明語句的一般格式：

parameter(參數名=常數,……)作用：將常數賦給參數名。例如：parameter(pi=3.1415926,k=100,a0=214.0,imax=5)程序中定義的參數名只能夠在表達式中使用，不能對它賦值。參數說明語句4輸入和輸出一：帶格式輸出語句的一般形式

XXXXXwrite(設備號，格式語句標號）變量名表語句標號format(1x,格式說明符表）變量名表:由若干個變量名或數組元素相互間用逗號分割組成的內容。格式說明符表：由若干個格式說明符相互間用逗號分割組成的內容。5例如：write(10,20)m,n20format(1x,i10,i10)數值型格式說明符：Iw（整型輸出）w為十進制正整數，表示輸出整數的寬度fw.d(小數點型輸出）w,d為十進制正整數，w表示輸出數據的寬度,d表示小數部分占的位數

Ew.d（指數型輸出）w,d為十進制正整數，w表示輸出數據寬度,d表示指數型小數部分的位數輸入和輸出6

輸入和輸出非數值型格式說明符：X型格式符：

nXn為十進制正整數，空n格H型格式符：

nHh1h2…hn

n為十進制正整數，原樣輸出h1h2…hn

或‘h1h2…hn’原樣輸出h1h2…hn

格式符的重復數：

n格式符n為十進制正整數，表示格式符的重復數例如：write(5,10)i1,i2,a,b,c10format(1x,2i8,2x,2f10.3,2x,2Hc=,e12.5)7輸入和輸出二：帶格式輸入語句的一般形式

XXXXXread(設備號，格式語句標號）變量名表語句標號

format(格式說明符表）例如：read(5,20)a,b,k20format(2f7.4,i5)執行以上輸入時，輸入數據是：35000415002或3.54.152或3.5,4.15,28stop、pause語句一：stop語句的一般格式xxxxxstop或xxxxxstop八進制數終止程序的執行。二：pause語句的一般格式xxxxxpause或xxxxxpause八進制數暫時停止程序的執行。三：stop語句、pause語句和END行的區別9應用舉例編寫求三角形的面積的FORTRAN程序。

read(5,10)a,b,cformat(3f8.3)s=(a+b+c)/2.0area=sqrt(s*(s-a)*(s-b)*(s-c))write(5,20)a,b,c,areaformat(1x,2ha=,f8.3,3x,2hb=,f8.3,3x,2hc=,f8.3,3x5harea=,f8.3)end10應用舉例編寫求5個數中絕對值最大的數的FORTRAN程序。

read(5,10)a,b,c,d,eformat(5f8.3)

arge=max(a,b,c,d,e)write(5,20)arge20format('THEGREATERNUMBERIS',f10.3)end11應用舉例“雞兔同籠問題”在一個籠子里養著雞與兔，但不知其中雞有多少只，兔有多少只。只知道雞和兔的總數是a，雞與兔的總腳數是b，求雞與兔各有多少只。思路分析：首先從題目本身開始，找出解決問題的基本思路。每只雞有兩只腳，每只兔有四只腳。假設有x只雞和y只兔，則根據已知條件可列出如下方程組：

x+y=a2x+4y=b對該方程組做進一步的轉換可得：y=(b-2a)/2x=(4a-b)/212應用舉例算法描述：定義integer變量a,b,x,y輸入雞和兔的總數a及輸入雞與兔的總腳數b計算雞的數量x計算兔的數量y輸出雞的數量輸出兔的數量源程序清單：integera,b,x,yread(*,*)a,bx=(4*a-b)/2