设为首页收藏本站如何选择编译器？在线F77转F90 繁体浏览

切换到窄版开启辅助访问

Fortran Coder»论坛 › 研讨区 › Fortran语法讨论 › do循环

返回列表发新帖

查看: 3155|回复: 4

上一主题

下一主题

[流程控制] do循环

实名认证

1963 帖子	12 主题	5 精华

臭石头雪球

F 币: 1357 元
贡献: 574 点

发消息

楼主

发表于 2022-1-22 17:28:41 | 显示全部楼层

read(5,"(a)")jj
改为：
read(5,"(a)",ioStat=zz)jj
if(zz/=0)exit

如果你不加任何判断，5号文件读取结束时，程序接着读取，就会出错。后面的代码自然无法执行。

回复支持反对

使用道具举报

返回列表发新帖

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

GMT+8, 2024-5-9 06:56

Powered by Tencent X3.4

© 2013-2024 Tencent

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