有关FORTRAN表控输出的问题

属于你我的love_

我编写的一段程序如下：

PROGRAM outflow

  parameter(nx=48,ny=26)
  real griddata(nx,ny)
  open(1,file='1.txt')
  open(2,file='2.txt')
do j=1,ny
read(1,*) (griddata(i,j),i=1,nx)
enddo
do j=1,ny
write(2,"(26f9.2)") (griddata(i,j),i=1,nx)
enddo

Close(1);close(2)
END

希望群里的前辈可以指导一下，谢谢了。

lliihf

怎么获得金钱啊下东西

四叶草

每行26个数据就是  write(*,"(26f9.2)") (griddata(i,j),i=1,26)，根据你的数据排列，你可以自己调换下下标

属于你我的love_

四叶草 发表于 2015-1-26 21:08
每行26个数据就是  write(*,"(26f9.2)") (griddata(i,j),i=1,26)，根据你的数据排列，你可以自己调换下下标

谢谢谢谢，，是我自己粗心了，太感谢了