Fortran-cycle
提供:Dev Guides
Fortran-サイクルステートメント
サイクルステートメントにより、ループは本体の残りをスキップし、反復する前にその状態をすぐに再テストします。
流れ図
例
program cycle_example
implicit none
integer :: i
do i = 1, 20
if (i == 5) then
cycle
end if
print*, i
end do
end program cycle_example
上記のコードをコンパイルして実行すると、次の結果が生成されます-
1
2
3
4
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20