回 帖 发 新 帖 刷新版面

主题:fortran读取文件批处理

我的程序是:
……………………
      open(3,file='ordinary.txt')     !ordinary.txt.为读取文件目录
      
1003  read(3,'(a11)',end=3000)n_n     !n_n为读取文件名
open(2)
open(1)
…………………………   !计算过程
…………………………
…………………………   !输出数据
close(1)
close(2)
       goto 1003
    
3000   continue
    stop
    end
    
如上所示,程序运行无误,可出现结果却是将各个读取文件的数据累加求得,意即:
针对1.txt的输出结果无误,针对2.txt的输出结果为1和2输入数据累加的结果,3.txt的输出结果为1、2、3输入数据累加的结果,何解?
请不吝赐教,谢谢!

回复列表 (共2个回复)

沙发


意即:在二次读取数据前如何清零?

板凳


应该是程序本身问题,与打开、关闭文件无关

我来回复

您尚未登录,请登录后再回复。点此登录或注册