fortran语法手册精选.docVIP

F0RTRAN77四则运算符 + -*/** (其中**表示乘方) 在表达式中按优先级次序由低到高为：+或一 *或/一**一函数一() F0RTRAN77变量类型 2.1隐含约定：I?N规则 凡是以字母I, J, K, L, M, N六个字母开头的，即认为是整型变量，其它为 实型变量。 2.2用类型说明语句确定变量类型：可以变更I-N规则 INTEGERREAL INTEGER REAL DOUBLE PRECISION COMPLEX LOGICAL CHARACTER*N 实型 双精度实型 复型，赋值形式为(实部，虚部)，如 D=(8.76E+0.5,-67.8E-3)ZC=(3.0,6.3)z?如含表达式则用 CMPLX, 如 C=CMPLX(3.0*A,6.0+B) 逻辑型，逻辑常量有T〃和、F〃，T表示、.TRU巳表示.FALSE. 字符型,N为字符串长度，可以在变量名称后重新指定长度，如 CHARACTER*8 STR1,STR2*1O，赋值形式为 STR2=T，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(?l:0),A(0:2,0:1,0:3) REAL IA(10),ND(80:99)运用隐含DO循环进行数组输入输出操作：例如 WRITE(*z10) (’I=,I,A=，,A(I),I=l,10,2) 10FORMAT(1X,5(A2,I2,1X,A2,I4)) 2.5运用DATA语句给数组赋初值 变量表中可出现变量名,数组名，数组元素名，隐含DO循环，但不许出现任何形 式的表达式：例如 DATA A,BZC/-1.0,-1.0,-1.0/ DATA A/-1.0/,B/-1.0/,C/-1.0/ DATA A,B,C/3*-l?0/CHARACTER*6 CHN(10) DATA CHN/10* /INTEGER NUM(IOOO) DATA (NUM⑴,1=1,500)/500*0/,(NUM⑴,1=501,1000)/500*1/ F0RTRAN77程序书写规则 程序中的变量名，不分大小写； 变量名称是以字母开头再加上1到5位字母或数字构成，即变更名字串中只有 前6位有效； 一行只能写一个语句； 程序的第一个语句固定为PROGRAM程序名称字符串 某行的第1个字符至第5个字符位为标号区，只能书写语句标号或空着或注释内 容； 某爲的第1个字符为C或大号时，则表示该行为注释行，其后面的内容为注释内 容； 某爲的第6个字符位为非空格和非0字符时，则该行为上一行的续行，一个语句 最多可有19个续行； 某行的第7至7 2字符位为语句区，语句区内可以任加空格以求美观； 某行的第7 3至8 0字符位为注释区，8 0字符位以后不能有内容。 F0RTRAN77关系运算符 .GT.大于 .G巳天于或等于 .LT.小于 ?L巳小于或等于 .EQ.等于 .N巳不等于.AND,逻辑与 .OR.逻辑或 , NOT.逻辑非 .EQV.逻辑等 .NEQV.逻辑不等 运算符优先级由高到低依次为：（）-**-*或/一+或?—.GT.或.G巳或.LT. 或丄巳或.EQ .或.NE .一.NOT.—.AND .一.OR .一.EQV.或.NEQV F0RTRAN77 语句 语句 说明 备注 WRITE(*,*) X1ZX2 输出语句 第一个*号是指输入输出文件设备号或其它设备，假如不指定 则是指显示器或打印机，其次个*号是指表控格式语句的行 号，如不指定则用默认格式 PRINT *,X1,X2输出语句 READ *,X1,X2输入语句 *号是指表控格式语句的行号，如不指定则用默认格式 *号是指表控格式语句的行号，如不指定则用默认格式 PAUSE [N] EQUIVALENCE （变量表） COMMON XI,…… OPEN （说明项 1） 请见附录一。 请见附录二。 结束程序或子 程序 结束程序并输 出信息[N] [N]为数字或字符串信息 暂停程序执行 并输出信息 [N],输入回 车后接着执行 [N]为数字或字符串信息 参数语句，用 来定义常量， 在程序中应放 在类型说明语 句之后 |等价语句，() FORMAT（格式 符） END STOP [N] PARA