fortran中读取数据文件时前19次都能好好读,为什么第20次的时候总是出错?检查数据格式没有问题 5
程序代码:DOM=1,20READ(5,'(6I5,5F10.0,I5)',ERR=99)N,NP(N,1),NP(N,2),NP(N,3),&NP(N,4),TTYPE...
程序代码:
DO M=1,20
READ(5,'(6I5,5F10.0,I5)',ERR=99) N,NP(N,1),NP(N,2),NP(N,3),
& NP(N,4),TTYPE,DENS,PO,GMX,G,XL,LSTR
PRINT*,' Read Element ...',M
IF(LSTR.EQ.1.OR.LSTR.EQ.2.OR.LSTR.EQ.4) THEN
IHISTSTR=IHISTSTR+1
ELSE IF(LSTR.EQ.3.OR.LSTR.EQ.5.OR.LSTR.EQ.6) THEN
IHISTSTR=IHISTSTR+2
ELSE IF(LSTR.EQ.7) THEN
IHISTSTR=IHISTSTR+3
END IF
END DO
数据:
运行结果:
我想知道什么原因?如何解决? 展开
DO M=1,20
READ(5,'(6I5,5F10.0,I5)',ERR=99) N,NP(N,1),NP(N,2),NP(N,3),
& NP(N,4),TTYPE,DENS,PO,GMX,G,XL,LSTR
PRINT*,' Read Element ...',M
IF(LSTR.EQ.1.OR.LSTR.EQ.2.OR.LSTR.EQ.4) THEN
IHISTSTR=IHISTSTR+1
ELSE IF(LSTR.EQ.3.OR.LSTR.EQ.5.OR.LSTR.EQ.6) THEN
IHISTSTR=IHISTSTR+2
ELSE IF(LSTR.EQ.7) THEN
IHISTSTR=IHISTSTR+3
END IF
END DO
数据:
运行结果:
我想知道什么原因?如何解决? 展开
1个回答
展开全部
READ(5,'(6I5,5F10.0,I5)',ERR=99) N,NP(N,1),NP(N,2),NP(N,3),
& NP(N,4),TTYPE,DENS,PO,GMX,G,XL,LSTR
改为
READ(5,*,ERR=99) N,NP(N,1:4),TTYPE,DENS,PO,GMX,G,XL,LSTR
& NP(N,4),TTYPE,DENS,PO,GMX,G,XL,LSTR
改为
READ(5,*,ERR=99) N,NP(N,1:4),TTYPE,DENS,PO,GMX,G,XL,LSTR
追问
我后来发现它读取的时候直接从第2行数据开始读取的,在读取数据之前有一行READ(5,'(/\)')的代码,我想问题是不是出在这?
请问一下READ(5,'(/\)') 中 / 的意思是不是结束正在输入的记录行并开始下一行的输入?
那 \ 又是什么意思呢?谢谢您的解答!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询