《Fortran语言简介》PPT课件.ppt

《Fortran语言简介》PPT课件.ppt

ID:52065293

大小:325.34 KB

页数:11页

时间:2020-03-31

《Fortran语言简介》PPT课件.ppt_第1页
《Fortran语言简介》PPT课件.ppt_第2页
《Fortran语言简介》PPT课件.ppt_第3页
《Fortran语言简介》PPT课件.ppt_第4页
《Fortran语言简介》PPT课件.ppt_第5页
资源描述:

《《Fortran语言简介》PPT课件.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、FORTRAN语言简介FORTRAN意为“公式翻译”是为科学、工程或管理中那些能用数学公式表达的问题而设计,数值计算功能较强。1954年提出,1956开始使用,始终是数值计算领域内所使用的主要语言。一、以0.618法的计算程序为例(程序结构)1、主程序COMMONNFNF=0.0X=1.0H=0.1CALLLINGOL(X,H,1.E-5)WRITE(*,10)X,H,NF10FORMAT(1X,"XMIN=",E15.6,5X,"FMIN=",E15.6,5X,"NF=",I4)STOPEND2、

2、子程序(1)、函数子程序FUNCTIONF(X)COMMONNFF=F(X)NF=NF+1RETURNEND(2)、子例行程序SUBROUTINELINGOL(X,H,EPS)F0=F(X)….….….END子例行子程序和函数子程序都是子程序。它们的区别在于:函数子程序的名字是代表一个值的,在函数子程序中求出函数值存放在函数中。因此,函数名是函数值的体现者,对函数名要做类型说明。子例行子程序的名字只供调用,它不代表某一个值,当然也不属于某个类型。在子例行程序中求得的值不是由子程序名带回调用单位,而是

3、通过实参于虚参的联系带回调用单位。子例行子程序必须以SUBROUTINE语句开头,以END语句结束。形式:SUBROUTINE子例行程序名(虚参)在主程序中:CALL子例行程序名(实参)通过实参于虚参的结合,传递调用信息。一个FORTRAN应用程序往往由一个主程序和若干个子程序组成。在FORTRAN程序中可以只有一个主程序而没有子程序,但是不能没有主程序而只有子程序。总是从主程序开始执行,所以如果没有主程序,程序就无法运行。子程序可以被主程序调用,也可以被其它子程序调用,但不能直接和间接的自己调用自

4、己。二、FORTRAN程序书写格式1、1-5列为标号区(第一列可以是C、*、表示注释行)2、第6列为续行标志区。在第6列上写一个非空格如非零的字符,则该行为上一行的继续。3、第7-72列为语句区。可以从第7列以后任意位置开始书写,但一行只能写一个语句。语句区内的空格(除引号内的字符串内的空格)在编译时被忽略。三、FORTRAN输出格式1、WRITE(*,*)R,A--自由输出(0.8,0.7)2、WRITE(*,10)R,A10FORMAT(1X,“R=",E6.1,2X,“A=",E6.1)注意:

5、1、如果I,J,K,L,M-代表整型,需取I5,I6I5I6E6.1(小数点后一位)小数点上机操作过程1、开机,由windows方式进入MS-DOS方式,进入D盘(E盘)。D:<回车>2、在D>:建立自己的子目录D>:MD目录名<回车>3、进入自己的子目录D>:CD目录名<回车>4、将FORTRAN5.0拷入自己的子目录,在自己的子目录中输入copyD:FT5.10*.*<回车>5、将优化程序拷入copyD:OPT*.*<回车>6、编译源程序,使用EDIT文件名.FOR<回车>7、编译、连接

6、,使用D>:目录名>FL文件名.FOR<回车>8、运行,D>:目录名>文件名<回车>要求:1、输入程序起自己的名字,不要与别人重复。2、结果得出后,请记录下来,写上:班级、姓名、序号、目录名、文件名。3、完成后交给指定的课代表,由课代表在卷面上标注交卷时间、顺序。4、如果当天没做完,可以下次继续做,但不能超过二次上机。5、对作弊、抄袭的一旦发现,按零分记。6、不准上网,不准早退,离开机房要请假。7、五次上机,超过二次缺席,按零分记。

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。