fortran十进制转二进制，麻烦各位大虾给看一下~~附程序，谢谢

yhwsmile

原始数据

十进制转二进制问题：
下面是我自己编的程序，麻烦各位大虾给看一下我这个程序有问题没，主要是数据第一行是数据说明（eg：2011年5月4日降水数据），对于这个头我不知道怎么弄？我转换完成后，生成的二进制文件第一行依然显示：2011年5月4日降水数据，如图所示~~~~~谢谢啦
    program main
      implicit none
        integer j        
               real h(50,180)
        character c*80
        open(1,file='1.txt')
        read(1,'(a80)')c
        do j=1,50           
           read(1,*)h(j,: )
        end do
   
        open(2,file='1.dat',form='unformatted',access='direct',recl=180)
        write(2,rec=1)c
               do j=1,50
           write(2,rec=j+1)h(j,: )
        end do
        end

随缘

把这句write(2,rec=1)c   删了就可以了

mofangbao

除了上面说的，下面这句话可能也要修改下j的值~
write(2,rec=j+1)h(j,: )

残月

楼上正解，二进制文件里一般不能有文件头啊，要不然读不出来，除非数据有特殊的要求必须写。。我自己的感觉啊

yhwsmile

谢谢啦，确实是这样啊~~

XOXO

我都是直接把第一行删掉