| 查看: 1014 | 回复: 6 | |||
[求助]
求写一小段程序，在线等！ 已有1人参与
|
|
在一个公式里面插入一个限制条件 温度TMAX，引入变量TF=-0.928+0.114*TMAX-0.00267*TMAX2 当TMAX≤29℃时，FGRSH = AMAX*(1.-EXP (-VISSHD*EFF/MAX(2.0,AMAX))) 当29<TAMX≤40时，FGRSH =TF* AMAX*(1.-EXP (-VISSHD*EFF/MAX(2.0,AMAX))) 我没学过这个编程，但是现在要用到，求大神相助！ |
回复此楼» 猜你喜欢
售一区SCI文章T0P，我:8O.551.O54,科目全,可十急
已经有4人回复
-
某top大学教授说“能够在市场中兑现的能力才是真能力”无比同意！
已经有13人回复
-
同一个分子，一条来自文献，一条来自AI——不告诉你答案，你会选哪条？
已经有7人回复
-
售SCI文章，我:8O.5.5.1O.54,科目全,可十急
已经有4人回复
-
售SCI一区T0P文章，我:8.O.55.1.O54,科目全,可伽急
已经有4人回复
-
售SCI一区文章，我:8.O.55.1.O.54,科目齐全,可伽急
已经有4人回复
-
售SCI一区T0P文章，我:8.O.55.1.O.54,科目齐全,可+急
已经有4人回复
-
售SCI-T0P文章，我:8O.5.5.1.O.54,科目齐全,可+急
已经有3人回复
-
售SCI文章，我:8O.5.5.1O.54,科目全,可十急
已经有3人回复
-
售一区SCI文章T0P，我:8O.551.O54,科目全,可十急
已经有3人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 跪求伸出您有爱的小手！第一次写文章，想投JCIS，求JCIS格式模板？
已经有12人回复
- 求一个简单的读写文件的小程序。。。
已经有4人回复
- 求翻译一小段韩语 韩语——中文
已经有7人回复
- 求翻译一小段日语
已经有2人回复
- 求助：用Fortran写一个关于晶粒个数统计和编号的程序。卡了我好久了。
已经有4人回复
- 如何用一直的一小段EST得到基因全长，求高手指教~
已经有7人回复
- matlab数据拟合求助！！希望高手帮忙写一下matlab的程序 谢谢了！！
已经有15人回复
- 翻译一小段修改稿上传要求
已经有6人回复
- 求一篇research样板文章，因为要写一篇英文research，第一次写不知道怎么写
已经有5人回复
- 急求fortran运行错误原因，在线等
已经有7人回复
- 求助啊！求一程序，用matlab程序做，用蒙特卡洛方法模拟
已经有10人回复
- C语言写求一个变量开三次方的根！
已经有3人回复
- 求助：能不能帮忙写一个用matlab求一个函数的傅里叶变换的程序
已经有16人回复
- 投稿时要求写一个short title，求助怎么写啊？
已经有4人回复
- 【求助】如何写FORTRAN程序实现求平均最近邻距离
已经有34人回复
- 【求助】学习写程序的一些方法
已经有12人回复
- 【求助】有很多错误的程序，找不出来了
已经有18人回复
- 【求助】帮忙改写展宽程序
已经有11人回复
- 【求助】帮忙看一下，问题程序如何修改
已经有3人回复
学虫dj
金虫 (正式写手)
- 应助: 18 (小学生)
- 金币: 892.4
- 散金: 63
- 帖子: 688
- 在线: 89.9小时
- 虫号: 1829966
- 注册: 2012-05-22
- 性别: GG
- 专业: 应用地球物理学
【答案】应助回帖
★ ★ ★ ★ ★
感谢参与，应助指数 +1
babylu: 金币+5, ★★★★★最佳答案 2014-03-18 17:38:01
感谢参与，应助指数 +1
babylu: 金币+5, ★★★★★最佳答案 2014-03-18 17:38:01
|
PROGRAM MAIN IMPLICIT NONE REAL :: TF, TMAX, TMAX2,FGRSH,AMAX,MAX,VISSHD,EFF WRITE(*,*)"输入TMAX:" READ(*,*)TMAX TF=-0.928+0.114*TMAX-0.00267*TMAX2 IF(TMAX<=29)THEN FGRSH = AMAX*(1.*EXP(-VISSHD*EFF/MAX(2.0,AMAX))) ELSE IF(29<TAMX<=40)THEN FGRSH =TF* AMAX*(1.-EXP (-VISSHD*EFF/MAX(2.0,AMAX))) END IF STOP END 这只是一个简单的小程序，里面的变量你还是需要赋值的，例如VISSHD,EFF等 |
2楼2014-03-18 16:56:36
3楼2014-03-18 17:16:57
学虫dj
金虫 (正式写手)
- 应助: 18 (小学生)
- 金币: 892.4
- 散金: 63
- 帖子: 688
- 在线: 89.9小时
- 虫号: 1829966
- 注册: 2012-05-22
- 性别: GG
- 专业: 应用地球物理学
4楼2014-03-18 17:24:57
5楼2014-03-18 17:37:49
 |
6楼2014-03-19 14:50:12
|
|
7楼2014-03-19 14:50:22
