fortran语言编程第二章

1、第第2 2章章 关于关于FORTRANFORTRAN的初步知识的初步知识FORTRANFORTRAN程序设计程序设计 前一页 休息2FORTRAN语言的发展概况语言的发展概况 FORTRANFORTRAN是英文是英文FORmula TRANslationFORmula TRANslation的缩写，意为的缩写，意为“公式翻译公式翻译”。 FORTRANFORTRAN FORTRAN78 FORTRANFORTRAN FORTRAN78 FORTRAN95 FORTRAN2000FORTRAN95 FORTRAN2000 前一页 休息3固定书写形式：固定书写形式： 每一行分为四个区：每一行分为四

2、个区： 1 1：标号区：标号区 第第1515列列 2 2：续行区：续行区 第第6 6列列 3 3：语句区：语句区 第第772772列列 4 4：注释区：注释区 第第73807380列列自由书写形式：自由书写形式： 不按照以上要求书写。不按照以上要求书写。FORTRAN源程序的书写规则源程序的书写规则 前一页 休息4FORTRAN源程序的书写规则源程序的书写规则固定书写形式的源程序中的行分为：固定书写形式的源程序中的行分为： 1 1：注释行：注释行 第第1 1列书写字母列书写字母C C。 2 2：起始行：起始行 该行第该行第6 6列必须是空格或列必须是空格或0 0。 3 3：继续行：继续行 该行

3、语句标号区没有标号，第该行语句标号区没有标号，第6 6列不能是空格或列不能是空格或0 0 4 4：结束行：结束行 从该行的第从该行的第7 7列以后书写列以后书写ENDEND。自由书写形式的源程序中的行：自由书写形式的源程序中的行： 书写时没有以上要求。书写时没有以上要求。 前一页 休息51 1：整型常量：整型常量2 2：实型常量：实型常量3 3：双精度型常量：双精度型常量4 4：复型常量：复型常量5 5：逻辑型常量：逻辑型常量6 6：文字型常量：文字型常量FORTRAN语言的常量语言的常量 前一页 休息61 1：整型常量：整型常量 是一个正的或负的或零的数，不应该包含小数点。是一个正的或负的或

4、零的数，不应该包含小数点。 如如：1212、0 0、-51-51等。等。 不同的语言系统，使用多少个字节表示一个整数是不不同的语言系统，使用多少个字节表示一个整数是不一样的。一样的。FORTRAN语言的常量语言的常量 前一页 休息72 2：实型常量：实型常量 有两种表示方法：有两种表示方法： （1 1）小数点法表示）小数点法表示: : 如如： 12.5 0.12 12. .55 12.5 0.12 12. .55等等 （小数点表示）（小数点表示） （2 2）科学计数法（指数）表示）科学计数法（指数）表示: : 实数或整数实数或整数E E或或e e整数整数 如如： 1.8635E2 5.d-1

5、1.8635E2 5.d-1 等等 （指数表示）（指数表示）FORTRAN语言的常量语言的常量 前一页 休息83 3：双精度型常量：双精度型常量 双精度型常量的表示双精度型常量的表示: : 实数或整数实数或整数D D或或d d整数整数 如如： 1.8635D2 5.d-1 1.8635D2 5.d-1 等等FORTRAN语言的常量语言的常量 前一页 休息94 4：复型常量：复型常量 复型常量的表示复型常量的表示: : （常量（常量1 1，常量，常量2 2） 常量可以是整型常量或实型常量常量可以是整型常量或实型常量 表示的复型常量是：表示的复型常量是：常量常量1 1+ +常量常量2 2i i 如

6、如： (3.24, 4.56) (2, 5.6) (3.24, 4.56) (2, 5.6)等等FORTRAN语言的常量语言的常量 前一页 休息105 5：逻辑型常量：逻辑型常量 逻辑型常量的表示逻辑型常量的表示: : .true. .true. 表示真值表示真值 .false. .false. 表示假值表示假值 6: 6: 文字型常量文字型常量 文字型常量的表示：文字型常量的表示： 若干个字符若干个字符 例如：例如：abcdef 123456xyz abcdef 123456xyz FORTRAN语言的常量语言的常量 前一页 休息11 标识符的命名规则：标识符的命名规则： 以字母以字母( (

7、不分大小写不分大小写) )开头，后跟若干个字母或数字。开头，后跟若干个字母或数字。 变量类型：变量类型： 1 1：隐含说明：隐含说明( (约定约定) ) 凡不加说明的标识符，以字母凡不加说明的标识符，以字母ININ（或或i i n)n)开头的为整型变量，以其它字母开头的变量为实开头的为整型变量，以其它字母开头的变量为实 型变量。型变量。 2 2：显示说明语句：显示说明语句 3 3：隐含说明语句：隐含说明语句FORTRAN语言的变量语言的变量 前一页 休息121 1：显示说明显示说明语句语句 integer integer 若干个标识符彼此间用逗号分隔若干个标识符彼此间用逗号分隔 定义的每一个标

