1、12一、引言一、引言 在在FORTRAN77中,用块中,用块IF结构来实现选择结构,结构来实现选择结构,其形式为:其形式为: IF(条件)条件)THEN then 块块 ELSE else 块块 END IF3 例:计算职工工资。正常工资例:计算职工工资。正常工资rate (yuan/h),一周超过一周超过40 hours时,超过部分按时,超过部分按1.5 rate...
在if-then语句中,如果If后面的布尔表达式为真,就会执行Then语句块中的所有语句,在Then语句块执行完毕后,程序会跳过Else语句块,并继续执行后面的代码;如果If后面的布尔表达式为假,就会跳过Then语句块,执行Else语句块中的所有语句。 总之,在Fortran77中,if语句是一种用于根据逻辑条件来控制程序执行流程的语句,if语句的...
IF (Y。LE.0.0) THEN Z=0 。0 ELSE IF ((Y〈5.0)。AND.(Y /= 2。0)) THEN Z=1/(Y+2) ELSE IF (Y <= 10。0) THEN Z=1/Y ELSE Z=10.0 END IF WRITE(*,*)Z END 在执行上述程序时,由键盘输入 2.0 最后输出的Z值为___相关知识点: 试题来源: 解析 0。5000000 (写0。5即可,不...
如果A满足，则执行C（跳过第二个if），若A不满足，执行第二个if。如果B满足，执行D（跳过C），continue无实际意义，只起连接作用。90、95这样写也行。
Ifeis false, control is transferred to the nextELSE IF,ELSE, orEND IFstatement at the sameIFlevel as theELSE IFstatement. Restrictions You cannot jump into anELSEIFblock from outside theELSE IFblock. The statement label, if any, of anELSE IFstatement cannot be referenced by any statement....
1 一、引言 在FORTRAN77中，用块IF结构来实现选择结构，其形式为：IF（条件）THENthen块ELSEelse块ENDIF 2 例：计算职工工资。正常工资rate(yuan/h)，一周超过40hours时，超过部分按1.5rate(yuan/h)。3 c Payrollwithovertimeprogrampayrollread(*,*)rate,hoursif(hours.gt.40.0)thenregpay=rate*40.0ovt...
elseif (logical expression) then statements : : else statements endif do label var = expr1, expr2, expr3 statements label continue 或者 do var = expr1, expr2, expr3 statements Enddo 其中expr1为初始值,expr2为最终值,expr3为步长 数组: ...
3.1.6 FORTRAN77控制语句 判断语句 IF(逻辑表达式)THEN程序块1ELSE程序块2ENDIF DO语句,DO 标号,记数变量=起始值,终止值,步距"语句, DO标号,N=1,100,1程序块 标号CONTINUE DO UNTIL语句 DO标号,UNTIL(逻辑表达式)”语句,如DO标号,UNTIL(PI。GT.3.14159)程序块 ...
在Fortran77中,没有现代编程语言常见的switch语句,但可以通过其他方法来实现类似的功能。 Fortran77中最常用的控制语句是if语句,通过if语句可以实现条件判断和分支控制。在Fortran77中的if语句的语法为: ``` IF ( condition ) THEN block of statements ELSEIF ( condition ) THEN block of statements ELSE block ...
算数if和逻辑if 块if、else if、 else、end if语句 continue语句 stop和pause语句 do语句 read和write语句 rewind、backspace、endfile、open语句 call、return语句 end语句 Fortran中的非执行语句 program、function、subroutine语句 dimension、common、equivalence、implicit、external、intrinsic、save语句 ...