例如，在邊長(zhǎng)為B的正方形中挖一個(gè)半徑為R的圓，計(jì)算剩余的面積；若B<2R，則給出相關(guān)信息。該問(wèn)題的FORTRAN程序可編寫(xiě)如下。

　　CComputationofarea.READ*，B，RIF（B.LT.2*R）THENWRITE（*，10）

　　10FORMAT（‘Errormessage：Blessthan2*R’）

　　ELSEWRITE（*，，（“AREA=”，F(xiàn)10.2））

　　$B*B-3.14159*R*RENDIFEND本例中，第1行為注釋行，第5行為帶標(biāo)號(hào)的語(yǔ)句，第7~8行為連續(xù)行，符號(hào)$為續(xù)行標(biāo)志。

　　（三）常量與變量1.常量指程序中其值固定不變的一些量，包括以下6種類型。

　�。�1）整形常量，也稱整數(shù)。一個(gè)整數(shù)可采用正、負(fù)號(hào)和數(shù)字字符表示，正號(hào)可以省略……

　�。�2）實(shí)型常量，也稱實(shí)數(shù)�？梢杂眯�數(shù)形式或指數(shù)形式表示。用指數(shù)形式表示的實(shí)數(shù)如11.3E5，+11.3E+5，1.E-12，-.23E12等。

　�。�3）雙精度實(shí)型常量，或稱雙精度實(shí)數(shù)。雙精度實(shí)數(shù)也是實(shí)數(shù)。但在一般的微型計(jì)算機(jī)中，實(shí)數(shù)的有效位數(shù)為7位，雙精度實(shí)數(shù)的有效位數(shù)可以達(dá)到15~17位。雙精度實(shí)數(shù)的表示方法，除在指數(shù)形式的表達(dá)中用字符D代替E以外，其余和實(shí)數(shù)相同。

　�。�4）復(fù)型常量，簡(jiǎn)稱復(fù)數(shù)。在FORTRAN中，用一對(duì)圓括弧括起來(lái)的兩個(gè)實(shí)數(shù)表示。如（12.0，-6.E2）表示復(fù)數(shù)12.0—600.0i.（5）邏輯型常量。FORTRAN中的邏輯型常量有兩個(gè)值：.TRUE.與。FALSE.。

　　（6）字符型常量，也稱為字符串。計(jì)算機(jī)系統(tǒng)使用的若干個(gè)字符，用一對(duì)單引號(hào)括起來(lái)后，就作為字符串。

　　2.變量指在程序運(yùn)行期間可以改變的量。

　�。�1）變量的類型與常量相對(duì)應(yīng)，分為整型變量、實(shí)型變量、雙精度實(shí)型變量、復(fù)型變量、邏輯型變量與字符串變量。

　�。�2）變量名按一定的規(guī)則命名。在FORTRAN中，變量名采用1至6個(gè)字符（數(shù)字或字母），其中第一個(gè)字符必須是字母。FORTRAN77規(guī)定，變量名書(shū)寫(xiě)時(shí)不區(qū)別字母的大寫(xiě)與小寫(xiě)，例如ABc與aBC都指同一個(gè)變量。（3）變量類型的說(shuō)明方法。

　　1）I-N隱含規(guī)則。在程序單位中沒(méi)有其他說(shuō)明時(shí)，以字母I，J，K，L，M，N中的任一個(gè)字母打頭命名的變量都是整型變量。

　　2）用類型說(shuō)明語(yǔ)句規(guī)定變量類型。例如：

　　INTEGERA，COUNTREALICOUNTDOUBLEPRECISIONXINGCOMPLEXDUPLOGICALJUGCHARACTER頭10FILENM分別表示變量A，COUNT為整型，ICOUNT為實(shí)型，XING為雙精度實(shí)型，DUP為復(fù)制，JUG為邏輯型，F(xiàn)ILENM為字符型變量，其長(zhǎng)度為10個(gè)字符。

　　3）用隱含說(shuō)明語(yǔ)句IMPLICIT語(yǔ)句，可以將程序單位中以某一字母開(kāi)頭的所有變量指定為所需類型。例如：

　　IMPLICITINTEGER（A，C），REAL（I-K）

　　指定了以A與C字母開(kāi)頭的所有變量都是整型變量，以字母I至K開(kāi)頭的所有變量為實(shí)型變量。

　　類型說(shuō)明語(yǔ)句和隱含說(shuō)明語(yǔ)句只在本程序單位中有效；它們必須放在程序單位所有可執(zhí)行語(yǔ)句的前面，而IMPLICIT語(yǔ)句又必須在所有的類型說(shuō)明語(yǔ)句的前面。確定變量類型的三種方法中，類型說(shuō)明語(yǔ)句的優(yōu)先級(jí)最高，I-N規(guī)則的優(yōu)先級(jí)最低。