第8篇 章 程序流程控制 Fortran电子教案（PPT）.ppt

* 第8章 程序流程控制 本章将介绍算法与流程的基本知识和两种基本的控制结构。 8.1 算法与流程 8.1.1 算法 算法（Algorithm）。只要学会了制定正确且有效的算法，用何种高级计算机语言来编写具体的计算机程序就仅仅只是一个工具选择的问题了。因此，算法的设计也是计算机程序设计的核心内容。 8.1.2 传统流程图 8.1.3 基本程序结构 。传统流程图中使用流程线来指出各个框之间的执行顺序，流程线在使用上没有严格限制。BS 分支结构和循环结构又是在描述算法时不可避免的。针对这些问题，人们设计了三种最基本的流程结构，使用这三种基本结构就可以表示一个良好的算法。可以将这些基本结构称为预制件，一个算法就是通过这些预制件像搭积木一样按顺序排列起来的。 8.2.1 判断语句IF和分支选择语句SELECT CASE IF语句和SELECT CASE语句在Fortran语言中都能够用于构造选择结构 在Fortran 77时代，选择结构是通过IF语句和IF构造来实现的。 8.2.2 判断语句IF的基本用法 使用IF语句来实现选择结构通常有两种用法：语句形式和构造形式。 1．语句形式 实现单一选择：IF(逻辑表达式) 执行语句 2．构造形式 可以使用块IF语句来组成IF构造用于多重选择。 8.2.3 判断语句IF实现多重判断 ELSE IF语句后，IF构造中可以同时存在多个判断条件和多个执行模块，但是只有其中一个条件能够成立，并且只有一个执行模块能够执行： IF(逻辑表达式1) THEN THEN 块 ELSE IF(逻辑表达式2) THEN ELSE IF块 …… ELSE ELSE块 END IF 8.2.4 IF语句的嵌套 IF语句嵌套的形式可以表示如下： [构造名1:]IF(逻辑表达式1) THEN [构造名2:]IF(逻辑表达式2) THEN [构造名3:]IF(逻辑表达式3) THEN …… ENDIF[构造名3] …… ENDIF[构造名2] …… ENDIF[构造名1] 8.2.5 IF语句的特殊用法 在Fortran 77中，IF语句还能够实现一种特殊的选择方法，也就是算术IF语句。算术IF语句根据算术表达式值得结果，有条件的将程序的计算流程转到三条执行语句中的一句。形式如下： IF (表达式) 标号1, 标号2, 标号3 其中，表达式为标量整型或实型表达式，两端用括弧括起来；标号1至3必须是本程序单元中的有效可执行语句的标号。语句中所有的三个语句标号都必须书写，但并不一定要指向三个不同的语句，在同一个算术IF语句中允许同一个语句标号出现多次。 如果表达式的值小于零，标号1 如果表达式的值等于零，标号2 如果表达式的值大于零，标号3 8.2.6 SELECT CASE语句的用法 SELECT CASE语句是Fortran 90/95标准中新增加的语句。该语句用于容纳CASE块，尽管多重判断的IF构造也可以实现这一功能，但是在某些多条件选择的应用场合使用IF构造会使代码显得比较繁琐、层次关系比较复杂。使用CASE构造就可以避免这一问题，编写出来的代码也显得更加直观、简洁。 CASE构造的作用和IF构造不同之处在于：CASE构造只能把某个判断条件的可能结果区分成若干个孤立的离散值或片断（这意味着CASE构造中的判断条件不允许出现重叠），按不同的值或片断进行不同的操作。如果遇到判断条件比较复杂或者存在多种判断条件互相交叉的情况时，在这种情况下只能考虑使用IF构造来进行处理。 8.2.7 SELECT CASE语句的应用 首先演示的程序使用了整型表达式的CASE构造，例子的原型就是程序TEST0802的个人所得税计算程序。在进行改动前需要注意，CASE构造中的选择表达式是不允许为实型表达式的。因此，需要一个将实型数据转换为整型数据的函数，可以考虑使用基本数学函数中的INT函数。 8.3 循环结构 8.3.1 基本的DO构造 DO构造在Fortran 77和Fortran 90/95中都提供用以执行循环操作，但是两个标准在DO构造的具体实现形式上是不同的。两个标准下的各种DO循环都可以归纳为DO构造一般形式： [构造名:] DO [标号][循环控制] 块 终止语句 其中，构造名选项只允许在Fortran 90/95标准中使用，用于标识构造的起止范围；DO语句后的标号选项在Fortran 77和Fortran 90/95标准中同样适用，尽管带标号的DO构造是较老的语法形式；循环控制用于控制循环的执行，提供循环停止或跳出循环的手段等；中止语句用于标定循环构造的结束位置,通过该条语句将流程返回到DO语句。 8.3.2 无条件循环与DO语句 现实中