将数据写入带有注释名称的列中的文件
Write data to file in columns with commented names
我正在用 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
知道怎么做吗？
您将 format 说明符应用于每一行，因此在每一行上得到 a 和 k...您需要先写一个 header 行，然后是数据：
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
我正在用 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
知道怎么做吗？
您将 format 说明符应用于每一行，因此在每一行上得到 a 和 k...您需要先写一个 header 行，然后是数据：
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