Fortran: construcción si-entonces-si no

Un if… then La declaración puede ir seguida de una else statement, que se ejecuta cuando la expresión lógica es falsa.

Sintaxis

La sintaxis básica de un if… then… else declaración es -

if (logical expression) then      
   statement(s)  
else
   other_statement(s)
end if

Sin embargo, si le da un nombre al if bloque, luego la sintaxis del nombre if-else declaración sería, como -

[name:] if (logical expression) then      
   ! various statements           
   . . . 
   else
   !other statement(s)
   . . . 
end if [name]

Si la expresión lógica se evalúa como true, luego el bloque de código dentro del if…then se ejecutará la sentencia; de lo contrario, el bloque de código dentro del else se ejecutará el bloque.

Diagrama de flujo

Ejemplo

program ifElseProg
implicit none
   ! local variable declaration
   integer :: a = 100
 
   ! check the logical condition using if statement
   if (a < 20 ) then
   
   ! if condition is true then print the following 
   print*, "a is less than 20"
   else
   print*, "a is not less than 20"
   end if
       
   print*, "value of a is ", a
	
end program ifElseProg

Cuando el código anterior se compila y ejecuta, produce el siguiente resultado:

a is not less than 20
value of a is 100