如果想执行的程序停止，可以插入一个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

当上述代码被编译和执行时，它产生了以下结果：

1
2
3
4

纠错/补充 收藏