fortran里面格式如何从横排换成竖排

在Fortran中，可以使用FORMAT语句来控制输出格式。要将输出从横排转换为竖排，可以使用以下步骤：

1. 将要输出的数据存储在一个数组中。
2. 在FORMAT语句中使用/符号表示换行。
3. 在DO循环中逐行输出数据。

以下是示例代码：

PROGRAM vertical_output
IMPLICIT NONE
INTEGER :: i
REAL :: data(5)

data = [1.0, 2.0, 3.0, 4.0, 5.0]

WRITE(*, '(A)', ADVANCE='NO') 'Data:'
DO i = 1, 5
   WRITE(*, '(F5.1)', ADVANCE='NO') data(i)
   WRITE(*, '(A)', ADVANCE='YES') ''
END DO

END PROGRAM vertical_output

在上面的代码中，我们使用DO循环逐行输出数据，并在每行结尾处使用空的FORMAT语句来实现换行。输出结果如下：

Data:
 1.0
 2.0
 3.0
 4.0
 5.0