- if(条件式)条件式が成立した場合に実行するプログラム
- if(条件式)then
条件式が成立した場合に実行するプログラム(複数行書ける)
end if - if(条件式)then
条件式が成立した場合に実行するプログラム(複数行書ける)
else
条件式が不成立の場合に実行するプログラム(複数行書ける)
end if - if(条件式1)then
条件式1が成立した場合に実行するプログラム(複数行書ける)
else if(条件式2)then
条件式1が不成立で条件式2が成立した場合に実行するプログラム(複数行書ける)
else if(条件式3)then
条件式1と条件式2が不成立で条件式3が成立した場合に実行するプログラム(複数行書ける)
end if - 条件式が成立した場合に実行するプログラム(条件式が不成立の場合に実行するプログラム)の中にもif文を書ける
下の例の「x.lt.20」は「x<20」の意味
write(*,*)'x=' read(*,*)x if(x.lt.20)then write(*,*)'x<20' else write(*,*)'x≧20' end if stop end
比較演算子と論理演算子
.lt. | <(less than) |
.le. | ≦(less or equal) |
.eq. | =(equal) |
.ge. | ≧(greater or equal) |
.gt. | >(greater than) |
.ne. | ≠(not equal) |
.and. | 論理積(かつ) |
.or. | 論理和(または) |
.not. | 論理否定(ではない) |
write(*,*)'X=' read(*,*)x if((x.gt.10).and.(x.lt.20))then write(*,*)'10<X<20' else if(x.le.10)then write(*,*)'X≦10' else write(*,*)'X≧20' end if stop end