Question

如何用 Fortran 输出矩阵啊

假设现有一5*5矩阵：a(5,5)=(/1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25/)
现在我想用fortran把它输出如下矩阵格式
1 6 11 16 21
2 7 12 17 22
3 8 13 18 23
4 9 14 19 24
5 10 15 20 25
请问用write怎么弄出来啊，我弄出来行列是相反的啊
我用的是write（*，"(5(5i5,/))")a

Answer 1

举例：用FORTRAN输出每行10个数的10*10矩阵：

implicit none
integer,parameter:: n=10
integer a(n,n),i,j
open(10,file="out.txt")
do i=1,n
do j=1,n
a(i,j)=(i-1)*10+j-1
end do
end do
write(10,"(10I5)")(a(i,:),i=1,n)
end

Fortran简介：
Fortran源自于“公式翻译”（英语：FormulaTranslation）的缩写，是一种编程语言。它是世界上最早出现的计算机高级程序设计语言，广泛应用于科学和工程计算领域。FORTRAN语言以其特有的功能在数值、科学和工程计算领域发挥着重要作用。Fortran 90之前的版本是人们所知晓的FORTRAN（全部字母大写），从Fortran 90以及以后的版本都写成Fortran（仅有第一个字母大写）。

Answer 2

不是输出的问题，是初始化的问题。Fortran是列优先的数组储存策略，你初始化的矩阵就是输出的样子。