关于循环中cycle的一个发现

百事可乐

第一次，满足 if , cycle 进入下一次循环，不输出。
第二次，不满足 if，不输出。
第三次，不满足 if , 不输出。

改为

[Fortran] 纯文本查看 复制代码

do i=1,3    
if(j(i).eq.22) then
        cycle
    endif   
    write(*,*)j(i)
enddo

就与 之前的一样效果了

百事可乐

cycle 是一个语句，既非模块，也非命令。要把基本概念弄清楚 。