[文件读写] 读取txt文件中指定列的数据

799 帖子	2 主题	0 精华

大宗师

F 币: 3797 元
贡献: 2270 点

发消息

楼主

发表于 2020-3-6 12:21:02 | 显示全部楼层

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

 open(55,file='ztzl-1.txt')
  Do i=1,4
    read(55,*)
  End Do
  do i=5,7
    read( 55 , * , ioStat = t ) y , m , d
    if ( t/= 0 ) exit
    !调用函数
  End Do
  Close(55)

回复支持反对

使用道具举报

返回列表发新帖