24小时热门版块排行榜    

CyRhmU.jpeg
南方科技大学公共卫生及应急管理学院2025级博士研究生招生报考通知
查看: 140  |  回复: 1
当前主题已经存档。

heyansheng12345

银虫 (小有名气)

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

我想在循环步骤里每10步记录一下,应该如何加条件呢?
if(j.eq.10的倍数)then
write(*,*)j,
请高手指导一下10的倍数如何写入程序。
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

senlia

木虫 (小有名气)

★ ★ ★ ★
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 的主题更新
普通表情 高级回复(可上传附件)
信息提示
请填处理意见