1.IF条件判断语句 IF语句是FORTRAN中最常用的条件判断语句,它的格式如下: IF (测试表达式) then 语句1 else if (测试表达式) then 语句2 else 语句3 END IF 其中,测试表达式可以是任意逻辑表达式,如比较表达式、逻辑表达式等。在执行IF语句之前,FORTRAN会对测试表达式进行计算,如果测试表达式的值为真,则执行语句...
IF(…)THEN是单个Fortran语句,必须一起写在同一行上,并且要执行的语句必须占用IF (…)THEN语句下面的单独的一行。 紧跟其后的END IF语句必须另起一行。在包含END IF语句的行上不能有行号。 2.2.2 ELSE和ELSE IF子句 结构形式: IF(logical_expr1)THEN Statement 1 Statement 2 ... ELSE IF(logical_expr2)...
1.if...then 这是最简单的if语句结构。 if...then的语句结构如下: if (logical expression) then statement endif 还可以对if块进行命名: [name:] if (logical expression) then ! various statements . . . 2.if...then...elseif...then...else语句的基本语法如下: if (logical expression) then sta...
1、if语句后面的条件表达式一定要用()括 起来,如 if ( salary < 1000 ) then if ( (salary >= 1000) .AND. ( salary <= 5000) ) then 没有括号的话编译会产生错误 2、if-else if从句不用end if语句。也就是说,虽然if-else if 这个从句中含有两个if判断,但在最后条件判断结束后,只需要写 一个e...
可行。事实上，选择执行语句有多种搭配方式，非常灵活，例如：1. IF(A>=0) THEN ...ELSEIF(A<0) THEN ...ENDIF 2. IF(A>=0) THEN ...ELSE ...ENDIF 3. IF(A>=0) THEN ...ELSEIF(A<0) THEN ...ELSE !也就是说else后可以不跟判别语句和执行语句 ENDIF 关于选择执行语句，还...
IF-THEN-ELSE语句是IF-THEN语句的扩展版本,它的语法如下: IF (condition) THEN statement block 1 ELSE statement block 2 END IF 其中,如果condition为真,则执行statement block 1中的语句,否则执行statement block 2中的语句。 3. IF-THEN-ELSEIF语句 IF-THEN-ELSEIF语句可以实现多重条件判断,它的语法如下:...
#if:根据条件表达式的值决定是否执行后续代码 #if defined(PI) write(*,*) "Value of PI is defined" #endif 复制代码 #else:与#if或#ifdef/#ifndef一起使用,指定在条件不成立时执行的代码 #ifdef DEBUG write(*,*) "Debugging information" #else write(*,*) "No debugging information" #endif 复制...
if可以配合else-if来做多重判断,多重判断可以一次列出多个条件以及多个程序模块,但其中最多只有一个成立。也就是说每次最多只有一个程序块被执行。if(条件1)then ... elseif(条件2)then ... elseif(条件3)then ... ... else ! else这个条件模块可以省略,当前面都不成立时,才执行这个。 ... ... ...
ELSE IF (num .LT. 0) THEN WRITE(*, *) "输入的数是负数。" ELSE WRITE(*, *) "输入的数是零。" END IF END PROGRAM ArithIF 在上述代码中,根据用户输入的整数判断其正负性,并输出相应的信息。 需要注意的是,Fortran 77是一种古老的编程语言,现代云计算领域很少使用。如果您在云计算领域进行开发,...
name: if (x<y) then temp = x x = y y = temp end if name write(*,*) x, y end program test if (x<y) then x = 0 else y = 0 end if if (x<0) then x = -x else if (x==0) then x = 0 else if (x>0 .and. x<y) then ...