要读的数据多于文件中存储的数据，请教大家如何

fcode

可通过 ioStat 判断读取是否成功。

fcode

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

do i = 1 , N
  read(12,* , ioStat = k ) a , b , c
  if ( k /= 0 ) then
    write(*,*) '文件读取错误，可能是文件读完了。'
    exit
  endif
end do