求助一个write()输出语句的格式

fcode

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

Program www_fcode_cn
  Implicit None
  real :: xsec(3,3) = 569629.1, ysec(3,3) = 3196640. , z(3,3) = 230.
  integer :: i = 1 , j = 1
  Write( * , 100 ) xsec(i,j), nint(ysec(i,j)) , z(i,j)
100 format("Text Style Vv Justify MR ",f8.1,",",i7.7," 7.5 0 ",f6.2)
End Program www_fcode_cn

fcode

如果你还不懂得如何续行的话。请看看教科书。