如果想執(zhí)行的程序停止,可以插入一個stop語句。
示例
program stop_example implicit none integer :: i do i = 1, 20 if (i == 5) then stop end if print*, i end do end program stop_example
當(dāng)上述代碼被編譯和執(zhí)行時,它產(chǎn)生了以下結(jié)果:
1 2 3 4
鍍金池立足為學(xué)員提供精品優(yōu)選課程及個性化定制服務(wù)。
掃碼關(guān)注鍍金池微信號手機訂課,優(yōu)惠多多