fortran 95 基础注意

1.除字符型常量外，源程序中不区分字母的大小写，如语句ReaL a和real A是

等价的。

2.Fortran 95字符集以外的可打印字符，只能出现在注释、字符常量、字符串编

辑符和输入输出记录中。

3.Fortran 95规定标识符只能由字母、数字、下划线“”和＄组成，且起始字符必

须是英文字母。（标识符即名称，用来在程序中标识有关实体，如变量、符号常量、函数、程序单元、公用块数组、模块和形参等）

4.用“！”作注释标志符，“！”可以在一行的任一位置，注释延伸至程序行的结束。

5.数据类型——integer（整数类型）、real（实数类型）、complex（实数类型，如

（1.2,3.5）表示1.2+3.5i）。

6.非数值型数据——character（字符类型，在程序中表示形式用…‟或“”，如…a‟，

“hello！”）、logical（逻辑类型，表示判断的结果，只有两种值true、false）。

7.二至三十六进制表示，形式为：±r＃数字如输出3994575的程序

Print﹡,2﹟1111001111001111001111

Print﹡,7﹟45644664

Print﹡,8﹟17171717

Print﹡,3994575

Print﹡,﹟3cf3cf !16进制可以略去16

Print﹡,36﹟2dm8f

end

8.非打印字符的表示形式

9. 变量表示与赋值

integer x,y ,z !定义x 、y 和z 是整型变量

character *6 name !定义name 是字符变量，字符长度为6

real a,b !定义a 和b 是实型变量

complex ::s=(1.5,8.9) !定义s 是单精度复型变量，并对其赋值(1.5,8.9)

integer (2)::c=1,d !定义c 和d 是短整型变量，并对a 赋值1

real * 8 e !定义e 是双精度型变量

注意：符号“：：”在变量定义语句中可有可无，若有可对变量赋初值，否则不能赋初值。

10. 变量的赋值

直接赋值，如 integer a 或者integer ：：a=20

a=20

用data 语句初始化，格式为：Data 变量1，变量2，…，变量n ／常量l ，常量2，…，常量n ／

说明：（1）data 可以给多个变量同时赋初值，中间用逗号隔开。

（2）被赋值的常量一定要放在一对“／”中。

（3）被赋值的常量与对应的变量数据类型要一致。

（4）被赋值的常量中还可以使用*来表示数据的重复。

如：real a,b,c 如：data m,n,k/3*5/

data a,b,c/1.0,2.0,3.0／ 执行此语句后，m ，n ，k 都为5

11. 算数运算符

算术运算符的优先级为括号→乘方→乘、除→加、减，其中乘和除同级，加和减同级分别从左到有进行计算，乘方运算从右到左；其中“**”表示乘方。 如：2**3**2/2的计算顺序为先3**2=9，然后2**9=512，最后512/2=256。

注意：① 数学表达式2211

y x y x 应该写成x1/y1+x2/y2；② 两个整数相除的结果一定也为整数，

小数部分自动舍去。当分子小于分母时结果一律为0。

12.字符型数据赋值

character *5 ch1,ch2,ch3,ch4*1,ch5*ll

ch1= …love‟

ch2= …chIna‟

ch3= …student‟

ch4= ch2(3:3)

ch5= ch4// …‟//ch1// …you!‟

执行后，ch1为…love_‟(_表示空格)；ch2为…china‟；ch3为…student‟；ch4为‘I’；

ch5为…I_love_you!‟

注意：①例题中出现的字符连接符//，作用是将两个字符型数据连接起来，组成一个新字符型数据．如本例中ch5。它是唯一的一个字符运算符。

②ch2(3:3)表示ch2的一个子串，即一个字符串的一部分称为该字符串的子串。通常表示为：字符变量名(m:n) 其中m和n是整数或整型表达式，用来表示子串在字符串中的起止位置，取值范围为：字符串长度≥n≥m≥1。

13.输入输出：

integer a, b, c

read * ,a ,b

c = a+b

print * , “c=”,a, “+”,b, “=”,c

end

其中：①表控输入语句一般格式为：read *,输入表*表示从系统隐含指定的输入设备(—般为键盘)上按系统隐含规定的格式输入数据。

②表控输出语句一般格式为：print * ,输出表*表示从系统隐含指定的输出设备(一般为显示器)上，按系统隐台规定的格式输出数据。

14.

15.

16.

17.

18.

19.