Fortran if...then...else 結構
if… then 語句可以後跟一個可選的 else 語句, 它執行時,邏輯表達式為假。
語法
if… then… else 的基本語法:
if (logical expression) then statement(s) else other_statement(s) end if
但是,如果給定 if 塊一個名字,然後命名 if-else 語句的語法是,這樣的:
[name:] if (logical expression) then ! various statements . . . else !other statement(s) . . . end if [name]
如果邏輯表達式的計算結果為代碼裡麵的 if ... then 語句會被執行,對 else 塊中的代碼,否則該塊將被執行 else 塊。
流程圖
示例
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
當上述代碼被編譯和執行時,它產生了以下結果:
a is not less than 20 value of a is 100