运行总是出现end of file encountered怎么解决

supermann

我的编程中要读取一个txt文件，是160行，66列的文件，但是程序编译没错，运行总是没法读入，不知怎么回事，求大神帮助

下面是我的数据中的一部分，贴出来以便看格式

99.00000	99.00000	99.00000	56.66667
110.66667	119.00000	90.33333	122.33333
39.00000	67.00000	93.00000	84.33333
99.00000	99.00000	99.00000	99.00000
193.66667	140.00000	119.66667	64.66667
106.66667	96.00000	83.33333	52.66667
127.66667	96.66667	129.66667	46.33333
103.66667	113.33333	91.00000	46.00000

下面是我编的程序的一部分
program main
integer,parameter:: m=160,n=66
real preave(m,n)
  integer i
!读取降水数据
open(11,file='d:/test/678.txt')
do i=1,m
  do j=1,n
   read(11,*) preave(i,j)
  end do
end do

然后运行后就显示下面的问题

run-time error F6501: READ(d:/test/678.txt)
- end of file encountered
Press any key to continue

想问问大家读取文件哪里错了啊

pandasp1213

这个循环不对：
do i=1,m
  do j=1,n
   read(11,*) preave(i,j)
  end do
end do
改成：
do i=1,m
   read(11,*) preave(i,：)
end do
read语句每次读一行，因此read语句只能循环m次，一次读一行n个数，正好读完。
原来那种read循环了m*n次，还没循环结束，已经读到文件结束，当然报错。

supermann

pandasp1213 发表于 2017-4-15 09:45
这个循环不对：
do i=1,m
  do j=1,n

哇！太感谢了，我自己又运行了下，这次对了！原来read语句是这样读的，学习了