fortran编辑数组，固定格式输出2

发布网友发布时间：2023-10-18 11:50

我来回答

共1个回答

热心网友时间：2024-04-12 07:39

在文本文件中的排列方式，并不影响内存中数组的维数。

你可以用一维数组或二维数组来读取一列或两列或多列的数据。而不是必须一列是一维，多列是二维，不是这样的。

你也可以把一维数组按多列输出，二维数组按一列输出。这都是可以的。

如果你的数据格式允许，你甚至可以不必使用数组。

所以，给出你原来的数据文件格式，以及你期望的数据格式。（最好给出几列作为例子）

请原谅我看不懂你的描述。

追问

把这个变成一列数据，谢谢你了呢

追答这样的话，只要一个2元素的数组就可以了。

Program Bai_Thlws
Implicit None
Integer , parameter :: DP = SELECTED_REAL_KIND(p=8) !// 需要八位有效数字
Real( Kind = DP ) :: rA(2)
Integer :: i
Open( 12 , File = '旧文件' )
Open( 13 , File = '新文件' )
Do
Read( 12 , * , ioStat = i ) rA(:)
If ( i /= 0 ) Exit !// 如果遇到文件尾部，则退出
Do i = 1 , 2
Write( 13 , * ) rA(i)
End Do
End Do
Close( 12 )
Close( 13 )
End Program Bai_Thlws