求教~屏幕输出显示不全

我爱吃鱼 · 发表于 2017-3-29 09:15:53

调试码如下，数据见附件

[Fortran] 纯文本查看 复制代码

PROGRAM Ex001
IMPLICIT NONE    
REAL(16) X(1024),Y(1024)
integer I,dt

OPEN(12,FILE='123.txt')
DO I=1,1024
read(12,*) X(I)，Y（I）
dt=2
Y(I)=Y(I)*dt
write(*,*) I,Y(I)
ENDDO
pause
END

123.txt里面有两列的1024行数据，为什么只能显示298个？？我的结果是从727开始，这是为什么呢？？

pasuka · 发表于 2017-3-29 09:44:43

1、为啥要用4精度的浮点数？！lz确定编译器能够支持？
2、为啥有open无close呢？
3、为啥捎上pause这样的吃瓜群众？

大头鼹鼠 · 发表于 2017-3-29 10:12:11

234.txt (64 KB, 下载次数: 10)

[Fortran] 纯文本查看 复制代码

PROGRAM Ex001
IMPLICIT NONE    
REAL(16) X(1024),Y(1024)
integer I,dt

OPEN(12,FILE='123.txt')
OPEN(13,FILE='234.txt')
DO I=1,1024
read(12,*)x(i),y(i)
dt=2
Y(I)=Y(I)*dt
write(13,*) I,"      ",Y(I)
ENDDO
close(12)
close(13)
END

没有任何问题呀，你不要从屏幕上看，上面显示不全的