主题:求助关于数据文件的读入问题!
不好意思,本人是初学者,实在是悟不出了,所以才会在这里发这个贴,是关于数据读入方面的问题。下面这个小程序我想请教一下各位是不是有什么问题,我自己创建了一个IN_DAT文件,并在里面输入了8个整型数据,但是运行的时候就会出现severe(24)的错误,我实在是搞不明白是怎么回事,还是数据文件本身的问题?
PROGRAM TEST1
IMPLICIT REAL(8) (A-H,O-Z)
OPEN(5,FILE = 'IN_DAT',STATUS = 'OLD')
READ(5,*)
READ(5,*)MND,NUMEL,NUMPT,MBAND
READ(5,*)
READ(5,*)NFIX,NPC,MPROB,MSOLV
WRITE(*,100)MND,NUMEL,NUMPT,MBAND
WRITE(*,100)NFIX,NPC,MPROB,MSOLV
100&
& FORMAT(4(4X,I3))
CLOSE(5)
END
PROGRAM TEST1
IMPLICIT REAL(8) (A-H,O-Z)
OPEN(5,FILE = 'IN_DAT',STATUS = 'OLD')
READ(5,*)
READ(5,*)MND,NUMEL,NUMPT,MBAND
READ(5,*)
READ(5,*)NFIX,NPC,MPROB,MSOLV
WRITE(*,100)MND,NUMEL,NUMPT,MBAND
WRITE(*,100)NFIX,NPC,MPROB,MSOLV
100&
& FORMAT(4(4X,I3))
CLOSE(5)
END