请选择 进入手机版 | 继续访问电脑版
爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 5083|回复: 13

[求助] 菜鸟求些FORTRAN程序

[复制链接]

新浪微博达人勋

发表于 2012-4-10 19:26:51 | 显示全部楼层 |阅读模式

登录后查看更多精彩内容~

您需要 登录 才可以下载或查看,没有帐号?立即注册 新浪微博登陆

x
QQ截图20120410192516.png

这个公式用FORTRAN语言写 怎么写哇?求指导
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2012-4-10 19:43:41 | 显示全部楼层
do j=1,m
   sum=sum+avex(j,k)
end do
do k=1,......
  do j=1,m
      x2(i,k)=avex(j,k)-sum/m
  end do
end do


搞不明白你的这I,J,K是什么?
每个公式都有它的意义,最好说清楚。
提问要说明白你的问题,别人也好回答

评分

参与人数 1金钱 +8 收起 理由
mofangbao + 8

查看全部评分

密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2012-4-10 19:43:59 | 显示全部楼层
do j=1,m
   sum=sum+avex(j,k)
end do
do k=1,......
  do j=1,m
      x2(i,k)=avex(j,k)-sum/m
  end do
end do


搞不明白你的这I,J,K是什么?
每个公式都有它的意义,最好说清楚。
提问要说明白你的问题,别人也好回答
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2012-4-10 19:55:54 | 显示全部楼层
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2012-4-10 20:22:18 | 显示全部楼层
lotina 发表于 2012-4-10 19:43
do j=1,m
   sum=sum+avex(j,k)
end do

11.png


这个是具体说明
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2012-4-10 22:39:38 | 显示全部楼层
上面的程序应该没有问题了。
但是我是觉得哈,那个X2应该是J么,是不是书上弄错了啊!
它说是某月的多年平均值与多年平均值的差,那么那个i也就是表示月份了,那怎么又不用J了呢?
密码修改失败请联系微信:mofangbao

新浪微博达人勋

0
早起挑战累计收入
发表于 2012-4-11 08:45:02 | 显示全部楼层
最好自己先写,有问题再来讨论,否则你永远是菜鸟
密码修改失败请联系微信:mofangbao

新浪微博达人勋

发表于 2012-4-12 08:48:13 | 显示全部楼层
先对月份求平均,再对月份求距平
do j=1,m
do k=1,k
   ave(j,k)=ave(j,k)+x(j,k)
end do
av(j,k)=av(j,k)/K
enddo
do k=1,K
  do j=1,m
      avavx(j,k)=avavx(j,k)+av(j,k)
  end do
avavx(j,k)=avavx(j,k)/m
do i=1,n
avav(i,k)=av(j,k)-avav(j,k)
enddo
end do

密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2012-4-13 10:14:29 | 显示全部楼层
mofangbao 发表于 2012-4-11 08:45
最好自己先写,有问题再来讨论,否则你永远是菜鸟

我写了 没好意思贴出来 都是错。。。。。怕丢人
密码修改失败请联系微信:mofangbao

新浪微博达人勋

 楼主| 发表于 2012-4-13 10:14:52 | 显示全部楼层
=。。= 发表于 2012-4-12 08:48
先对月份求平均,再对月份求距平
do j=1,m
do k=1,k

谢谢哦 我试试看
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

快速回复 返回顶部 返回列表