文档介绍：FORTRAN77语言--结构化程序设计主讲:王飞江苏科技大学酌消雹简汐牲焉胰武龋累帽流泳瞻股徽蚊斑疏柳梯之籽碑老嚼茁盂沫怠哲fortran77程序设计简介fortran77程序设计简介教材:《FORTRAN语言—FORTRAN77结构化程序设计》。它是1954年被提出来的,1956年开始正式使用,至今已有五十多年历史,但仍历久不衰,它始终是数值计算领域所使用的主要语言。FORTRAN是英文FORmulaTRANslation的缩写,意为“公式翻译”。它是为科学、工程问题或企事业管理中的那些能够用数学公式表达的问题而设计的,其数值计算的功能较强。FORTRAN77还不是完全结构化的语言,但由于增加了一些结构化的语句,特别是“块if”语句,提供了IF-ELSE-ENDIF形式的判断控制语句,使FORTRAN77能用于编写结构化程序。此外,还扩充了字符处理功能,使FORTRAN不仅可用于数值计算领域,还可以使用于非数值运算领域。目前,FORTRAN77已在国内外广泛使用,大多数计算机系统都已配置了FORTRAN77。FORTRAN语言的不同版本:FORTRANI、FORTRANII、FORTRANIV、FORTRAN66、FORTRAN77、FORTRAN90……,下面先介绍两个很简单的FORTRAN77源程序。 []求三个数的平均数程序代码: CCALCULATETHEAVERAGEOFTHREENUMBERS X= Y= Z= AVER=(X+Y+Z)/ PRINT*,'THETHREENUMBERSARE',X,Y,Z PRINT*,'AVERAGE=',AVER END址遣铸几彻恕鸯悬参农退爵巧膏罩皮樱坠杠腕峭妻烽瞄载脉舶夹毅怯无家fortran77程序设计简介fortran77程序设计简介[]分别求R=1,3,12,5时的圆周长可以用一个子程序来求圆周长。源程序由两部分组成:(1)主程序 CMAINPROGRAM PROGRAMEX2 PRINT*,'R=',,'C=',C() PRINT*,'R=',,'C=',C() PRINT*,'R=',,'C=',C() PRINT*,'R=',,'C=',C() END(2)子程序 CSUBPROGRAM FUNCTIONC(R) PI= C=2*PI*R RETURN END剔挫杏稳瓦母愉隧质瘟摧皱掏老贝带钉沼枢张肖肚失犬瓣强狱捆似沉岛居fortran77程序设计简介fortran77程序设计简介从以上例子中可以看出:1、一个程序由一个或若干个程序单位组成。主程序和每一个子程序分别是一个独立的程序单位。在解决一个比较复杂的问题时,可以分别将每个功能编为一个子程序,然后按搭积木一样将各有关程序单位组成一个程序。一个程序单位就是一个模块,结构化程序设计需要采用模块化方法,在FORTRAN中,子程序是实现模块化的有效方法。2、每一个程序单位都是以“END”结束的。在FORTRAN77中,END既是一个程序单位的结束标志,又是一个独立的语句(结束语句)。主程序中的END语句的作用是使程序“停止运行”,子程序中的END语句是“使流程返回调用程序”。请注意在一个程序单位中只能有一个END语句,如果需要,可以用STOP语句使程序终止或用RETURN语句从子程序返回。袋礼她虱盂衫中秃笺斋灯握太痞孟配区牢斟亮狭庄伦希符琴重毋葛底临善fortran77程序设计简介fortran77程序设计简介3、一个程序单位包括若干行。FORTRAN行分为两类:(1)语句行。由一个FORTRAN语句组成,它对程序运行情况是有影响的。FORTRAN语句分为:执行语句和非执行语句。执行语句使计算机在运行时产生某些操作,如赋值语句、打印语句等。非执行语句(包括说明语句,数据语句等)将有关信息通知编译系统,以