fortran存储数据的问题

反正常

我想把经过处理的降水数据以及由它所得到的拟合、系数一起存到一个新的文件里面。原程序如下：
parameter(nm=21154,ns=752)
  character*8 stid(ns)
    real rlat(ns),rlon(ns),tim,sum(9月）=0.0，sum(年）=0.0,xishu=0.0，nihe=0.0
        integer nlev,nflag,n(is)=0
        real rain (nm,ns)
        open(10,file='E:\data\1951_2008_daily_rain.dat',form='binary')

do im=1,nm
   tim=0.0
     nlev=1
         nflag=1
         do is=1,ns
            read(10)stid(is),rlat(is),rlon(is),tim,nlev,nflag
                read(10)rain(im,is)
         end do
   nlev=0
   nflag=0
     read(10)stid(1),rlat(1),rlon(1),tim,nlev,nflag
end do
        do (rlat(is)>=97.and.rlat(is)<=112).and.(rlon(is)>=22.and.rlon(is)<=37)
           do im=244,273
              sum(9月）=rain(im,is)+sum（9月）
                  sum(年)=rain(im,is)+sum(年）
                  xishu=sum(9月）/sum（年）
                     do is=1,752
                            read*,im
                            do im=244,273
                                   if(rain(im,is)>=1)then
                                      n(is)=n(is)+1
                                   end if
                                end do
                     end do
                  nihe=xishu*n(is)
           end do
        end do                                
end         
请问在哪里加入表示存储的语句？
存储的语句如何编写？
在这里先谢谢各位大神了。

言深深

一路下来，之间read，不见write自然没有存储的语句！存储部分类似这样写：
open(1,file="xx.txt")
do i=1,m
write(1,*) x(i)
enddo
close(1)

易小凯

弱弱地问一句
real rlat(ns),rlon(ns),tim,sum(9月）=0.0，sum(年）=0.0,xishu=0.0，nihe=0.0
fortran能识别么？

topmad

易小凯 发表于 2012-5-20 22:59

                               
登录/注册后可看大图

弱弱地问一句
real rlat(ns),rlon(ns),tim,sum(9月）=0.0，sum(年）=0.0,xishu=0.0，nihe=0.0
fortran能识 ...

目前 除了R  我还没见过支持中文变量名的语言