擅长:python、mysql、java
<p>没有直接等价于python构造的。在</p>
<p>但是请注意,使用计数循环控制的do循环的提前终止可以通过检查循环后do变量的值来检测。在</p>
<pre><code>do iv = 1, nvals
do ia = 1, nabsth - 1
if (vals(iv) < absth(ia)) then
counts(ia) = counts(ia) + 1
exit
end if
end do
! If the loop terminates because it completes the iteration
! count (and not because the exit statement is executed) then
! the do variable is one step beyond the value it had
! during the last iteration.
if (ia == nabsth) then
counts(nabsth) = counts(nabsth) + 1
end if
end do
</code></pre>
<p>exit语句还可以跳出不仅仅是do循环:</p>
^{pr2}$
<p>循环语句可以循环该语句嵌套的任何do构造:</p>
<pre><code>outer_loop: do iv = 1, nvals
do ia = 1, nabsth - 1
if (vals(iv) < absth(ia)) then
counts(ia) = counts(ia) + 1
cycle outer_loop
end if
end do
counts(nabsth) = counts(nabsth) + 1
end do outer_loop
</code></pre>