real a(8)integer i , j i = 0 do j = 1, 8 if(a(j) == 0) then i = i + 1 endif enddo if(i == 8) then ...!符合条件，进行下一步 else ...!不符合条件，跳回 endif
刚学着用Fortran来写代码，遇到了一个问题。就是代码可以生成成功，但是用DO循环，就只有第一个可以...