fortran77程序设计简介解析
合集下载
相关主题
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
6、FORTRAN源程序必须按一定的格式书写。哪些内容写在 一行中的哪一列都有严格的规定。
1.3 FORTRAN源程序的书写格式
FORTRAN源程序必须严格地按照一定 的格式书写。在编译时对一行中不同位置 上的内容分别处理。标准的FORTRAN程序 纸格式见下图。
1、第l~5列为标号区：
可以写l至5位整数。也可以没有标号。标号区 中的空格不起作用。如 l00与100 或1 0 0作用相 同。标号应是无符号整数(不应包括正负号或小数 点)。标号大小顺序没有任何要求。假如第二行的 标号为1000，第三行的标号可以是10，也可以是 10000。
FORTRAN 77语言 --结构化程序设计
主讲：王 飞 江苏科技大学
教材：
《FORTRAN语言—FORTRAN77结构化程序 设计》谭浩强等编著
第一章 FORTRAN语言程序设计初步
1.1 FORTRAN语言发展概况 1.2 简单的FORTRAN 77程序分析 1.3 FORTRAN源程序的书写格式
标号区内不得出现标号以外的内容，但注释行 例外。注释行的内容可以写在标号区内，一行中 第一列为“C”或“*”的，该行即被认为注释行。 如果在第一列上出现的不是数字、空格或“C”和 “*”的字符，编译时按出错处理。
(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
4、FORTRON程序中的语句可以没有标号，也可以有标号， 根据需要而定。标号的作用是标志一个语句以便被其它语 句引用。在同一个程序单位中不能有两个相同标号的语句。 标号不影响语句的执行顺序。程序中语句执行的顺序一般 依照它们在程序中的位置而定，即写在前面的语句先执行， 写在后面的语句后执行。
5、一个程序单位中各类语句的位置是有一定规定的，例如 PROGRAM语句应是主程序的第一个语句，FUNCTION语 句是函数子程序的第一个语句，END语句只能是程序单位 中最后一行。
3、一个程序单位包括若干行。FORTRAN行分为两类： （1）语句行。由一个FORTRAN语句组成，它对程序运行情
况是有影响的。FORTRAN语句分为：执行语句和非执行语 句。执行语句使计算机在运行时产生某些操作，如赋值语 句、打印语句等。非执行语句（包括说明语句，数据语句 等）将有关信息通知编译系统，以便在编译时作出相应的 处理，例如类型说明语句、函数子程序语句等。 （2）非语句行，即注释行。它不是FORTRAN语句，它不被 翻译成机器目标指令，不产生任何机器操作。它仅仅是为 了人们阅读程序的方便而加到程序中的。一个程序中注释 行的数目不受限制，根据需要而定。但一个程序单位不能 只由注释行组成。注释行是程序的一部分，在打印程序清 单时，注释行也照样打印出来。注释行的内容完全是根据 程序设计人员需要而写的，一般是为程序（或程序中某一 部分）的作用作注释。注释可以用英文或汉语拼音文字， 还可以用汉字作注释。在一些实用程序中，注释行的篇幅 有时占整个程序的三分之一以上。
2、每一个程序单位都是以“END”结束的。在FORTRAN 77 中，END既是一个程序单位的结束标志，又是一个独立 的语句（结束语句）。主程序中的END语句的作用是使 程序“停止运行”，子程序中的END语句是“使流程返 回调用程序”。请注意在一个程序单位中只能有一个 END语句，如果需要，可以用STOP语句使程序终止或用 RETURN语句从子程序返回。
1.1 FORTRAN语言发展概况
FORTRAN语言是世界上第一个被正式推广使用的高级语言。它是 1954年被提出来的，1956年开始正式使用，至今已有五十多年历史， 但仍历久不衰，它始终是数值计算领域所使用的主要语言。
FORTRAN是英文FORmula TRANslation的缩写，意为“公式翻译”。 它是为科学、工程问题或企事业管理中的那些能够用数学公式表达的 问题而设计的，其数值计算的功能较强。
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
FORTHale Waihona Puke BaiduAN 77还不是完全结构化的语言，但由于增加了一些结构化的 语句，特别是“块if”语句，提供了IF-ELSE-ENDIF形式的判断控制语 句，使FORTRAN 77能用于编写结构化程序。此外，还扩充了字符处 理功能，使FORTRAN不仅可用于数值计算领域，还可以使用于非数 值运算领域。
目前，FORTRAN77已在国内外广泛使用，大多数计算机系统都已配 置了FORTRAN 77。
PRINT *, 'R=', 12.0, ' C=', C(12.0)
END
PRINT *, 'R=', 5.0, ' C=', C(5.0)
END
从以上例子中可以看出：
1、一个程序由一个或若干个程序单位组成。主程序和每一 个子程序分别是一个独立的程序单位。在解决一个比较复 杂的问题时，可以分别将每个功能编为一个子程序，然后 按搭积木一样将各有关程序单位组成一个程序。一个程序 单位就是一个模块，结构化程序设计需要采用模块化方法， 在FORTRAN中，子程序是实现模块化的有效方法。
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)主程序
1.3 FORTRAN源程序的书写格式
FORTRAN源程序必须严格地按照一定 的格式书写。在编译时对一行中不同位置 上的内容分别处理。标准的FORTRAN程序 纸格式见下图。
1、第l~5列为标号区：
可以写l至5位整数。也可以没有标号。标号区 中的空格不起作用。如 l00与100 或1 0 0作用相 同。标号应是无符号整数(不应包括正负号或小数 点)。标号大小顺序没有任何要求。假如第二行的 标号为1000，第三行的标号可以是10，也可以是 10000。
FORTRAN 77语言 --结构化程序设计
主讲：王 飞 江苏科技大学
教材：
《FORTRAN语言—FORTRAN77结构化程序 设计》谭浩强等编著
第一章 FORTRAN语言程序设计初步
1.1 FORTRAN语言发展概况 1.2 简单的FORTRAN 77程序分析 1.3 FORTRAN源程序的书写格式
标号区内不得出现标号以外的内容，但注释行 例外。注释行的内容可以写在标号区内，一行中 第一列为“C”或“*”的，该行即被认为注释行。 如果在第一列上出现的不是数字、空格或“C”和 “*”的字符，编译时按出错处理。
(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
4、FORTRON程序中的语句可以没有标号，也可以有标号， 根据需要而定。标号的作用是标志一个语句以便被其它语 句引用。在同一个程序单位中不能有两个相同标号的语句。 标号不影响语句的执行顺序。程序中语句执行的顺序一般 依照它们在程序中的位置而定，即写在前面的语句先执行， 写在后面的语句后执行。
5、一个程序单位中各类语句的位置是有一定规定的，例如 PROGRAM语句应是主程序的第一个语句，FUNCTION语 句是函数子程序的第一个语句，END语句只能是程序单位 中最后一行。
3、一个程序单位包括若干行。FORTRAN行分为两类： （1）语句行。由一个FORTRAN语句组成，它对程序运行情
况是有影响的。FORTRAN语句分为：执行语句和非执行语 句。执行语句使计算机在运行时产生某些操作，如赋值语 句、打印语句等。非执行语句（包括说明语句，数据语句 等）将有关信息通知编译系统，以便在编译时作出相应的 处理，例如类型说明语句、函数子程序语句等。 （2）非语句行，即注释行。它不是FORTRAN语句，它不被 翻译成机器目标指令，不产生任何机器操作。它仅仅是为 了人们阅读程序的方便而加到程序中的。一个程序中注释 行的数目不受限制，根据需要而定。但一个程序单位不能 只由注释行组成。注释行是程序的一部分，在打印程序清 单时，注释行也照样打印出来。注释行的内容完全是根据 程序设计人员需要而写的，一般是为程序（或程序中某一 部分）的作用作注释。注释可以用英文或汉语拼音文字， 还可以用汉字作注释。在一些实用程序中，注释行的篇幅 有时占整个程序的三分之一以上。
2、每一个程序单位都是以“END”结束的。在FORTRAN 77 中，END既是一个程序单位的结束标志，又是一个独立 的语句（结束语句）。主程序中的END语句的作用是使 程序“停止运行”，子程序中的END语句是“使流程返 回调用程序”。请注意在一个程序单位中只能有一个 END语句，如果需要，可以用STOP语句使程序终止或用 RETURN语句从子程序返回。
1.1 FORTRAN语言发展概况
FORTRAN语言是世界上第一个被正式推广使用的高级语言。它是 1954年被提出来的，1956年开始正式使用，至今已有五十多年历史， 但仍历久不衰，它始终是数值计算领域所使用的主要语言。
FORTRAN是英文FORmula TRANslation的缩写，意为“公式翻译”。 它是为科学、工程问题或企事业管理中的那些能够用数学公式表达的 问题而设计的，其数值计算的功能较强。
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
FORTHale Waihona Puke BaiduAN 77还不是完全结构化的语言，但由于增加了一些结构化的 语句，特别是“块if”语句，提供了IF-ELSE-ENDIF形式的判断控制语 句，使FORTRAN 77能用于编写结构化程序。此外，还扩充了字符处 理功能，使FORTRAN不仅可用于数值计算领域，还可以使用于非数 值运算领域。
目前，FORTRAN77已在国内外广泛使用，大多数计算机系统都已配 置了FORTRAN 77。
PRINT *, 'R=', 12.0, ' C=', C(12.0)
END
PRINT *, 'R=', 5.0, ' C=', C(5.0)
END
从以上例子中可以看出：
1、一个程序由一个或若干个程序单位组成。主程序和每一 个子程序分别是一个独立的程序单位。在解决一个比较复 杂的问题时，可以分别将每个功能编为一个子程序，然后 按搭积木一样将各有关程序单位组成一个程序。一个程序 单位就是一个模块，结构化程序设计需要采用模块化方法， 在FORTRAN中，子程序是实现模块化的有效方法。
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)主程序