40
11
0
大宗师
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
1.jpg (32.95 KB, 下载次数: 225)
下载附件
2016-3-26 15:59 上传
最终想达到的效果图
使用道具 举报
15
2
新人
查看全部评分
糖盒love玲珑 发表于 2016-3-27 12:26 j循环步长该是 -30 你写的30!
本版积分规则 发表回复 回帖后跳转到最后一页
颁发给完成“有规有矩”任务的网友
捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )
GMT+8, 2024-11-22 05:33
Powered by Tencent X3.4
© 2013-2024 Tencent