当前位置:文档之家› fortran77程序设计简介解析

fortran77程序设计简介解析

6、FORTRAN源程序必须按一定的格式书写。哪些内容写在 一行中的哪一列都有严格的规定。
1.3 FORTRAN源程序的书写格式
FORTRAN源程序必须严格地按照一定 的格式书写。在编译时对一行中不同位置 上的内容分别处理。标准的FORTRAN程序 纸格式见下图。
1、第l~5列为标号区:
可以写l至5位整数。也可以没有标号。标号区 中的空格不起作用。如 l00与100 或1 0 0作用相 同。标号应是无符号整数(不应包括正负号或小数 点)。标号大小顺序没有任何要求。假如第二行的 标号为1000,第三行的标号可以是10,也可以是 10000。
FORTRAN语言的不同版本:FORTRAN I、FORTRAN II、FORTRAN IV、FORTRAN 66、FORTRAN 77、FORTRAN 90……
1.2 简单的FORTRAN 77程序分析
为了使读者从一开始就了解什么是FORTRAN 77程序, 下面先介绍两个很简单的FORTRAN 77源程序。 [例1.1]求三个数的平均数 程序代码: C CALCULATE THE AVERAGE OF THREE NUMBERS
3、一个程序单位包括若干行。FORTRAN行分为两类: (1)语句行。由一个FORTRAN语句组成,它对程序运行情
况是有影响的。FORTRAN语句分为:执行语句和非执行语 句。执行语句使计算机在运行时产生某些操作,如赋值语 句、打印语句等。非执行语句(包括说明语句,数据语句 等)将有关信息通知编译系统,以便在编译时作出相应的 处理,例如类型说明语句、函数子程序语句等。 (2)非语句行,即注释行。它不是FORTRAN语句,它不被 翻译成机器目标指令,不产生任何机器操作。它仅仅是为 了人们阅读程序的方便而加到程序中的。一个程序中注释 行的数目不受限制,根据需要而定。但一个程序单位不能 只由注释行组成。注释行是程序的一部分,在打印程序清 单时,注释行也照样打印出来。注释行的内容完全是根据 程序设计人员需要而写的,一般是为程序(或程序中某一 部分)的作用作注释。注释可以用英文或汉语拼音文字, 还可以用汉字作注释。在一些实用程序中,注释行的篇幅 有时占整个程序的三分之一以上。
PRINT *, 'R=', 12.0, ' C=', C(12.0)
EHale Waihona Puke DPRINT *, 'R=', 5.0, ' C=', C(5.0)
END
从以上例子中可以看出:
1、一个程序由一个或若干个程序单位组成。主程序和每一 个子程序分别是一个独立的程序单位。在解决一个比较复 杂的问题时,可以分别将每个功能编为一个子程序,然后 按搭积木一样将各有关程序单位组成一个程序。一个程序 单位就是一个模块,结构化程序设计需要采用模块化方法, 在FORTRAN中,子程序是实现模块化的有效方法。
FORTRAN 77还不是完全结构化的语言,但由于增加了一些结构化的 语句,特别是“块if”语句,提供了IF-ELSE-ENDIF形式的判断控制语 句,使FORTRAN 77能用于编写结构化程序。此外,还扩充了字符处 理功能,使FORTRAN不仅可用于数值计算领域,还可以使用于非数 值运算领域。
目前,FORTRAN77已在国内外广泛使用,大多数计算机系统都已配 置了FORTRAN 77。
2、每一个程序单位都是以“END”结束的。在FORTRAN 77 中,END既是一个程序单位的结束标志,又是一个独立 的语句(结束语句)。主程序中的END语句的作用是使 程序“停止运行”,子程序中的END语句是“使流程返 回调用程序”。请注意在一个程序单位中只能有一个 END语句,如果需要,可以用STOP语句使程序终止或用 RETURN语句从子程序返回。
标号区内不得出现标号以外的内容,但注释行 例外。注释行的内容可以写在标号区内,一行中 第一列为“C”或“*”的,该行即被认为注释行。 如果在第一列上出现的不是数字、空格或“C”和 “*”的字符,编译时按出错处理。
FORTRAN 77语言 --结构化程序设计
主讲:王 飞 江苏科技大学
教材:
《FORTRAN语言—FORTRAN77结构化程序 设计》谭浩强等编著
第一章 FORTRAN语言程序设计初步
1.1 FORTRAN语言发展概况 1.2 简单的FORTRAN 77程序分析 1.3 FORTRAN源程序的书写格式
(2)子程序
C MAIN PROGRAM PROGRAM EX2 PRINT *, 'R=', 1.0, ' C=', C(1.0)
C SUBPROGRAM FUNCTION C(R) PI=3.1415926 C=2*PI*R
PRINT *, 'R=', 3.0, ' C=', C(3.0)
RETURN
X=90.5 Y=87.0 Z=68.5 AVER=(X+Y+Z)/3.0 PRINT *, 'THE THREE NUMBERS ARE', X, Y, Z PRINT *, 'AVERAGE=', AVER END
[例1.2]分别求R=1,3,12,5时的圆周长
可以用一个子程序来求圆周长。
源程序由两部分组成: (1)主程序
4、FORTRON程序中的语句可以没有标号,也可以有标号, 根据需要而定。标号的作用是标志一个语句以便被其它语 句引用。在同一个程序单位中不能有两个相同标号的语句。 标号不影响语句的执行顺序。程序中语句执行的顺序一般 依照它们在程序中的位置而定,即写在前面的语句先执行, 写在后面的语句后执行。
5、一个程序单位中各类语句的位置是有一定规定的,例如 PROGRAM语句应是主程序的第一个语句,FUNCTION语 句是函数子程序的第一个语句,END语句只能是程序单位 中最后一行。
1.1 FORTRAN语言发展概况
FORTRAN语言是世界上第一个被正式推广使用的高级语言。它是 1954年被提出来的,1956年开始正式使用,至今已有五十多年历史, 但仍历久不衰,它始终是数值计算领域所使用的主要语言。
FORTRAN是英文FORmula TRANslation的缩写,意为“公式翻译”。 它是为科学、工程问题或企事业管理中的那些能够用数学公式表达的 问题而设计的,其数值计算的功能较强。
相关主题