将数据写入具有注释名称的列中的文件

Question

我正在Fortran90中进行一些练习编程，我必须将数据写入列中，每个列的名称都经过评论，我这样做是因为我的数据来自于这样的事情

do while (a<b)
  k = 2*a - b
  a = a + c
  write(3,100) k,a
end do
100 format ('k',E5.1,X,'a',I2)

所以当我设置格式时，我的数据文件的每一行都有 k 和 a ，如

k1   a2
k7   a21
k33  a2

我不知道（并且在我读过的书中没有找到）如何写一次每列的名称来获取像

这样的文件

k   a
1   2
7   21
33  2

任何想法如何做到这一点？

Answer 1

您将format说明符应用于每一行，从而在每一行上获得a和k ...您需要先写一个标题行，然后再写入数据：

  write(3,'(a5,1X,a2)') 'k','a'
  do while (a<b)
    k = 2*a - b
    a = a + c
    write(3, '(E5.1,1X,I2)') k,a
  end do