fortran第4章[条件].pptVIP

　　　第四章　逻辑运算和选择结构;a)关系运算符 关系运算符就是关系比较符。Fortran中有六个关系运算符:;b) 关系表达式 关系表达式是最简单的一种逻辑表达式。其一般形式为： 算术表达式 关系运算符 算术表达式 字符表达式 关系运算符 字符表达式 算术表达式也可以是一个算术量，即为一个数值常数、数值型变量、数值函数。 例：A+B = 0. → A+B .LE. 0. A*B \= C/D → A*B .NE. C/D 注意: 1)关系表达式中关系操作符只准出现一次。 2)数学中不等式写法与FORTRAN中关系表达式的写法有同有异，不可随意使用数学中的习惯用法， 例如语句写法 3＜X＜7 就是不正确的关系表达式;2．关系表达式求值的过程是：先分别计算两个表达 式的值，然后将他们进行比较．;3.当两个算术关系表达式的数据类型不相同时,求值 过程为: 将两个算术表达式化为同一类型然后比较. 转换规律是将低级类型向高级类型转换。因此，执行关系表达式的过程为：算出算术表达式的值；将两个算术表达式值转换成同一类型；将两个表达式的值进行比较。;4.当算术表达式是非整型时尽量不用关系运算符.EQ. 和.NE.因为实型数在计算机中不能保证完全精确.;4.3 逻辑表达式;b) 逻辑运算符 Fortran有5个逻辑运算符，每个操作符两边都有一点，不可省略： ; 逻辑非.NOT. 例: 3.5.GT.2 其值为 .TRUE. .NOT.(3.5.GT.2)其值为.FALSE.; ; 逻辑表达式中包含算术运算符、关系运算符和逻 辑运算符，它们的运算优先次序如下表：;注: a.关系符只能用于两个数值量的大小比较， 不能 .TRUE..EQ.Y b.不能将逻辑运算符和关系符连用。 即用A.NOT..EQ.B 表示A≠B. C.在关系表达式中一个算术表达式只能与一个关系符 相邻,不能在两侧都出现关系符.;例1：若A=1.5,B=2.0,C=1.2,X=3.0,Y=5.0,L1为真，有逻辑表达式;例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) ;IF语句不是一种选择结构，只是一条语句，它在算法较简单的场合下，可以灵活地完成二分叉选择算法。 执行过程： 如果条件成立（即逻辑表达式值是‘真’），则执行其后紧跟的执行语句，而后执行下一条语句； 如果条件不成立，则整个IF语句不作任何操作，只是起下滑作用，使控制转移到IF语句的下一个语句。;IF语句最大的用处是退出迭代。计算机程序中经常作连加、连乘或反复执行某段程序，并规定只有当某个参数大于或小于某值时才停止循环，这时就可以使用IF语句。IF语句用于两分叉选择的例子 如：求数学中的阶梯函数 （ ）可写成： Y=0 IF(X1) Y=1 注意本例中不可写成： IF(X=0) Y=0 Y=1 ;例：IF(X0..AND.K\=N) Y=K+X 例：打印学生考试成绩，大于等于80分的为“A”，大于等于60分而小于80分的为“B”，小于60分的为“C”： READ *,GRADE IF(GRADE.GE.8O) PRlNT *，”A” IF(GRADE.GE.6O .AND. GRADE.LT.80) PRlNT *，”B” IF(GRADE.LT.6O) PRlNT *，”C” 逻辑IF语句当条件为“真”时只能执行一个执行语句而不能执行若干个语句。与块IF相比，逻辑IF语句是在一行中完成的一个选择操作，因此它又称“行IF语句”以与块IF区别。;逻辑IF语句也常与GOTO语句合用，但如果过多使用，程序结构将显得混乱，难于理解。应尽可能采用结构化的程序设计方法。 ！ F90的固定格式 －－－－－统计学生考试合格人数 INTEGER :: n, s, k s = 0; k = 0 1 PRINT*,键入分数 （负数时退出）： READ*, n; IF(n 0) GOTO 999 s = s + 1 IF(n = 60) k = k + 1 GOTO 1 999 PRINT*, k, 个学生合格。 总人数＝, s