Fortran语言程序设计初步 FORTRAN语言程序设计 技术方案.pptVIP

1 第八章 常用算法的程序设计举例 第一章 算法 第二章 计算机和计算机程序 第四章 逻辑运算和选择结构 第五章 循环结构的实现 第六章 Fortran的数据结构 第七章 数据的输入、输出 第三章 Fortran语言程序设计初步 2 第三章 Fortran语言程序设计初步 一、Fortran语言的发展概况 Fortran是世界上第一个被正式推广使用的高级语言。 Fortran的思想最初是由约翰·贝克斯（John Backus）在1954年提出的，第一个Fortran程序则在1956年4月得以运行。 Fortran是Formula Translator的缩写。 3 1958年FORTRAN II 1962年FORTRAN IV（Fortran 66） 1978年Fortran 77 1992年，Fortran90标准终于问世。主要增加面向对象概念及工具，提供指针，加强数组功能，改良编写格式。 1997年，最新标准 Fortran95。可视为90的修订版，主要加强了Fortran在并行计算方面的支持。 4 二、简单的Fortran77程序分析 1. 求三数平均 C Calculate the average of three numbers x=90.5 y=87.0 z=68.5 aver=(x+y+z)/3.0 write(*,*) The three numbers are, x, y, z write(*,*) average=, aver end 5 2. 求R=1, 1.5, 3, 12.5时的圆周长 C Mainprogram program ex2 print *, r=1.0 , c=, c(1.0) print *, r=1.5 , c=, c(1.5) print *, r=3.0 , c=, c(3.0) print *, r=12.5 , c=, c(12.5) end C Subprogram function c(r) pi=3.1415926 c=2*pi*r return end 8 (6) 各类语句的位置有一定规定。 (7) Fortran77规定了程序书写的格式。 例如： Program语句是主程序的第一个语句，Function语句是函数子程序的第一个语句，End语句只能是程序单位中最后一行。 程序单位中各类语句的顺序请见附录3。 9 三、Fortran77源程序书写格式（Fixed Format） 1. 标号区（1 ~ 5列） 可以写1至5位无符号整数（不应包括正负号或小数点），也可以没有标号。空格不起作用，如 100 与 100或 100 作用相同。标号大小顺序无要求。 10 标号区内不得出现标号以外的内容，但注释行例外。一行中第一列为“ C ”或“ * ”的，该行即被认为注释行。 第一列上出现的不是数字、空格或“ C ”和“ * ”的字符，编译时按出错处理。 2. 续行标志区（第6列） 第6列上为非空格和非零的字符，则该行被视作上一行的继续行。一个语句允许最多有19个继续行。 建议：续行标志使用语句中一般不出现的字符，或在续行标志与续行正文间加入一定数量的空格。 11 3. 语句区（7 ~ 72列） 语句可以从第7列以后任何位置开始书写。语句区的空格不起作用，但引号内字符串中的空格除外。 4. 注释区（73 ~ 80列） 程序员一般利用此8列为程序行编顺序号以便查找。不是语句的一部分，在编译时对该区不予处理。在打印程序清单时原样照印。 12 * The roots of the quadratic equation program quad a=2.5 b=8.5 c=3.5 d=b*b-4*a*c if(d.ge.0) then x1=(-b+sqrt(d))/(2*a) x2=(-b-sqrt(d)