如何用 Fortran 输出矩阵啊

来源:百度知道 编辑:UC知道 时间:2024/05/11 04:59:30
假设现有一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

举例:用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(仅有第一个字母大写)。

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