fortra第4章(条件).ppt

　　　第四章　逻辑运算和选择结构 4.1 关系表达式 4.2 逻辑表达式4.3 逻辑IF语句4.4 分块条件语句4.5 块IF构造4.6 多重选择和CASE构造 3.当两个算术关系表达式的数据类型不相同时,求值过程为:将两个算术表达式化为同一类型然后比较.转换规律是将低级类型向高级类型转换。因此，执行关系表达式的过程为：算出算术表达式的值；将两个算术表达式值转换成同一类型；将两个表达式的值进行比较。 4.3 逻辑表达式逻辑同.EQV.(逻辑等值)例:3.5.LE.10.0.EQV.20.0.LT.15.0 其值为假3.5.LE.10.0.EQV.20.0.GE.15.0 其值为真 逻辑表达式中包含算术运算符、关系运算符和逻 辑运算符，它们的运算优先次序如下表： 例1：若A=1.5,B=2.0,C=1.2,X=3.0,Y=5.0,L1为真，有逻辑表达式A.GT.3.6*B.AND.X.EQ.Y.OR.L1.AND..NOT.(3.6-C)*2.GE.D/2.5 例2: 已知 A=.FALSE. , B=.FALSE. , C=.FALSE. ,X=11.5, Y=1.6 , Z=41.5 X.LT.Y.OR.X+Y.GT.Z.AND..NOT.(A.EQV.B.OR.C)4.5 块IF条件语句 块IF的一般形式可写成： IF(逻辑表达式) THEN ← 块IF语句 块1 ← then块 ELSE 块2 ← else块 END IF 例: 有一折线其关系为: Y= 2X+3 (X≤2)X+5 (X2)见图,要求输入一个X值,打印一个相应的Y值.块IF语句嵌套对于稍微复杂的问题,往往在某种条件判定后,仍需进一步判定,然后决定接下去该做什么,这种多层判定称为嵌套的判定语句.简单嵌套结构如下:IF (e1) THENIF (e2) THEN外 内 :ENDIF:ENDIF 在嵌套程序中找出对应的块IF,ELSE,ENDIF语句的方法: 1. 从最内层的块IF语句开始,找离它最近的ENDIF语句,将其用线括起来,在两语句之间的ELSE语句必属于这一层的块IF. 2. 由内向外重复上述过程直到遇到最外层的块IF语句和ENDIF语句为止. 例:编制二次方程求根的程序. 分析:AX2+BX+C=0 的判别式为: D=B2-4AC A=0,B=0 则C=0 A=0,B 0 则X=-C/B A 0,D0 则 有二复根X1+iX2 和 X1-iX2 A 0,D=0 则 有两相等的根 -B/2A A 0,D0 则 有两实根例:编制二次方程求根的程序.PROGRAM EQUATEREAD *,A,B,CPRINT *,’COEFFICIENTS ARE’,A,B,CIF (A·EQ·0.0) THENIF (B·EQ·0.0) THENPRINT *,’EQUATION HAS THE FORM’,C,’＝0.0’ELSEPRINT *,’NOT QUADRATIC EQUATION ROOT IS’,-C／BENDIFELSEPART1＝-B/(2.0*A)TEMP＝B*B-4.0*A*CPART2＝SQRT(ABS(TEMP))/(2.0*A)IF (TEMP·LT·0.0) THENPRINT *,’COMPLEX ROOTS’,PART1,’+I’,PART2,’ ′,PART1,’-I’,PART2ELSEIF (TEMP·EQ·0.0) THENPRINT *,’BOTH REAL ROOTS ARE’,PART1ELSEPRINT *,’REAL ROOTS ARE’,PABT1+PART2,PART1-PART2ENDIFENDIFEND ELSE IF语句在单边或双边选择结构的任意分支中又嵌入另一单边或双边选择结构,即构成多重选择结构.说明: 1.IF…THEN语句必须与ENDIF语句配对,ELSE IF …THEN语句不要求ENDIF与之配对. 例:阶跃函数 1 (当X0)YY= 0 (当X=0)1X-1 (当X0)-1 五 分块选择结构中的空块在分块条件语句中,THEN或ELSE后的语句块没有时,即称之为空块. 六块IF语句应用注意事项 1. 不允许从IF块、ELSE块外把控制转移到IF块、ELSEIF 块, ELSE块内. 3. 若在IF块、ELSE块ELSE IF块中出现GOTO语句或其它 转移语句,则会改变正常的执行顺序. 作业： 1. P96 二、三、九、十 2.读入一个整型变量N的