8、识符为整型变量。定义的每一个标识符为整型变量。 real real 若干个标识符彼此间用逗号分隔若干个标识符彼此间用逗号分隔 定义的每一个标识符为实型变量。定义的每一个标识符为实型变量。 double precision double precision 若干个标识符彼此间用逗号分隔若干个标识符彼此间用逗号分隔 定义的每一个标识符为双精度型变量。定义的每一个标识符为双精度型变量。FORTRAN语言的变量语言的变量 前一页 休息131 1：显示说明显示说明语句语句 complex complex 若干个标识符彼此间用逗号分隔若干个标识符彼此间用逗号分隔 定义的每一个标识符为复型变量。定义的每一个

9、标识符为复型变量。 logical logical 若干个标识符彼此间用逗号分隔若干个标识符彼此间用逗号分隔 定义的每一个标识符为逻辑型变量。定义的每一个标识符为逻辑型变量。 character character * *整型常量整型常量 若干个标识符彼此间用逗号分隔若干个标识符彼此间用逗号分隔 定义的每一个标识符为字符型变量，每个字符型变量存储定义的每一个标识符为字符型变量，每个字符型变量存储若干个（整型常量）字符。若干个（整型常量）字符。FORTRAN语言的变量语言的变量 前一页 休息142 2：隐含说明语句：隐含说明语句 implicit implicit integer integer

10、 ( (字母字母1 1，字母，字母2 2）或（单个字符），）或（单个字符），. implicit implicit realreal ( (字母字母1 1，字母，字母2 2）或（单个字符），）或（单个字符），.如：如：implicit integer (a,cimplicit integer (a,c），（），（x) x) 定义字母定义字母a a、b b、c c开头的变量均为整型变量开头的变量均为整型变量, ,字母字母x x开头开头的变量为整型变量。的变量为整型变量。如如 implicit real (i,l implicit real (i,l）,(n),(n) 定义字母定义字母i i、j

11、j、k k、l l开头的变量均为实型变量开头的变量均为实型变量, ,字母字母x x开头开头的变量为实型变量。的变量为实型变量。FORTRAN语言的变量语言的变量 前一页 休息152 2：隐含说明语句：隐含说明语句 implicit implicit double precision double precision ( (字母字母1 1，字母，字母2 2）或（单个字）或（单个字符），符），. implicit implicit complexcomplex ( (字母字母1 1，字母，字母2 2）或（单个字符），）或（单个字符），. implicit implicit logical logi

12、cal ( (字母字母1 1，字母，字母2 2）或（单个字符），）或（单个字符），. implicit implicit character character ( (字母字母1 1，字母，字母2 2）或（单个字符），）或（单个字符），. 其意义见前页。其意义见前页。FORTRAN语言的变量语言的变量 前一页 休息16标准函数标准函数标准函数：标准函数：abs(x) |x|abs(x) |x| exp(x) e exp(x) ex x alog10(x) logalog10(x) log1010 x x alog(x) lnx alog(x) lnx sin(x) sin x sin(x) s

13、in x cos(x) cos x cos(x) cos x tan(x) tan x tan(x) tan x ctan(x) tan ctan(x) tan-1 -1 x x注意：使用三角函数时，单位应该是弧度。注意：使用三角函数时，单位应该是弧度。 前一页 休息17算术运算符和算术表达式算术运算符和算术表达式算术运算符：算术运算符：+ +、- -、* *、/ /、* * *算术表达式：用运算元素、运算符、圆括号算术表达式：用运算元素、运算符、圆括号组成的有意义式子。组成的有意义式子。对算术运算符应该注意运算符的优先级及结对算术运算符应该注意运算符的优先级及结合方向。合方向。对算术表达式应

14、该注意算术表达式的正确表对算术表达式应该注意算术表达式的正确表示。示。 前一页 休息18算术运算符和算术表达式算术运算符和算术表达式算术运算符的优先级：算术运算符的优先级： * * * 最高最高 * *，/ / 次之次之 + +、- - 最低最低算术表达式的正确表示：算术表达式的正确表示： (axb) (axb)3 3 (a (a* *b)b)* * *3 3 axe axex x a a* *exp(x)exp(x) 前一页 休息19算术表达式运算中的类型问题算术表达式运算中的类型问题FORTRANFORTRAN规定：规定： 1: 1: 同类型算术量之间运算的结果保持原类同类型算术量之间运算的结果保持原类型。型。 2: 2: 如果参与运算的两个量为不同类型，系如果参与运算的两个量为不同类型，系统将它们转换成同一类型然后进行运算。规统将它们转换成同一类型然后进行运算。规则是：将低级别类型转换成高级别类型进行则是：将低级别类型转换成高级别类型进行元算。元算。 整整型（低）型（低） 实型（高）实型（高） 前一页 休息20算术表达式运算中的误差问题算术表达式运算中的误差问题整型量的运算是准确的。整型量