Fortran基础51054.pptVIP

P11 例 1.11 输入两个实数 ，输出它们中较大的数 FUNCTION MYMAX(X,Y) IF(XY) THEN MYMAX=X ELSE MYMAX=Y ENDIF RETURN END ! 主程序 REAL A, B READ * A, B PRINT *, A, B, MYMAX(A, B) END P12 例1.12求：S=1+(1+2!)+(1+2!+3!)+(1+2!+3!+…+10!) S=0 DO I=1, 10 F=0 DO J=1, I F1=1 DO K=1, J F1=F1*K ENDDO F=F+F1 ENDDO S=S+F ENDDO PRINT * , ’S=’, S END 算法及其描述 计算机算法：数值算法和非数值算法 （求方程的根、求函数的定积分、数值分析） （排序 查找 等） Fortran程序的书写格式 固定格式（刻板严格） （1）第1-5列为标号区 ，标号最多为5位数字， 第一列为*或c，为注释行 （2）第6列 为续行标志区: 除0和空格外的任意字符 （3）第7~72列为语句区，一行只能写一个语句。 （4）第73-80列为注释区 * Fortran90语言程序设计 第一章 Fortran 程序设计基础 Fortran语言出现的历史背景 Fortran语言是在世界上广泛应用的、出现最早的计算机语言之一。Fortran 是formula translator （公式翻译器）的缩写，最适于数值计算 。 20世纪50年代第一个Fortran 语言版本问世，相继出现了 多种版本的Fortran ，互不兼容， 从而标准化便显得十分迫切 ，其中 比较流行的是Fortran 66（1966年)和Fortran 77。 1991年推出了 Fortran90版本, 吸收其他高级语言的优点 ，使古老的语言焕发了新的活力。 P11 例1.10 输入圆的半径，计算并输出圆的周长和面积 PROGRAM SAMPLE ！程序举例 REAL R, P, S READ *, R P=2*3.14159*R S=3.14159*R*R PRINT *, R, P, S END Fortran语言的程序的基本结构 FORTRAN程序的结构特点： 分块并列结构，每个程序由一个主程序 和若干个子程序构成。 每个程序块必须用END结尾。 一个程序单位中包括若干语句行和非语句行。 语句：执行语句和非执行语句。 算法的概念— 为了解决一个问题而采取的方法和步骤 第1步 输入一个数，存放在单元 MAX 中 第2步 记数单元 I=1 第3步 若 I≤9，做第4步 否则 第8步 第4步 输入一个数，存放在单元 X 中 第5步 比较 MAX和X， 若 XMAX 将X送给MAX 否则MAX值不变 第6步 I增加1 第7步 返回第3步 第8步 输出MAX P2 例 1.2 输入10个数，找出其中最大者。 第1步 输入m,n 第2步 求m除以n的余数r 第3步 若 r=0,转向第6步 否则执行第4步 第4步 将n送给m,将r送给n 第5步 返回第2步 第6步 输出n m=n*q+r (q=0,r=0,rn) 若r=0，则n为最大公约数 P2 例1.3 求两个正整数 m,n (mn)最大公约数 1.有穷性 2.确定性 3.有零个或多个输入 4.有一个或多个输出 5.有效性 算法的特性 用流程图描述 用指定形状的框图，表示程序的步骤。主要有： 开始/结束框、输入/输出框、判断框、处理框、连接点和线等。 算法的描述 用自然语言描述 通俗易懂 不直观 二义性 2 开始 2?I N/I的余数?R I+1? I I≤N/2 输入N 结束 N Y 打印N是 R=0? 打印N 不是 Y N 例：判断素数 P A 不成立 成立 A B 顺序结构 三种基本结构（1966年，Bohra和 Jacopini） 选择结构 P A B 不成立 成立 S P 当型循环 不成立 成立 S P 直到型循环 不成立 成立 循环结构： 三种基本结构的共同特点： （1）只有一个入口 （2）