fortran读入数据的问题

dannybear

想请教一下，各位，我在用fortran读入数据的时候，一直有问题，怎么都不对，这个是原始的要读入的数据（排列很整齐的），我将这个数据读入，然后在输出到另个文件中，就一直不对，这个是我输出到另一个文件中的样子，数据的排列发生了错位，下面是我的程序，请问大家，我应该怎么修改，PS，本人已经因为这个问题纠结了两天，我的fortran太差了。。。。 还望大家多多指教，不胜感激implicit none
character*5  station(4952)
real line,b,c,d,e,f
integer i,j
real ll_p(4952,3)
real height(4952)
open(1,file='D:\14010100.000',status='old')
read(1,10)     (station(i),ll_p(i,1),ll_p(i,2),height(i),ll_p(i,3),i=1,4952)
print*,(station(i),ll_p(i,1),ll_p(i,2),height(i),ll_p(i,3),i=1,4952)
open(2,file='D:\new.txt',status='replace')
write(2,*)   (station(i),ll_p(i,1),ll_p(i,2),height(i),ll_p(i,3),i=1,4952)
10 format(A6,4F17.8)
print '(F13.5)',ll_p(1,1)
close(1)
close(2)
end

勿忘草

在输出的时候设置一下分行应该就会有你想要的排序

dannybear

勿忘草 发表于 2016-3-6 10:01
在输出的时候设置一下分行应该就会有你想要的排序

谢谢，请问可以具体一点吗?