fortran选择结构和基本语句.pptVIP

第四讲 选择结构及基本语句;4.1 概述;4.2 逻辑IF语句;逻辑IF语句中的可执行语句S只允许是一条语句。 语句S可为赋值语句、I/O语句、STOP、EXIT、CYCLE、GOTO语句。 语句S不可为END、IF、DO、ELSEIF、ENDIF语句，及非执行语句。 逻辑表达式e两边必须有圆括号。 合法逻辑IF语句: IF (A .GT. Max) Max=A IF (AB) READ (*,*) A IF (X.EQ.10.0) WRITE(*,*) X IF (ABS(A-B)1E-7) STOP IF (AB) EXIT IF (SUM .LT. 100.0) G0TO 10;[例4.1]已知三个整数A,B,C,输入其值并打印三个数中最大值。 解：根据题意设计算法并画程序流程图,如图4-2所示。 程序： INTEGER A,B,C,max WRITE(*,“(‘请输入三个整数:’\)”) READ(*,*) A,B,C max=A IF(Bmax) max=B IF(Cmax) max=C WRITE(*,100) max 100 FORMAT(1X,max=,I5) END 输入：请输入三个实数:12,100,22↙ 输出：max= 100 ;4.3 块IF语句;