fortran77程序设计简介解析
Fortran77结构化程序设计
Fortran77结构化程序设计Fortran77结构化程序设计章节一、引言1.1 程序设计的概述1.2 Fortran77的特点1.3 编写结构化程序的优势章节二、基本语法和数据类型2.1 Fortran77的语法规则2.2 数据类型和变量2.2.1 整型2.2.2 实型2.2.3 逻辑型2.2.4 字符型2.2.5 数组2.2.6 字符串章节三、控制结构3.1 顺序结构3.2 分支结构3.2.1 IF语句3.2.2 CASE语句3.3 循环结构3.3.1 DO循环3.3.2 WHILE循环3.3.3 循环控制语句章节四、子程序和函数4.1 子程序的定义和调用4.2 函数的定义和调用4.3 参数传递4.4 递归调用章节五、文件操作5.1 文件的打开和关闭5.2 读写文件的基本操作5.3 文件的格式化读写5.4 随机访问文件章节六、错误处理和调试技巧6.1 错误类型和处理方法6.2 调试工具和技巧章节七、实例应用7.1 计算圆的面积7.2 求解线性方程组7.3 求解微分方程7.4 图像处理附录：常用函数库A.1 标准数学函数库A.2 字符串处理函数库A.3 文件操作函数库A.4 其他常用函数库附件：示例代码文件法律名词及注释：1、Fortran77：一种高级编程语言，用于科学计算和工程应用。
2、数据类型：变量的属性，如整型、实型、字符型等。
3、分支结构：程序中根据条件选择不同执行路径的结构。
4、循环结构：程序中重复执行某段代码的结构。
5、子程序：独立的代码块，可以被多次调用。
6、函数：接受输入参数并返回结果的子程序。
7、文件操作：程序与外部文件的读写交互。
8、错误处理：处理程序执行过程中的错误和异常情况。
9、调试：通过检查和修复程序错误来确保程序正确执行。
补充相关计算机Fortran77语言知识
4.FORTAN函数
FORTRAN提供了一些系统函数供某些专门运算，如求 sinx 三角函数的值， ，cosx，指数函数ex，对数 lnx，logx 等， 变量，即可得到相应的值。如： SIN（1.0）= =0.8414709 LOG 3.0）=log3=1.098612 （ INT 8.6）=8 （ SIGN 4.5,-0.5）=-4.5 （ SIGN -0.5, 4.5）= 0.5 （ REAL(8)=8.0
（二） FORTRAN语言数据类型说明 1.常量
常量是指其值始终不变的一些量，在Fortran77 中允许6种常量类型：
⑴整型常量（Integer)
⑵实型常量(Real) ⑶双精度常量（Double)
⑷复型常量(Complex)
⑸逻辑常量(Logical)
⑹字符常量(Character)
①系统为每个整数分配10～13列，数据打印在这些列的 右端。
②一个实数分配给15 ～ 18列，其中小数部分6 ～ 7列。如 果实数的值很大，以上格式无法容纳，则系统会自动改成用 标准化的指数形式输出。
③对一个用指数形式输出的实数分配给15列，其中指数部 分4 ～ 5列，小数部分6列。
④如果实数的整数部分位数多于系统规定的有效位数（例如 IBM—PC为7位)，或实数的数值小于1，则在输出时会自动 转换成规范化的指数形式输出。如123×106和0.132的输 出为，
类型的转换是从左而右进行的，在遇到不同类型的算 术量时才进行转换。如：1/4*20.0=0.0
（四） 运算的误差问题
整型量没有任何误差（确认在整数范围内）。 实型量的运算由于有效位数的限制会出现一些误差， 在运算中尽量不要使两个相差很大的数值直接相加或相 减，判断实数相等时用 A B 。
Fortran77教程-4逻辑运算和选择结构
read(*,*) grade if(grade.ge.80.) write(*,*) 'A' if(grade.ge.70.) write(*,*) 'B' if(grade.ge.60.) write(*,*) 'C' write(*,*) 'D' end
24
C
单价850，100以上95折优惠，求货款。 price=850 read(*,*) n if(n.ge.100) price=price*0.95 amount=n*price write(*,*) 'n=',n,' amount=',amount end
read(*,*) grade if(grade.le.60.) then write(*,*) ‘D ' else if(grade.le.70.) then write(*,*) ‘C' else if(grade.le.80.) then write(*,*) ‘B' else write(*,*) ‘A' end if end
read(*,*) grade if(grade.ge.80.) then write(*,*) 'A ' else if(grade.ge.70.) then write(*,*) 'B' else if(grade.ge.60.) then write(*,*) 'C' else write(*,*) 'D' end if end
if(grade.ge.60.) then else print *, ’No.’, num print *, ’grade’, grade end if
FORTRAN77编程基础
第三讲FORTRAN 77 编程基础1主要内容⏹FORTRAN 77 基础⏹数据结构⏹控制结构（选择与循环）⏹基本输入输出⏹函数与子程序⏹计时函数⏹文件操作FORTRAN 基础⏹FORTRAN语言发展概况●FOR mula TRAN slation●适用于工程及科学计算的一种高级程序设计语言●1951 年由约翰•贝克斯等人开始研发●1957 年第一个FORTRAN 程序在IBM704 机上运行●1966 和1978 年先后颁布FORTRAN66 和FORTRAN77●1991 和1997 年颁布了Fortran 90和Fortran 95●2004 年公布Frotran2003 标准，面向对象程序设计●2010 年公布Fortran 2008 标准FORTRAN 编译器⏹免费的FORTRAN 编译器⏹商业版FORTRAN 编译器●GNU FORTRAN /gfortran●G95●Intel Fortran 编译器（非商业版）●Power Station 、Compaq Visual Fortran (已停止更新)●Intel Fortran●PGI Fortran●Absoft Pro Fortran●Lahey Fortran程序开发环境⏹Linux 系统⏹Windows 系统●字符界面，命令行方式●Code::Blocks + GCC●Microsoft Visual Studio + Intel Visual Fortran ●Code::Blocks + GCC一个简单的编程示例parameter(n=100)real a(n, n), b(n, n), c(n, n)cdo j = 1, ndo i = 1, na(i,j) = 1.0/(i+j‐1)b(i,j) = 1.0c(i,j) = 0.0enddoenddocdo i = 1, ndo j = 1, ndo k = 1, nc(i,j) = c(i,j) + a(i,k) * b(k,j) enddoenddoenddocprint*, "c(1,1) = ", c(1,1)stopendFORTRAN 程序分析●一个FORTRAN 源程序由一个或多个程序单元组成每个独立的程序单元以“end”语句结束●每个程序单元包括若干行（一行不能写多条语句，但一条语句可以分几行写）●每个程序单元可包含语句行和非语句行（注释行）●语句行：可执行语句和非执行语句行●非执行语句在所有可执行语句行前面●语句可以根据需要设置标号●各类语句在程序单元中的位置必须满足一定规则●程序必须按规定的格式书写源程序书写格式●每行只能在72 列内书写，并把80 列分为4 个区●1～5列：标号区（1～5 位整数）如果第1 列为“* ”或“c ”，则为注释行●第6列：续行标志区续行符可以是任意非空格/非零字符最多19 个续行●7～72 列：语句区（一行只能写一条语句）●73～：被忽略，有的编译器会报错⏹FORTRAN 77 源程序必须按规定的格式书写（Fixed Format 固定格式）⏹源程序●以.f为扩展名●纯文本文件，可使用任何文本编辑器编写⏹编译与执行g77‐O2 –o输出文件名源程序文件名./输出文件名g77 ‐O2 –o hello hello.f./hellog77常用选项-o：指定生成的可执行文件的文件名，缺省为a.out -c：只编译不链接，即只生成目标文件（.o文件）-I path：指定或增加包含文件（如*.h）的搜索路径-L path：指定（增加）库文件的搜索路径-l name：与库文件lib name.a链接-O, -O1, -O2, -O3：优化开关-g：在目标码中加入更多信息，用于程序调试●英文字母：A B C D ... ... X Y Z●下划线和阿拉伯数字：_ 0 1 2 3 4 5 6 7 8 9●特殊符号：空格= + -* / ( ) , . ' : "☞FORTRAN 不区分大小写☞早期的FORTRAN 卡片不允许小写故很多FORTRAN 程序源代码都是大写的FORTRAN 数据结构⏹F77支持基本类型和构造类型的数据结构●基本类型●构造类型：数组、记录、文件●F77 不支持指针整型、实型、双精度、复型、逻辑型、字符型正、负整数和零，缺省取值范围为：[-231, 231-1]②实型常量（Real）小数或指数形式：0.876 →8.76E-1 →87.6E-2指数部分只能是整数，取值范围：[10-38, 1038]③双精度常量（Double precision）8 字节：0.125D+45，取值范围：[10-308,10308]④复型常量（Complex）8 字节：(实数，实数)⑤逻辑型常量（Logical）⑥字符型常量（Character）⏹变量类型整型、实型、双精度、复型、逻辑型、字符型⏹变量名●第一个字符必须是字母●后面可以跟1～5 个字母、下划线或数字现在的FORTRAN 编译器允许多于6 个字符（g77 最多支持约51个字符）●变量名中的空格不起作用。
fortran 77 按位操作函数
Fortran 77是一种广泛使用的高级编程语言，它对于科学计算和工程应用有着重要的作用。
在Fortran 77中，按位操作函数是一种非常有用的功能，可以用来处理二进制数据并且对位进行操作。
本文将介绍Fortran 77中的按位操作函数，包括其语法、用法和示例，并对其在实际编程中的应用进行讨论。
一、按位操作的基本概念在计算机中，数据是以二进制形式存储和处理的。
按位操作就是对这些二进制数据的每一位进行操作，包括与、或、非、异或等操作。
按位操作函数可以用来进行这些操作，从而实现对二进制数据的精确控制和处理。
二、Fortran 77中的按位操作函数在Fortran 77中，有一些内置的按位操作函数可以直接使用，包括：1. IAND：按位与操作，用来对两个数进行按位与运算。
2. IOR：按位或操作，用来对两个数进行按位或运算。
3. NOT：按位非操作，用来对一个数进行按位取反运算。
4. IEOR：按位异或操作，用来对两个数进行按位异或运算。
三、按位操作函数的语法和用法按位操作函数的语法非常简单，一般形式如下：result = IAND(a, b) // 对a和b进行按位与操作，将结果赋值给result按位操作函数的用法也很直观，只需要将需要进行按位操作的数作为参数传入即可。
例如：result = IOR(a, b) // 对a和b进行按位或操作，将结果赋值给result四、按位操作函数的示例下面是一个简单的示例，演示了按位操作函数的基本用法：program bitwise_operationimplicit noneinteger :: a, b, result_and, result_or, result_not, result_eora = 5b = 3result_and = IAND(a, b)result_or = IOR(a, b)result_not = NOT(a)result_eor = IEOR(a, b)print*, 'Result of IAND: ', result_andprint*, 'Result of IOR: ', result_orprint*, 'Result of NOT: ', result_notprint*, 'Result of IEOR: ', result_eorend program bitwise_operation在这个示例中，我们定义了两个整数a和b，然后分别对它们进行了按位与、按位或、按位非和按位异或操作，并将结果打印输出。
fortran程序设计.第11章
（4）当对顺序文件进行输出时，在OPEN或者REWIND语句之 后总是把第一个WRITE语句输出的记录放在文件的开头，作 为文件的第一个记录。当前WRITE语句所输出的记录总是作 为文件的最后一个记录。如果所写的文件是一个老文件，则 原来的内容全部丢失。因此在程序设计中对一个顺序文件不 可能做到重写前半部分而保留后半部分。 （5）可以采用以下方法把新的内容添加到老文件的后面。 10 READ (2, *, END=20) GOTO 10 20 BACKSPACE(2) WRITE (2, ……) …… （6）一个WRITE语句总是开始一个新的记录。记录的形成与在 终端上输出的新行一致。
[例11.2]把1至10以及它们的平方数、立方数 以表格形式放到TAB.DAT文件中
OPEN(UNIT=2, FILE=’TAB.DAT’, STATUS=’NEW’, ACCESS=’SEQUENTIAL’, FORM=’FORMATTED’) DO 10 X=1, 10, 1 WRITE (2, *) X, X*X, X*X*X CONTINUE REWIND(2) WRITE (*, *) ‘X X*X X*X*X’ READ (2, *, END=30) A, B, C WRITE (*, *) A, B, C GOTO 20 CLOSE(2) END
11.1 有格式顺序存取文件
READ (*, *) A READ (*, *) B C=A+B WRITE (*, *) ‘A=’, A WRITE (*, *) ‘B=’, B WRITE (*, *) ‘C=’, C END
[例11.1]从预先准备好的数据文件中输入数据， 并将输出数据写到文件中
11.4 文件操作语句
一、OPEN语句 OPEN语句用来把设备号与文件名连接起来，并且对文件的各项 性质进行指定。一个OPEN语句只能打开一个文件。语句形式如下： OPEN (说明项) 说明项包括以下各项： （1）设备号说明。[UNIT=]ie。ie是一个值为正整数的算术表达 式（当然可以是常量或变量）。其值由用户给出。数值范围为1到99。 如果设备说明是OPEN语句中的第一项，则UNIT=可以省略不写。 （2）文件名指定。FILE=ce。ce是一个字符串表达式（当然可以 是字符串常量或变量）。其值（不计尾随空格）是由用户给出的数据 文件名。此文件名与同一OPEN语句中的设备号连接起来。 在OPEN语句中可以省略这一项。这时由计算机系统来确定文件 名并把此文件名与设备号连接。
Fortran77结构化程序设计
Fortran77结构化程序设计Fortran77结构化程序设计简介Fortran（Formula Translating System）是一种编程语言，特别适用于科学和工程领域的计算。
Fortran的第一版于1957年发布，至今已经发展到Fortran77版本。
Fortran77引入了结构化程序设计的概念，使得程序更易于编写和维护。
本文将介绍Fortran77结构化程序设计的基本原则、控制结构和常用语法。
基本原则结构化程序设计的目标是编写易读、易维护、易的程序。
为了达到这个目标，Fortran77结构化程序设计遵循以下基本原则：1. 模块化：将程序划分为小块的独立模块，每个模块负责完成特定的功能。
2. 单一入口：每个模块只有一个入口点，使得程序的执行流程清晰可见。
3. 自顶向下设计：从程序的总体结构开始，逐步细化到具体的算法和实现细节。
4. 注重可读性：使用有意义的变量和函数名，添加适当的注释，使得程序易于阅读和理解。
控制结构Fortran77提供了几种常用的控制结构来实现程序的流程控制：顺序结构顺序结构是Fortran77中最基本的控制结构，程序按照代码的顺序依次执行。
例如：fortranPROGRAM mnINTEGER :: i, sumsum = 0DO i = 1, 10sum = sum + iEND DOWRITE(,) 'Sum:', sumEND PROGRAM mn上述代码展示了一个简单的程序，通过循环计算1到10的和，并输出结果。
分支结构Fortran77提供了基本的分支控制结构：- `IF`语句：可以根据条件选择性执行代码块。
例如：fortranPROGRAM mnINTEGER :: iDO i = 1, 10IF (i < 5) THENWRITE(,) i, '小于5'ELSEWRITE(,) i, '大于等于5'END IFEND DOEND PROGRAM mn在上述代码中，根据变量`i`的值判断是否小于5，并分别输出不同的信息。
计算机程式Fortran77语言
FORTRAN程式的結構
18
➢ 一完整電腦程式須包含有
宣告declaration、 可執行execution、 結束termination
等三部份陳述。
FORTRAN程式的結構
19
➢ 宣告部份：
變數之形式 字元character、 整數integer、 實數real、邏輯logical)
冪次則是作多次相乘，指數可為小數 其他函數則以泰勒展開式或其他展開式
做計算，電腦內建以函數供呼叫
輸入與輸出的格式
28
➢ 輸入與輸出的格式分為兩類
自由格式free format 格式化formated
➢ 自由格式輸入與輸出
read(*,*) variable1,variable2,… write(*,*) variable1, variable2,…
➢ 整數算術-----Ex. 3/4=0
5/4=1
➢ 實數算術-----Ex. 5./4.=1.25
3./4.=0.75
指定陳述與算術計算
23
➢ 運算之層次 (算術計算式之計算先後次序) [1].括號；[2].指數由右至左；[3].乘除；[4]. 加減。 (除了指數外，同層次則由左至右依序運算)
➢ 混合模式算術-----Ex. 1+1/4=1
等於
指定陳述與邏輯計算
25
➢ 組合邏輯運算子combinational logic operator
L1 .NOT. L2 Logical NOT L1 .AND. L2 Logical AND L1 .OR. L2 Logical OR L1 .EQV. L2 Logical equivalence L1 .NEQV. L2 Logical
fortran77程序设计 pdf
fortran77程序设计pdf
Fortran 77 是一种老旧的编程语言，主要用于科学计算。
以下是一个简单的Fortran 77 程序示例，用于计算斐波那契数列的第n 项：
```fortran
PROGRAM FIBONACCI
IMPLICIT NONE
INTEGER N, F1, F2, FN
INTEGER I
PARAMETER (N = 10)
DATA F1, F2 /0, 1/
DO I = 1, N
PRINT *, F1, F2
FN = F1 + F2
F1 = F2
F2 = FN
END DO
END PROGRAM FIBONACCI
```
该程序首先定义了几个整数变量N、F1、F2 和FN，然后使用PARAMETER 语句将N 设置为10。
接下来，程序使用DATA 语句初始化F1 和F2 为斐波那契数列的前两项0 和1。
然后，程序使用DO 循环迭代N 次，每次迭代中输出F1 和F2 的值，计算下一项FN，然后更新F1 和F2 的值。
最后，程序使用END PROGRAM 语句结束。
需要注意的是，Fortran 77 的语法比较繁琐，不支持现代编程语言的许多特性，如变量名中不能包含空格、不支持注释等。
因此，建议使用更现代的Fortran 版本进行编程。
fortran77中矩阵的表示方法
fortran77中矩阵的表示方法【实用版5篇】目录（篇1）1.Fortran77 简介2.Fortran77 中矩阵的表示方法3.矩阵的存储方式4.矩阵的操作5.矩阵的访问6.矩阵的例子正文（篇1）1.Fortran77 简介Fortran77 是一种编程语言，主要用于数值计算和科学计算。
Fortran （Formula Translation）的意思是“公式翻译”，最早于 1957 年由 IBM 公司开发。
Fortran77 是 Fortran 语言的第七个版本，也是使用最广泛的版本之一。
2.Fortran77 中矩阵的表示方法在 Fortran77 中，矩阵用数组来表示。
一个数组可以是一个矩阵，也可以是一个向量。
要定义一个矩阵，需要指定矩阵的大小和类型，以及存放矩阵元素的数组。
3.矩阵的存储方式Fortran77 中矩阵的元素是按行存储的，也就是说，矩阵的第一行元素存储在数组的第一个位置，第二行元素存储在数组的第二个位置，以此类推。
4.矩阵的操作Fortran77 提供了许多用于矩阵操作的函数和操作符。
例如，可以使用“*”操作符来执行矩阵乘法，使用“+”操作符来执行矩阵加法。
此外，还可以使用一些内置函数，如“SUM”和“PROD”等来执行矩阵的求和和乘积操作。
5.矩阵的访问在 Fortran77 中，可以通过下标来访问矩阵的元素。
下标由两个部分组成：行号和列号。
例如，要访问一个 2x3 矩阵的第一行第二列的元素，可以使用下标（1,2）。
目录（篇2）1.Fortran77 简介2.Fortran77 中矩阵的表示方法3.示例：一个二维矩阵的表示4.结论正文（篇2）Fortran（Formula Translation）是一种高级编程语言，主要用于数值计算和科学计算。
Fortran77 是 Fortran 语言的一个版本，发布于1977 年。
尽管如今已经有了更新的版本，但 Fortran77 在科学计算领域仍然具有一定的地位。
FORTRAN77综述
FORTRAN77综述data (num(i),i=1,500)/500*0/,(num(i),i=501,1000)/500*1/Fortran77程序书写规则：1、程序中的变量名，不分大小写；2、变量名称是以字母开头再加上1到5位字母或数字构成，即变更名字串中只有前6位有效；3、一行只能写一个语句；4、程序的第一个语句固定为program 程序名称字符串5、某行的第１个字符至第５个字符位为标号区，只能书写语句标号或空着或注释内容；6、某行的第１个字符为Ｃ或＊号时，则表示该行为注释行，其后面的内容为注释内容；7、某行的第６个字符位为非空格和非０字符时，则该行为上一行的续行，一个语句最多可有19个续行；8、某行的第７至７２字符位为语句区，语句区内可以任加空格以求美观；9、某行的第７３至８０字符位为注释区，８０字符位以后不能有内容。
Fortran77关系运算符：Fortran77逻辑运算符：.gt. 大于.ge. 天于或等于.lt. 小于.le. 小于或等于.eq. 等于.ne. 不等于.and. 逻辑与.or. 逻辑或.not. 逻辑非.eqv. 逻辑等.neqv. 逻辑不等运算符优先级由高到低顺序为:()→**→*或/→+或-→.gt.或.ge.或.lt.或.le.或.eq.或.ne.→.not.→.and.→.or.→.eqv.或.neqvFortran77语句：语句说明备注write(*,*) x1,x2 输出语句第一个*号是指输入输出文件设备号或其它设备机,第二个*号是指表控格式语句的行号，如不print *,x1,x2 输出语句*号是指表控格式语句的行号，如不指定则用默read *,x1,x2 输入语句*号是指表控格式语句的行号，如不指定则用默format(格式符) 控制输入输出格式语句。
注：1.在打印输出时，每一行第1个字符不显示，用来控制纵向走纸或显示行。
第1个字符作用空格正常回车换行0 回车并跳过1行1 换页+ 只回车不换行其它通常是回车换行2.输入小数时，自带小数点优先。
fortran77程序设计简介
1.2 简单的FORTRAN 77程序分析
为了使读者从一开始就了解什么是FORTRAN 77程序， 下面先介绍两个很简单的FORTRAN 77源程序。 [例1.1]求三个数的平均数 程序代码： C CALCULATE THE AVERAGE OF THREE NUMBERS 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)主程序
(2)子程序 C SUBPROGRAM C MAIN PROGRAM FUNCTION C(R) PROGRAM EX2 PI=3.1415926 PRINT *, 'R=', 1.0, ' C=', C(1.0) C=2*PI*R PRINT *, 'R=', 3.0, ' C=', C(3.0) RETURN END PRINT *, 'R=', 12.0, ' C=', C(12.0) PRINT *, 'R=', 5.0, ' C=', C(5.0) END
（4）FORTRAN 77没有规定保留字，即可以用 FORTRAN中的函数名或语句定义符作变量名， 例如： SIN=3.5 PRINT *, SIN 或 READ *, PRINT PRINT *, PRINT
3.2.3 变量类型
常量是分为类型的，而变量是用来存放常量 的，因此变量也相应地区分为整型变量、实型变 量、双精度型变量、复型变量、逻辑型变量、字 符型变量。整型变量用来存放整型常量，实型变 量用来存放实型常量。
第3章 Fortran程序设计初步-1(fortran77)
在FORTRAN77的基础上添
加了很多内容，FOR95只 能视为FOR90的修正版， 加强了并行运算方面的 支持功能.
5/116
NEXT
3.2 简单程序分析
10 20 30 40 50 60 70 80 01234567890123456789012345678901234567890123456789012345678901234567890123456789
3/116
3.1 FORTRAN语言发展概况
FORTRAN-Formula Translation (公式翻译) 是世界上第一个被正式推广使用的高级语言 (于1954年提出; 1956年正式使用) Fortran是数值计算领域里使用的主要语言； 发展(有代表性的几个版本)： 早期的版本不是 Fortran Ⅱ 1958 结构化语言,没 Fortran Ⅳ 1962 (Fortran 66) 有直接实现三种 基本结构的语句 Fortran 77 1978 (使用goto实现 Fortran 90 1990 特定操作).F77
35/116
FORTRAN编译系统—连接装配
36/116
FORTRAN编译系统—开始运行
37/116
FORTRAN编译系统—显示结果
38/116
FORTRAN编译系统—开始运行
FORTRAN90编译系统界面简介 FORTRAN90编译系统操作步骤 FORTRAN90编译系统基本设置等
3.3 Fortran书写格式
Fixed Format（固定格式）
第1个字符
当为字母c、C或*，这一行文本会当成说明 或批注，不会被编译。 当为数字，就是用来给这一行程序代码取 个代号，不然只能是空格。
Fortran77中文帮助教程
第一章 FORTRAN语言程序设计初步...................................................................................................1 1.1 FORTRAN语言发展概况..........................................................................................................1 1.2 简单的FORTRAN程序分析......................................................................................................1 1.3 FORTRAN 源程序的书写格式................................................................................................1 1.4 Fortran程序的编辑与运行 ........................................................................................................1 1.5 常 量 ..........................................................................................................................................1 1.5.1 整型常量 .........................................................................................................................1 1.5.2 实型常量 .........................................................................................................................1 1.6 变 量 ..........................................................................................................................................2 1.6.1 变量的概念 .....................................................................................................................2 1.6.2 变量名 .............................................................................................................................2 1.6.3 变量类型 .........................................................................................................................2 1.7 Fortran内部函数 ........................................................................................................................2 1.8 Fortran算术表达式 ....................................................................................................................3 1.8.1 算术运算符和运算优先级 .............................................................................................3 1.8.2 表达式运算中的类型问题 .............................................................................................3 1.8.3 运算的误差问题 .............................................................................................................3 1.9 赋值语句 ....................................................................................................................................3 1.10 简单输出语句 ..........................................................................................................................3 1.11 简单输入语句 ..........................................................................................................................4 1.12 PARAMETER语句 ..................................................................................................................5 1.13 END，STOP，PAUSE语句 ....................................................................................................5 总结 ...................................................................................................................................................5
Fortran77 程序基础
关系表达式是最简单的一种逻辑表达式，它的一般形式为： <关系运算量> <关系运算符> <关系运算量> 关系运算量可以是算术量，也可以是字符量。算术量可以是数值型常 量、数值型变量、数值函数，还可以是算术表达式。如：
A+B>3.5 40>=40 40<C COS(B)<=0.5 (M+N)*X==0.0 X-Z.NE.(Y+X) 等价于 等价于 等价于 等价于 等价于 等价于 A+B.GT.3.5 40.GE.40 40.LT.C COS(B).LE.0.5 (M+N)*X.EQ.0.0 X-Z.NE.(Y+X)
表控格式输入、输出 格式输入、输出
格式输入输出控制符
常用控制符 i，f，a 写法： nIw；nfw.d； naw 如： integer year, month, day write(*, "(3i8)") year, month, day 又如： real runoff write (*, "(f9.2)") runoff
(A.GT.B).AND.(A.NE.C) (X.LT.-1.0).OR.(X.GT.1.0) .NOT.((A+C)*D.LE.0.0) (A.GT.B).EQV.(C.LE.D) 等价于(A>B).AND.(A/=C) 等价于(X<-1.0).OR.(X>1.0) 等价于.NOT.((A+C)*D<=0.0) 等价于(A>B).EQV.(C<=D)
逻辑表达式的一般形式为： <逻辑运算量><逻辑运算符><逻辑运算量>[<逻辑运算符><逻辑运算量>„] 同关系表达式不同，一个逻辑表达式中可以包括多个逻辑运算符，例如逻辑 表达式“A.GE.10.0.AND.A+C.GT.B+D.OR..NOT..TRUE.”中包含 了.AND.、.OR.、.NOT.三个逻辑运算符。在逻辑表达式中除了有逻辑运算符 外，还可以有关系运算符和算术运算符。 下面是一些逻辑表达式的例子：
FORTRAN语言-FORTRAN77结构化程序设计课程设计
FORTRAN语言-FORTRAN77结构化程序设计课程设计一、课程设计背景FORTRAN是一种编程语言，最早被用于解决科学和工程领域的计算问题。
它是一种高级语言，可以处理数值计算、科学计算和工程计算等问题。
FORTRAN语言对于科学计算领域来说至关重要，许多科学计算的软件都是使用FORTRAN语言编写的。
本课程设计旨在帮助学生掌握FORTRAN语言的基本知识，了解FORTRAN77结构化程序设计的基本理论和方法，并通过程序设计实践来巩固和深化所学知识。
二、课程设计目标本课程设计的主要目标是：•掌握FORTRAN语言的基本语法和数据类型；•了解FORTRAN77结构化程序设计的基本理论和方法；•了解FORTRAN语言在科学计算领域的应用；•能够使用FORTRAN语言进行简单的程序设计；•培养学生的分析和解决问题的能力。
三、课程设计内容1. FORTRAN语言的基本语法和数据类型本部分主要包括以下内容：•程序的基本结构和格式；•变量的定义和使用；•常量的使用；•运算符和表达式；•控制结构：分支语句和循环语句；•数组和数组的使用；•子程序的定义和使用；•文件的输入和输出。
2. FORTRAN77结构化程序设计的基本理论和方法本部分主要包括以下内容：•结构化程序设计的基本概念；•模块化程序设计的基本原理；•数据流程图和程序流程图的绘制方法；•程序的调试和测试方法。
3. FORTRAN语言在科学计算领域的应用本部分主要介绍FORTRAN语言在科学计算领域的应用，例如在物理、化学、地质、天气预报等领域中的应用。
学生可以了解FORTRAN语言在实际应用中的重要性和应用范围。
4. 程序设计实践本部分主要是学生进行FORTRAN语言的程序设计实践，设计内容可从课本和其他相关资料中选择。
四、课程设计要求本课程设计要求学生结合所学知识，完成以下任务：1.编写一个简单的FORTRAN程序，例如计算圆周率或者计算三角函数等；2.编写一个FORTRAN程序，读入10个整数，计算它们的平均值；3.编写一个FORTRAN程序，利用子程序计算简单的各种图形的面积。
Fortran77语句和函数
―― Fortran77 结构化程序设计
第一章 FORTRAN语言程序设计初步...................................................................................................1 1.1 FORTRAN语言发展概况..........................................................................................................1 1.2 简单的FORTRAN程序分析......................................................................................................1 1.3 FORTRAN 源程序的书写格式................................................................................................1 1.4 Fortran程序的编辑与运行 ........................................................................................................1 1.5 常 量 ..........................................................................................................................................1 1.5.1 整型常量 .........................................................................................................................1 1.5.2 实型常量 .........................................................................................................................1 1.6 变 量 ..........................................................................................................................................2 1.6.1 变量的概念 .....................................................................................................................2 1.6.2 变量名 .............................................................................................................................2 1.6.3 变量类型 .........................................................................................................................2 1.7 Fortran内部函数 ........................................................................................................................2 1.8 Fortran算术表达式 ....................................................................................................................3 1.8.1 算术运算符和运算优先级 .............................................................................................3 1.8.2 表达式运算中的类型问题 .............................................................................................3 1.8.3 运算的误差问题 .............................................................................................................3 1.9 赋值语句 ....................................................................................................................................3 1.10 简单输出语句 ..........................................................................................................................3 1.11 简单输入语句 ..........................................................................................................................4 1.12 PARAMETER语句 ..................................................................................................................5 1.13 END，STOP，PAUSE语句 ....................................................................................................5 总结 ...................................................................................................................................................5
FORTRAN77结构化程序设计 FORTRAN语言 第二章 计算机和计算机程序
⑵ X进制转化为十进制：按权相加法 ; ⑶ 二进制转化为八(十六进制)：将整数部分自右向左和小数部分自左向右
分别按三位(四位)一组，不足三位(四位)用“0”补齐。
22:04:38 7
计算机语言和计算机程序
一、计算机语言
低级 语言
机器语言:计算机直接识别和执行的二进制形式的指令。 符号语言：使用助记符（特定的符号代替某些操作）代替二进制指令的语言。 算法语言：语言不面向机器，而是面向过程（不考虑及其内部构造和不同机 器的特点，只要按照解题的算法写出解题过程） 非过程语言：只管结果，不管过程的这种语言。
电子计算机主要用途
⑴科学计算 ⑵数据处理和信息加工 ⑶自动控制系统 ⑷计算机辅助设计 ⑸人工智能
3 返回
电路原理
⑵具有内部存储信息的能力。 可以存储电脉冲信号 ⑶运算过程由程序自动控制。 人给机器指令，机器就 完成一个操作
22:04:38
计算机的基本组成
基本组成
⑴运算器 ⑵存储器
计算步骤 原始数据 运算结果 输 入 出 命 令 / 令 取数
位（bit）又称比特，每一个小的脉冲电路单元称为一位，它 是存储信息的最小单位。
字节(byte)：由若干个位组成一个字节，一般的计算机以8位 作为一个字节。
字（word）：由一个或几个字节组成一个存储单元。一个存 储单元中存放一条指令或一个数据。 地址：将每一个存储单元编号，这个编号称为地址
22:04:38
二、计算机程序
程序：为解决某一个特定问题而用某一种语言编写的指令序列。 A.语法：语法规则 B.语义：某一语法成份的含义
C.语用：正确使用语言
22:04:38 8
程序运行环境
编辑程序
Fortran77结构化程序设计
2021/5/15
6
3.2 简单的Fortran程序分析
例1：求一元二次方程x2+3x-5.6=0的根， 并打印结果。
• 利用公式：
x1,2
b
b24ac 2a
• （这里，a=1，b=3，c=-5.6）
2021/5/15
7
3.2 简单的Fortran程序分析
编程如下：
x1,2
b
b2 4ac 2a
c the roots of the quadratic equation
⑶计算机在输出时，按标准化指数形式输出。 例：0.28→2.800000E-01 -59.58E+12→-5.958000E+13 即数字部分大于1，且小数点前只有一位非零 数字的指数输出形式。
⑷在微机中，一般用四个字节存放一个实数，其取值 范围为：10-75～1075。超出此范围时为“溢出”错 误。
2021/5/15
31
3.7 Fortran内部函数
注意几点：
⑴函数自变量（参数）必须用括号括起来。
例：sinx+cosx → sin(x)+cos(x)
⑵函数自变量可以是常量、变量或表达式。
例： exp(3.0)
sin (x+cos(x))
⑶有些函数的类型是由自变量的类型确定的。
例：mod(8.0,3.0) →2.0
2021/5/15
13
3.4 Fortran程序的编辑与运行
一、Fortran PowerStation 4.0的启动
选“开始”→“程序”→“Fortran PowerStation 4.0”→“Microsoft Developer Studio”。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
1.3 FORTRAN源程序的书写格式
FORTRAN源程序必须严格地按照一定 的格式书写。在编译时对一行中不同位置 上的内容分别处理。标准的FORTRAN程序 纸格式见下图。
1、第l~5列为标号区：
可以写l至5位整数。也可以没有标号。标号区 中的空格不起作用。如 l00与100 或1 0 0作用相 同。标号应是无符号整数(不应包括正负号或小数 点)。标号大小顺序没有任何要求。假如第二行的 标号为1000，第三行的标号可以是10，也可以是 10000。
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
3、一个程序单位包括若干行。FORTRAN行分为两类： （1）语句行。由一个FORTRAN语句组成，它对程序运行情
况是有影响的。FORTRAN语句分为：执行语句和非执行语 句。执行语句使计算机在运行时产生某些操作，如赋值语 句、打印语句等。非执行语句（包括说明语句，数据语句 等）将有关信息通知编译系统，以便在编译时作出相应的 处理，例如类型说明语句、函数子程序语句等。 （2）非语句行，即注释行。它不是FORTRAN语句，它不被 翻译成机器目标指令，不产生任何机器操作。它仅仅是为 了人们阅读程序的方便而加到程序中的。一个程序中注释 行的数目不受限制，根据需要而定。但一个程序单位不能 只由注释行组成。注释行是程序的一部分，在打印程序清 单时，注释行也照样打印出来。注释行的内容完全是根据 程序设计人员需要而写的，一般是为程序（或程序中某一 部分）的作用作注释。注释可以用英文或汉语拼音文字， 还可以用汉字作注释。在一些实用程序中，注释行的篇幅 有时占整个程序的三分之一以上。
PRINT *, 'R=', 12.0, ' C=', C(12.0)
EHale Waihona Puke DPRINT *, 'R=', 5.0, ' C=', C(5.0)
END
从以上例子中可以看出：
1、一个程序由一个或若干个程序单位组成。主程序和每一 个子程序分别是一个独立的程序单位。在解决一个比较复 杂的问题时，可以分别将每个功能编为一个子程序，然后 按搭积木一样将各有关程序单位组成一个程序。一个程序 单位就是一个模块，结构化程序设计需要采用模块化方法， 在FORTRAN中，子程序是实现模块化的有效方法。
FORTRAN 77还不是完全结构化的语言，但由于增加了一些结构化的 语句，特别是“块if”语句，提供了IF-ELSE-ENDIF形式的判断控制语 句，使FORTRAN 77能用于编写结构化程序。此外，还扩充了字符处 理功能，使FORTRAN不仅可用于数值计算领域，还可以使用于非数 值运算领域。
目前，FORTRAN77已在国内外广泛使用，大多数计算机系统都已配 置了FORTRAN 77。
2、每一个程序单位都是以“END”结束的。在FORTRAN 77 中，END既是一个程序单位的结束标志，又是一个独立 的语句（结束语句）。主程序中的END语句的作用是使 程序“停止运行”，子程序中的END语句是“使流程返 回调用程序”。请注意在一个程序单位中只能有一个 END语句，如果需要，可以用STOP语句使程序终止或用 RETURN语句从子程序返回。
标号区内不得出现标号以外的内容，但注释行 例外。注释行的内容可以写在标号区内，一行中 第一列为“C”或“*”的，该行即被认为注释行。 如果在第一列上出现的不是数字、空格或“C”和 “*”的字符，编译时按出错处理。
FORTRAN 77语言 --结构化程序设计
主讲：王 飞 江苏科技大学
教材：
《FORTRAN语言—FORTRAN77结构化程序 设计》谭浩强等编著
第一章 FORTRAN语言程序设计初步
1.1 FORTRAN语言发展概况 1.2 简单的FORTRAN 77程序分析 1.3 FORTRAN源程序的书写格式
(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
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)主程序
4、FORTRON程序中的语句可以没有标号，也可以有标号， 根据需要而定。标号的作用是标志一个语句以便被其它语 句引用。在同一个程序单位中不能有两个相同标号的语句。 标号不影响语句的执行顺序。程序中语句执行的顺序一般 依照它们在程序中的位置而定，即写在前面的语句先执行， 写在后面的语句后执行。
5、一个程序单位中各类语句的位置是有一定规定的，例如 PROGRAM语句应是主程序的第一个语句，FUNCTION语 句是函数子程序的第一个语句，END语句只能是程序单位 中最后一行。
1.1 FORTRAN语言发展概况
FORTRAN语言是世界上第一个被正式推广使用的高级语言。它是 1954年被提出来的，1956年开始正式使用，至今已有五十多年历史， 但仍历久不衰，它始终是数值计算领域所使用的主要语言。
FORTRAN是英文FORmula TRANslation的缩写，意为“公式翻译”。 它是为科学、工程问题或企事业管理中的那些能够用数学公式表达的 问题而设计的，其数值计算的功能较强。