关于fortran输出数据

来源：百度知道 编辑：UC知道 时间：2024/05/21 15:07:40
我现在在txt文件里有1000个数据，排成一列。。我现在想让这些数据排成一行。能不能实现?fortran编个小程序。。谢谢
我倒啊。。这样输出的格式跟输出有区别？还是数排嘛。。。在问下。。要让这一列数据等分的排成几列。。怎么实现？

!cvf6.5通过。2007-9-8
program ProgramName
implicit none
integer,parameter::rows=200 !有1000行数据
real::a(rows) !这里假设你的数据是实数
integer::i
open(1,file="输入文件名.txt")
read(1,*) (a(i),i=1,rows) !你要保证只有一列数据，否则此句会出错。
close(1)
open(2,file="输出文件名.txt")
write(2,"(<rows>(f10.2))") (a(i),i=1,rows) !如果是其它数据类型，这里的f10.2也要对应改掉啊
close(2)
end program

!记得用UE打开看结果。notepad在数据多的时候会自动换行的。