Fortran数据写出格式请教
各位大侠，小弟刚接触Fortran，对数据格式写出格式不太懂，想请教一下我这个数据该咋读和按要求的格式写出啊？我有列数据如下：
4565
44566
44567
44568
44565
44566
4565
44563
99999
44561
44563
44564
...
想通过Fortran读完后按6F12.4这个格式写出
4565.000 44566.000 44567.000 44568.000 44565.000 44566.000
4565.000 44563.000 99999.000 44561.000 44563.000 44564.000
.....
即每行6个数据，每个数据占12个characters，并且带4个decimal places
请教各位大侠，这个程序该咋写呢？非常感谢
Program www_fcode_cn
Implicit None
Integer :: k
Real :: a(6)
Open( 12 , File = '旧文件' )
Open( 13 , File = '新文件' )
Do
Read( 12 , * , iostat = k ) a
if ( k /= 0 ) exit
write( 13 , '(6F12.4)' ) a
End Do
End Program www_fcode_cn fcode 发表于 2016-2-16 17:13
Program www_fcode_cn
Implicit None
Integer :: k
哈哈，多谢多谢了！:-victory:
页:
[1]