Fortran Coder

查看: 10893|回复: 2

[求助] 写两个角度变化的的程序

[复制链接]

40

帖子

11

主题

0

精华

大宗师

F 币
4288 元
贡献
1857 点

规矩勋章

QQ
发表于 2016-3-26 16:00:13 | 显示全部楼层 |阅读模式
如题,我打算写一个两个角度变化的程序,两个角度都是从-180.0度变化到180.0度,第一个角度从-180变化到180,再从180变到-180,反复这样变化,直到第二个角度从-180变到180为止。如图。
想请教各位,我编写的代码中,程序
[Fortran] 纯文本查看 复制代码
    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那个地方,我的这个要求如何才能实现?

最终想达到的效果图

最终想达到的效果图
where is dream,where is home

15

帖子

2

主题

0

精华

新人

F 币
142 元
贡献
84 点
发表于 2016-3-27 12:26:26 来自移动端 | 显示全部楼层
j循环步长该是 -30 你写的30!

评分

参与人数 2贡献 +10 收起 理由
fcode + 5 很给力!
978142355 + 5 很给力!

查看全部评分

40

帖子

11

主题

0

精华

大宗师

F 币
4288 元
贡献
1857 点

规矩勋章

QQ
 楼主| 发表于 2016-3-27 17:34:09 | 显示全部楼层
糖盒love玲珑 发表于 2016-3-27 12:26
j循环步长该是 -30 你写的30!

谢谢你,是我疏忽了,感谢你的提醒,完美的解决了我的问题。
where is dream,where is home
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2025-2-10 18:04

Powered by Tencent X3.4

© 2013-2025 Tencent

快速回复 返回顶部 返回列表