我正在尝试创建一个表(使用已定义的选项卡),其中值或项应出现在其描述的正下方。例如,我有:
Program Test_tab
character, parameter :: htab = char(9)
character(len=*), parameter :: dashline = '----------------------------------------'
integer :: A, B, C
integer, parameter :: N = 10
Print*,'A',htab,'B',htab,'C'
Print*,dashline
A=1; B=1; C=1
do i=1,N
A=A+1
B=B+2
C=C+3
print*,A,htab,B,htab,C
end do
End Program Test_tab
生成输出:
A B C
------------------------------------------
2 3 4
3 5 7
4 7 10
5 9 13
6 11 16
7 13 19
8 15 22
9 17 25
10 19 28
11 21 31
我希望A, B, C
标签显示在其代表列的上方,如果可能的话
划分dashline
正确调整。
感谢。
答案 0 :(得分:0)
这是
的格式Print '(99(g8.0))' ,'A','B','C'
Print '(99(g8.0))' ,A,B,C
每个项目使用8个字符。
关于te格式的文献很多,你甚至可以在Stack Overflow上找到很多。谷歌“格式化输入和输出”。