文档介绍：FORTRAN 77语言--结构化程序设计
主讲:王飞
江苏科技大学
教材:
《FORTRAN语言—FORTRAN77结构化程序设计》谭浩强等编著
第一章 FORTRAN语言程序设计初步
FORTRAN语言发展概况
简单的FORTRAN 77程序分析
FORTRAN源程序的书写格式
FORTRAN语言发展概况
FORTRAN语言是世界上第一个被正式推广使用的高级语言。它是1954年被提出来的,1956年开始正式使用,至今已有五十多年历史,但仍历久不衰,它始终是数值计算领域所使用的主要语言。
FORTRAN是英文FORmula TRANslation的缩写,意为“公式翻译”。它是为科学、工程问题或企事业管理中的那些能够用数学公式表达的问题而设计的,其数值计算的功能较强。
FORTRAN 77还不是完全结构化的语言,但由于增加了一些结构化的语句,特别是“块if”语句,提供了IF-ELSE-ENDIF形式的判断控制语句,使FORTRAN 77能用于编写结构化程序。此外,还扩充了字符处理功能,使FORTRAN不仅可用于数值计算领域,还可以使用于非数值运算领域。
目前,FORTRAN77已在国内外广泛使用,大多数计算机系统都已配置了FORTRAN 77。
FORTRAN语言的不同版本:FORTRAN I、FORTRAN II、FORTRAN IV、FORTRAN 66、FORTRAN 77、FORTRAN 90……
简单的FORTRAN 77程序分析
为了使读者从一开始就了解什么是FORTRAN 77程序,下面先介绍两个很简单的FORTRAN 77源程序。
[]求三个数的平均数
程序代码:
C CALCULATE THE AVERAGE OF THREE NUMBERS
X=
Y=
Z=
AVER=(X+Y+Z)/
PRINT *, 'THE THREE NUMBERS ARE', X, Y, Z
PRINT *, 'AVERAGE=', AVER
END
[]分别求R=1,3,12,5时的圆周长
可以用一个子程序来求圆周长。
源程序由两部分组成:
(1)主程序
C MAIN PROGRAM
PROGRAM EX2
PRINT *, 'R=', , ' C=', C()
PRINT *, 'R=', , ' C=', C()
PRINT *, 'R=', , ' C=', C()
PRINT *, 'R=', , ' C=', C()
END
(2)子程序
C SUBPROGRAM
FUNCTION C(R)
PI=
C=2*PI*R
RETURN
END
4、FORTRON程序中的语句可以没有标号,也可以有标号,根据需要而定。标号的作用是标志一个语句以便被其它语句引用。在同一个程序单位中不能有两个相同标号的语句。标号不影响语句的执行顺序。程序中语句执行的顺序一般依照它们在程序中的位置而定,即写在前面的语句先执行,写在后面的语句后执行。
5、一个程序单位中各类语句的位置是有一定规定的,例如PROGRAM语句应是主程序的第一个语句,FUNCTION语句是函数子程序的第一个语句,END语句只能是程序单位中最后一行。
6、FORTRAN源程序必须按一定的格式书写。哪些内容写在一行中的哪一列都有严格的规定。
FORTRAN源程序的书写格式
FORTRAN源程序必须严格地按照一定的格式书写。在编译时对一行中不同位置上的内容分别处理。标准的FORTRAN程序纸格式见下图。