PDF《Fortran 程序设计基础》

1 能源与动力工程学院 Fortran 程序设计基础 Fortran 程序设计基础 陈陈斌斌目录

第一节 程序书写

第二节 字符集和标识符

第三节 数据类型

第四节 声明

第五节 算术表达式

第六节 表控输入输出语句

第七节 应用程序举例

第一节 程序书写――程序结构 [PROGRAM 程序名] [声明语句] [执行语句] END[PROGRAM[程序名]] PROGRAM MAIN ! 加法计算器程序 REAL A, B, C A = 1000.

0 B = 200.0 C = A + B PRINT*,'

C='

, C END PROGRAM MAIN 例2-1 简单Fortran程序的构造形式 声明区 执行区 终止区 声明区:用来定义程序中用到的变量、函数、子程序、模块等.声明部分必须出现 在执行部分之前,而不能将声明语句插在 执行部分之中.

第一节 程序书写――书写格式 ?Fixed Format (固定格式) ? 旧式写法 (后缀为*.F或*.For) ?Free Format (自由格式) ? FORTRAN90之后的新写法(后缀为*.F90)

2

第一节 程序书写――固定格式 注释区 代码区 续行区 标号区 可以从第7列以后任何位置开始书写,但一行只能 写一个语句.语句区内的空格(不包括引号内字符 串中的空格)在编译时被忽略. 第7-72列 不使用,超过会被忽略,有的编译器会发出错误信 息第73列之后 如果是

0 以外的任何字符,表示这一行代码会接 续上一行 第6列 如果是数字,那是用来给这一行代码取的代号.不 然只能是空白 转向、格式等语句中必须有标号.同一程序单元 中,不得采用重复的标号 第1-5列 如果是字母C、c或是*,这一行文字会被当成注 释,不会被编译 第1列

第一节 程序书写――固定格式 FORTRAN code on a punched card A FORTRAN coding form to prepare programs for punching onto cards by keypunch operators IBM

029 keypunch

第一节 程序书写――固定格式 END FORMAT (1x, 2f6.2)

0 1 WRITE (*, 10) x1, x2 (2.0*a) * x2=(-b - sqrt(b*b-4.0*a*c))/ x1=(-b + sqrt(b*b-4.0*a*c))/(2.0*a) c=-6.0 b=3.0 a=1.0 PROGRAM MAIN 已知a,b,c,求一元二次方程的根 * FIXCED FORMAT C 73至80 7至72

6 5

4 3

2 1 例2-4 固定格式的Fortran程序

第一节 程序书写――自由格式 ? 每行最多写132个字符;

? 叹号 ! 后面的内容为注释;

? 如果需要写语句标号,标号可放在每行程序的最 前面;

? 一行之内可以不止包含一条语句,但语句之间必 须用(;

)加以分隔;

? 一行程序代码的最后如果是符号 &

,则代表下 一行是该行的继续;

? 如果一行程序代码开头是符号 &

,则其上一行 的最后非空格符必须是一个&

,代表该行是上一 行的继续;

? Fortran 90允许出现多达39个续行.

3

第一节 程序书写――自由格式 PROGRAM MAIN REAL A,B,C,P,Q,X1,X2 A = 1.0;

B = 3.0;

C = -6.0 !一行书写多个语句,各语句之间用;

分开 P = -B / (2.0 * A) Q = SQRT(B*B - 4.0*A*C)/&

!下一行是续行 (2.0*A) X1 = P + &

!下一行语句是续行 &

Q !此行是上一行的续行 X2 = P - Q WRITE (*, 10) X1, X2

10 FORMAT(1X, 2F6.2) END 例2-5 自由格式的Fortran程序 (还有一个空白字符) 22个特殊符号 0-9 数字 A-Z及a-z (不区分大小写) 英文26个字母

第二节 字符集和标识符――字符集 ?Fortran 所能使用的字元集有: ?辅助字符 ? 可打印字符:各种本地化语言的字符,例如,汉字、希腊字母 等,都可以应用在字符串、注释和输入输出纪录当中(区分大 小写) ? 不可打印字符 :TAB等