FORTRAN77 指导手册 1 1 FORTRAN77 四则运算符 + - * / ** (其中**表示乘方) 在表达式中按优先级次序由低到高为： +或-→*或/→**→函数→() 2 FORTRAN77 变量类型 2.1 隐含约定：I-N 规则 凡是以字母I，J，K，L，M，N 六个字母开头的，即认为是整型变量，其它为实型变量。 2.2 用类型说明语句确定变量类型：可以改变I-N 规则 INTEGER 整型 REAL 实型 DOUBLE PRECISION 双精度实型 COMPLEX 复型，赋值形式为(实部，虚部),如D=(8.76E+0.5,-67.8E-3),C=(3.0,6.3),如果含表达式则用 CMPLX,如 C=CMPLX(3.0*A,6.0+B) LOGICAL 逻辑型,逻辑常量有“T”和“F”，“T”表示“.TRUE.”,“F”表示“.FALSE.” CHARACTER*N 字符型,N 为字符串长度,可以在变量名称后重新指定长度,如CHARACTER*8 STR1,STR2*10 ,赋值形式为STR2='I''M A BOY.' 2.3 用 IMPLICIT 语句将某一字母开头的全部变量指定为所需类型 如 IMPLICIT REAL (I,J) 三种定义的优先级别由低到高顺序为：I-N 规则→IMPLICIT 语句→类型说明语句，因此，在程序中IMPLICIT 语句应放在类型说明语句之前。 2.4 数组的说明与使用 使用 I-N 规则时用 DIMENSION 说明数组，也可在定义变量类型同时说明数组，说明格式为：数组名(下标下界,下标上界），也可省略下标下界，此时默认为1，例： DIMENSION IA(0:9),ND(80:99),W(3,2),NUM(-1:0),A(0:2,0:1,0:3) REAL IA(10),ND(80:99)使用隐含DO 循环进行数组输入输出操作：例如 WRITE(*,10) ('I=',I,'A=',A(I),I=1,10,2) 10FORMAT(1X,5(A2,I2,1X,A2,I4)) 2.5 使用 DATA 语句给数组赋初值 变量表中可出现变量名,数组名,数组元素名,隐含DO 循环，但不许出现任何形式的表达式：例如 DATA A,B,C/-1.0,-1.0,-1.0/ DATA A/-1.0/,B/-1.0/,C/-1.0/ DATA A,B,C/3*-1.0/CHARACTER*6 CHN(10) FORTRAN77 指导手册 2 DATA CHN/10*' '/INTEGER NUM(1000) DATA (NUM(I),I=1,500)/500*0/,(NUM(I),I=501,1000)/500*1/ 3 FORTRAN77 程序书写规则 程序中的变量名，不分大小写； 变量名称是以字母开头再加上1 到5 位字母或数字构成，即变更名字串中只有前6 位有效； 一行只能写一个语句； 程序的第一个语句固定为PROGRAM 程序名称字符串 某行的第１个字符至第５个字符位为标号区，只能书写语句标号或空着或注释内容； 某行的第１个字符为Ｃ或＊号时，则表示该行为注释行，...
