-fortran：从文本文件中读取数字

我有一个数字文本文件，包含几列和几行。我尝试了几种方法，包括数组，但在最好的结果中，我只能得到整个数组的3列。你知道我如何用Fortran 77读取所有数据吗

open(unit=1, file='f', status='old')

do i = 1, 100
    read(1, *) x(i), y(i), z(i)
    write(6, * ) x(i), y(i), z(i)
enddo

甚至二维数组：

do i = 1, 100
    do j = 1, 50
        read(1, *) x(i, j)
        write(6, *) x(i, j)
    enddo 
enddo

或者更改

打开（…，access='direct'）

因为我有这样一个文件，所以没有一个成功：

1 2 4.5 77 89 4 3 2...
2 4 4 5 6 73 5 3.4 ...
1 2 4 5  67  8 99...
...

---

数据似乎没有任何特定的结构。 您可以为此使用列表定向输入：

  program main
  real a(100)
  read (*,*) a
  print *,a
  end

---

我建议您不要在代码中使用任何小于10的单元号来实现自己的目的。

到目前为止您尝试了什么？给我们看一些代码！投票被否决，因为该问题提出得不好，没有明确提出。例如，您所说的“读取所有数据”（读取哪些数据，并将其转换为什么样的数据结构？）“我能得到的最佳结果”（什么结果？）是什么意思。（请不要在这里的评论部分回答。相反，直接编辑您的问题以使其更清楚。谢谢！）经过一些修改后，它工作正常。非常感谢tkoenig！