978142355 发表于 2016-3-26 16:00:13

写两个角度变化的的程序

如题，我打算写一个两个角度变化的程序，两个角度都是从-180.0度变化到180.0度，第一个角度从-180变化到180，再从180变到-180，反复这样变化，直到第二个角度从-180变到180为止。如图。
想请教各位，我编写的代码中，程序    program example
    implicit none
    integer i,j,k
    open(11,file='test.txt')
    do i=180,-180,-30
      do j=180,-180,30
            write(11,"(a2,i4,2x,a2,i4)") 'X=',j,'Y=',i
      end do
      do k=-180,180,30
            write(11,"(a2,i4,2x,a2,i4)") 'X=',k,'Y=',i
      end do
    end do
end program example根本没有走k那个地方，我的这个要求如何才能实现？

糖盒love玲珑 发表于 2016-3-27 12:26:26

j循环步长该是 -30 你写的30！

978142355 发表于 2016-3-27 17:34:09

糖盒love玲珑 发表于 2016-3-27 12:26
j循环步长该是 -30 你写的30！

谢谢你，是我疏忽了，感谢你的提醒，完美的解决了我的问题。
页: [1]
查看完整版本: 写两个角度变化的的程序