24小时热门版块排行榜

当前主题已经存档。

银虫 (小有名气)

[交流] 【求助】小小求助

我想在循环步骤里每10步记录一下，应该如何加条件呢？
if(j.eq.10的倍数)then
write（*，*）j，
请高手指导一下10的倍数如何写入程序。

1楼 2009-11-17 13:23:57

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

木虫 (小有名气)

★ ★ ★ ★
nono2009(金币+2,VIP+0):辛苦了！ 11-17 15:03
heyansheng12345(金币+2,VIP+0):很到位，我忘了这个命令 11-18 14:11

if(mod(j,10)==0)write(*,*) j
或者
if(mod(j,10)==0)then
write(*,*) j
end
请在fortran里面使用英文标点[你看你的write（*，*）j里面都是用的中文逗号和括号]

书到用时方恨少, 天涯何处无芳草.

2楼2009-11-17 14:59:19

已阅回复此楼关注TA 给TA发消息送TA红花 TA的回帖

相关版块跳转我要订阅楼主 heyansheng12345 的主题更新