资源描述:
《fortran语法手册》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、FORTRAN77指导手册1FORTRAN77四则运算符+-* /**(其中**表示乘方)在表达式中按优先级次序由低到高为:+或-→*或/→**→函数→()2FORTRAN77变量类型2.1隐含约定:I-N规则凡是以字母I,J,K,L,M,N六个字母开头的,即认为是整型变量,其它为实型变量。2.2用类型说明语句确定变量类型:可以改变I-N规则INTEGER整型REAL实型DOUBLEPRECISION双精度实型COMPLEX复型,赋值形式为(实部,虚部),如D=(8.76E+0.5,-67.8E-3),C=(3.0,6.3),如果含
2、表达式则用CMPLX,如C=CMPLX(3.0*A,6.0+B)LOGICAL逻辑型,逻辑常量有“T”和“F”,“T”表示“.TRUE.”,“F”表示“.FALSE.”CHARACTER*N字符型,N为字符串长度,可以在变量名称后重新指定长度,如CHARACTER*8STR1,STR2*10,赋值形式为STR2='I''MABOY.'2.3用IMPLICIT语句将某一字母开头的全部变量指定为所需类型如IMPLICITREAL(I,J)三种定义的优先级别由低到高顺序为:I-N规则→IMPLICIT语句→类型说明语句,因此,在程序中IM
3、PLICIT语句应放在类型说明语句之前。2.4数组的说明与使用使用I-N规则时用DIMENSION说明数组,也可在定义变量类型同时说明数组,说明格式为:数组名(下标下界,下标上界),也可省略下标下界,此时默认为1,例:DIMENSIONIA(0:9),ND(80:99),W(3,2),NUM(-1:0),A(0:2,0:1,0:3)REALIA(10),ND(80:99)使用隐含DO循环进行数组输入输出操作:例如WRITE(*,10)('I=',I,'A=',A(I),I=1,10,2)10FORMAT(1X,5(A2,I2,1X,
4、A2,I4))2.5使用DATA语句给数组赋初值变量表中可出现变量名,数组名,数组元素名,隐含DO循环,但不许出现任何形式的表达式:例如DATAA,B,C/-1.0,-1.0,-1.0/DATAA/-1.0/,B/-1.0/,C/-1.0/DATAA,B,C/3*-1.0/CHARACTER*6CHN(10)20FORTRAN77指导手册DATACHN/10*' '/INTEGERNUM(1000)DATA(NUM(I),I=1,500)/500*0/,(NUM(I),I=501,1000)/500*1/3FORTRAN77
5、程序书写规则程序中的变量名,不分大小写;变量名称是以字母开头再加上1到5位字母或数字构成,即变更名字串中只有前6位有效;一行只能写一个语句;程序的第一个语句固定为PROGRAM程序名称字符串某行的第1个字符至第5个字符位为标号区,只能书写语句标号或空着或注释内容;某行的第1个字符为C或*号时,则表示该行为注释行,其后面的内容为注释内容;某行的第6个字符位为非空格和非0字符时,则该行为上一行的续行,一个语句最多可有19个续行;某行的第7至72字符位为语句区,语句区内可以任加空格以求美观;某行的第73至80字符位为注释区,80字符位以后
6、不能有内容。4FORTRAN77关系运算符.GT.大于.GE.天于或等于.LT.小于.LE.小于或等于.EQ.等于.NE.不等于.AND.逻辑与.OR.逻辑或.NOT.逻辑非.EQV.逻辑等.NEQV.逻辑不等运算符优先级由高到低顺序为:()→**→*或/→+或-→.GT.或.GE.或.LT.或.LE.或.EQ.或.NE.→.NOT.→.AND.→.OR.→.EQV.或.NEQV5FORTRAN77语句语句说明备注WRITE(*,*)X1,X2输出语句第一个*号是指输入输出文件设备号或其它设备,如果不指定则是指显示器或打印机,第二个
7、*号是指表控格式语句的行号,如不指定则用默认格式PRINT*,X1,X2输出语句*号是指表控格式语句的行号,如不指定则用默认格式READ*,X1,X2输入语句*号是指表控格式语句的行号,如不指定则用默认格式20FORTRAN77指导手册FORMAT(格式符)请见附录一。请见附录二。END结束程序或子程序STOP[N]结束程序并输出信息[N][N]为数字或字符串信息PAUSE[N]暂停程序执行并输出信息[N],输入回车后继续执行[N]为数字或字符串信息PARAMETER(PI=3.14)参数语句,用来定义常量,在程序中应放在类型说明语
8、句之后EQUIVALENCE(变量表)等价语句,()内变量共用一个存储单元。EQUIVALENCE(X1,X2,…XN),(X1,X2,…XN),…COMMONX1,……公用语句,其后变量相等,用来在程序单位间传递数据,同时可以用来说