FORTRAN90程序设计2.pptVIP

Fortran90语言程序设计 计算机中心 2006.12 第2部分 选择结构程序设计 概述 关系表达式与逻辑表达式 逻辑IF语句 块IF结构 CASE结构 选择结构程序设计举例 概述 结构化程序的设计思想 只要三种控制结构就能表达用一个入口和一个出口框图所能表达的任何程序逻辑，这三种控制结构分别为顺序结构、选择结构和循环结构。 顺序结构(Sequence Structure)，是按照语句在程序中的结构顺序一条一条的执行。 选择结构 (Selection Structure)，是按照给定条件的值，来判断执行哪个语句块。当条件满足时(值为.TRUE. )，执行BLOCK1块；否则( 值为.FALSE. )，执行BLOCK2块。 循环结构 (Repetition Structure)，是按照给定的条件来确定是否重复执行给定的一段可执行语句组成的程序段(也称循环体 ) 。 概述 三种控制结构具有如下的共同特点： 每一种控制结构有且仅有一个入口和一个出口； 在每一种结构中没有不合乎逻辑的语句或表达式； 在每一种结构中不包含死循环。 结构化程序设计要求按照三种控制结构，自顶向下、模块化地设计程序，使程序逻辑结构明确，易于理解，易于维护。 关系表达式与逻辑表达式 关系表达式 关系表达式用来比较算术表达式或字符表达式的值的大小，其构成格式为： 算术表达式1 关系运算符 算术表达式2 或者 字符表达式1 关系运算符 字符表达式2 其中，表达式1和表达式2可以是常数、变量、函数或表达式。 关系表达式与逻辑表达式 关系运算符 FORTRAN90语言中提供了六种关系运算，这六种关系运算符分别为： 代数表示 FORTRAN90表示 ≤ = ≥ = = == ≠ /= FORTRAN90以前的版本中使用的关系运算符：.LT.（小于）、.LE.（小于等于）、.GT.（大于）、.GE.（大于等于）、.EQ.（等于）、.NE.（不等于），现在已不提倡使用。 关系表达式与逻辑表达式 关系表达式 A B ，表示数学式：A B； X + Y = C ，表示数学式：X + Y ≤ C； X – Y = 1.0E-6 ，表示数学式：X – Y ≤ 10-6； X ** 2 + Y ** 2 + Z **2 /= R **2 ，表示数学式：X2 + Y2 + Z2 ≠ R2。 ( A + B ) = A* ( SQRT ( B * B - 4.0 * A * C ) )，表示数学式 B / = ( C - D ) / LOG ( B )，表示数学式B≠(C-D)/lnB 关系表达式与逻辑表达式 逻辑表达式 逻辑型常量只有两个：.TRUE.表示“真”，.FALSE.表示“假”。 逻辑型变量用来存放逻辑值，因此，逻辑变量的取值也只有两个：.TRUE.或.FALSE.。 逻辑型变量在使用时必须首先用类型说明语句进行说明，说明逻辑变量的类型说明语句为： LOGICAL [( KIND = N ) ][，属性说明表] :: 变量表 关系表达式与逻辑表达式 逻辑运算符 关系表达式与逻辑表达式 逻辑表达式 用逻辑运算符对逻辑量进行运算的表达式称为逻辑表达式。逻辑表达式的一般形式为： LOGICAL_EXP1 逻辑运算符 LOGICAL_EXP2 LOGICAL_EXP1和 LOGICAL_EXP2可以是逻辑常量、逻辑变量、逻辑型数组元素、关系表达式或者是逻辑表达式。逻辑表达式的运算结果是一个逻辑值。 逻辑运算符的优先级为： (高) ①.NOT. ②.AND. ③.OR. ④.EQV./.NEQV. (低) 逻辑表达式的说明 (1) 逻辑运算符两侧的圆点“ .”不能省略； (2) 算术运算符的运算对象是数值量，运算结果是数值。关系运算符的运算对象是数值量或字符串，运算结果是逻辑值。逻辑运算符的运算对象是逻辑量，运算结果是逻辑值； (3) 当逻辑量L1、L2、L3同时满足时的条件可用逻辑表达式表示，写成： L1 .AND. L2 .AND. L3 如果要表示A B C，不能写为: A B C ( 或A .LT. B .LT. C) 而应写为: ( A .. B ) .AND.