第四章 逻辑运算和选择结构.pptVIP

2003/1/17 §4.3 块IF实现选择结构 块IF的组成 块IF的执行过程 块IF使用注意事项 块IF结构应用举例 块IF的嵌套 块IF嵌套的应用 ELSE IF 语句 ELSE IF 语句的应用 1、块IF的组成 块IF的一般形式为： IF （逻辑表达式） THEN then 块 ELSE else 块 ENDIF 说明: ⑴块IF语句； ⑵then块，它由若干个执行语句组成，每一个执行语句占一行； ⑶ELSE语句，它单独占一行； ⑷else块。由若干个执行语句组成，每一个执行语句占一行； ⑸ENDIF语句。块IF的结束符号。 2、块IF的执行过程 IF （逻辑表达式）THEN then 块 ELSE else 块 ENDIF (1)执行块IF语句，求出逻辑表达式的值； (2)若为“真”，则流程转到then块,执行then块，然后跳过ELSE语句和else块,流程转到END IF语句处； (3)若逻辑表达式值为“假”，则流程跳过then块,转到ELSE语句，执行else块；然后流程转到END IF语句处； (4)执行END IF语句的下一语句。 3、 块IF使用注意事项 一个块IF是由若干个语句组成的。块IF语句、ELSE语句和ENDIF语句只能用在块IF中而不能在程序中的块IF以外单独使用； 块IF可以根据需要舍去then块或ELSE语句及else块； 一个块IF必须以块IF语句开始，以ENDIF语句结束。 4、 块IF结构应用举例例1:要求利用函数： 用键盘输入一个x求出y的值？ READ(*,*) X IF (X .GE. 0) THEN Y=3*X+6 ELSE Y=-X**2+2*X-8 ENDIF WRITE(*,*)’Y=’，Y END 4、 块IF结构应用举例 用键盘输入一个x求出y的值 READ(*,*) X IF (X .GT. 0) THEN Y=6*X+7 ENDIF WRITE(*,*)’Y=’，Y END N-S流程图 思考 ？？ 从以上几个例题我们可以看出：在块IF 中，可以用then块和else块分别处理当逻辑表达式的值为“真”和“ 假”时应进行的操作。但实际问题往往没有这么简单，如我们刚提到的个人所得税的计算问题:如何用Fortran 语言实现？ 5、块IF的嵌套 概念：一个块IF中又完整地包含另一个或多个块IF。 嵌套形式: IF （逻辑表达式） THEN IF （逻辑表达式） THEN then 块 ELSE else 块 ENDIF ELSE else 块 ENDIF 6、 块IF嵌套的应用 N-S 流程图 6、 块IF嵌套的应用 Read(*,*) a, b, c D=b**2- 4*a*c If (D.lt.0) then write(*,*)’无实根’ Else If (D.gt.0) then x1=-b/(2*a) +SQRT(D)/(2*a) x2=-b/(2*a) -SQRT(D)/(2*a) Else x1=-b/(2*a) x2=-b/(2*a) End if write(*,*) x1,x2 End if End 思考 ？？ 块IF嵌套可以解决多层选择的问题，但是如果嵌套层次比较多，程序就会冗长。 7、 ELSE IF 语句 为了解决多层嵌套程序冗长的问题，FORTRAN语言提供EL