Fortran嵌套if结构
可以使用一个 if 或else if 在另一个if或else if语句中。
语法
嵌套if语句的语法如下:
if ( logical_expression 1) then !Executes when the boolean expression 1 is true … if(logical_expression 2)then ! Executes when the boolean expression 2 is true … end if end if
例子
program nestedIfProg implicit none ! local variable declaration integer :: a = 100, b= 200 ! check the logical condition using if statement if( a == 100 ) then ! if condition is true then check the following if( b == 200 ) then ! if inner if condition is true print*, "Value of a is 100 and b is 200" end if end if print*, "exact value of a is ", a print*, "exact value of b is ", b end program nestedIfProg
当上述代码被编译和执行时,它产生了以下结果:
Value of a is 100 and b is 200 exact value of a is 100 exact value of b is 200