Fortran程序

1、程序分段：一個程序由一個或若干個程序單位組成。主程序和每一個子程序分別是一個獨立的程序單位。子程序是實現模塊化的有效方法。

2、每一個程序單位都是以“END”語句結束。主程序段中的END語句作用是使程序“停止運行”；子程序段中的END語句是“使流程返回調用程序”。

3、一個程序有且僅有一個主程序段，可以有0個或若干個子程序段。

4、一個程序單位包括若干行。FORTRAN行分為兩類：即語句行和非語句行。

其中語句行由一個FORTRAN語句組成。FORTRAN語句又可分為執行語句和非執行語句。非語句行，即為註釋行。

5、FORTRAN程序的基本成份是語句。一行只能有一個語句。若一個語句太長，一行內寫不下，可分寫在幾行上，但要用“續行標誌”。

6、FORTRAN程序中語句允許有標號，以便被其他句引用。

7一個程序單位中各類語句的位置是有一定規則的。一般是非執行語句放在所有可執行語句之前。 ^[2] 

FORTRAN語言程序的書寫格式要求很嚴格。一個程序由多行組成，但每一行上都是80列，每一行上最多可以書寫80個字符。其中這80列可以分為四個區：

(1)標號區：第1列至第5列。標號最多由五位數組成。在標號區內的空格不起作用。標號的大小與所在行的位盟也無關。標號不能超越出標號區的範圍。

(2)續行區：也稱為續行標誌區，位於第6列。如果在一行的第6列上寫一個非零和非空格的任一FORTRAN字符，則表明該行是其上一行的續行。一個語句最多可以有19個續行(共1320個字符)。使用續行時，可以在上一行的任一位置中斷而直接轉到下一行。

(3)語句區：位於第7列到第72列。我們不必須在第7列就開始寫語句，可以從第8列或第9列開始寫。但在一行中，只能寫一個語句，語句區內的空格是無效的。如果語句太長，一行寫不下，可以使用續行。

(4)註釋區：位於第73列到第80列。它是用於程序的註釋或標誌。當然，可以用註釋行對一個FORTRAN程序作註釋。註釋區不是程序的一部分，編譯時對這個區的內容不予翻譯。

程序中的行可以分為以下幾類：註釋行、起始行、繼續行、結束行。 ^[3] 

FORTRAN的所有語句分為可執行語句和非執行語句兩大類。

可執行語句能使FORTRAN編譯程亭產生目的程序指令。FORTRAN主要有以下三種可執行語句：

1) 賦值語句；

2) 控制語句；

3) 輸入/輸出語句。

非執行語句為FORTRAN編譯程序描述程序的數據類型和排列順序，併為目的程序提供有關輸入/輸出格式和數據初始化信息。非執行語句有五種；

1) 説明語句；

2) 數據初始化語句；

3) 格式(FORMAT)語句；

4) 函數(FUNCTION)定義語句；

5) 子程序説明語句。 ^[4] 

下面給出語句順序所應遵守的一般原則：

(1)程序段的段頭語句，只能出現在每個程序段開始的位置。如：PROGRAM、FUNCTI0N、SUBROUTINE、BLOCK、DATA、MODULE等；

(2)如果出現USE語句，則只能出現在段頭語句之後、其他語句之前；

(3)IMPLICIT NONE語句應緊跟在USE語句之後，在其他説明語句之前；

(4)FORMAT語句和DATA語句也可以放置在可執行語句中間，不過把DATA語句放置在可執行語句中間是一種過時的做法；

(5)PARAMETER語句可以出現在DATA語句和可執行語句之前、IMPLICIT NONE語句之後的任何位置上；

(6)其他説明語句應出現在DATA語句和可執行語句之前； ^[5]