24小时热门版块排行榜    

查看: 1436  |  回复: 6
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

liu8868235

金虫 (正式写手)

[求助] 编一个fortran循环程序求思路

自己感觉比较复杂 刚接手肯定不会,求一个思路或者是编写基本让我看看。


算是中  G D 都是已经的定值,p1也已知,p1-p2=1(每次递减1)N=300
v1,v2,h1,h2 这些都是温度的函数  能调用公式把他们算出了。

循环结束的条件是:si - si+1<=0   S也是温度的函数 能调用公式。

在书上看到的都是一些 循环过程中只有简单的一、二步运算的,这个忽然中间这么多运算,不会弄了,现在  求出了第一小段:△L1 。   就是不会往下这么设置循环?

编一个fortran循环程序求思路
求的就是这个.jpg


编一个fortran循环程序求思路-1
总长等于图1的总和.jpg


编一个fortran循环程序求思路-2
这个是干度 x 的计算公式.jpg


编一个fortran循环程序求思路-3
图三的干度x就是在这里用到的.jpg


编一个fortran循环程序求思路-4
求图1中的f的公式.jpg
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

生命不息---奋斗不止.不要因为走的远了就忘了最初出发的目的;不要因为一点小小的成就就忘了最初低调的自己,要记住最初的自己是谁。
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

liu8868235

金虫 (正式写手)

引用回帖:
3楼: Originally posted by jerkwin at 2013-10-26 21:58:50
你终于还是来求助了啊
还以为你能自己搞定呢

真心的还是没思路?  不知道该怎么办?  现在就是不知道  如何把下角标 2换为3  1换位2  这样不就完成循环了吗?  给点意见呗
生命不息---奋斗不止.不要因为走的远了就忘了最初出发的目的;不要因为一点小小的成就就忘了最初低调的自己,要记住最初的自己是谁。
5楼2013-10-26 22:06:37
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 7 个回答

liu8868235

金虫 (正式写手)

加下标m  就是  f1  与  f2 的平均值  大家也都知道的
生命不息---奋斗不止.不要因为走的远了就忘了最初出发的目的;不要因为一点小小的成就就忘了最初低调的自己,要记住最初的自己是谁。
2楼2013-10-26 15:30:55
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

jerkwin

专家顾问 (正式写手)

你终于还是来求助了啊
还以为你能自己搞定呢
3楼2013-10-26 21:58:50
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

liu8868235

金虫 (正式写手)

引用回帖:
3楼: Originally posted by jerkwin at 2013-10-26 21:58:50
你终于还是来求助了啊
还以为你能自己搞定呢

那你看到了还不帮帮我,我这次写帖子的时候还在想,上次怎么不这样写呢,要上次都写这么详细或许你已经给我解决了呢。呵呵
生命不息---奋斗不止.不要因为走的远了就忘了最初出发的目的;不要因为一点小小的成就就忘了最初低调的自己,要记住最初的自己是谁。
4楼2013-10-26 22:05:01
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 DpSrDtM079iu 2026-08-22 4/200 2026-08-23 15:30 by KM5EcsNQRBPn
[考博] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 2JOx3r2CYEgw 2026-08-22 4/200 2026-08-23 14:57 by KM5EcsNQRBPn
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 2JOx3r2CYEgw 2026-08-21 6/300 2026-08-23 14:21 by KM5EcsNQRBPn
[考博] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +3 h4CP7TrQR8Lg 2026-08-22 5/250 2026-08-23 12:09 by LR9qGULyN2ew
[硕博家园] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +3 2JOx3r2CYEgw 2026-08-21 9/450 2026-08-23 10:44 by IXZuIJ2Q7OVy
[基金申请] 让我中一个面上吧! +12 大萍1987 2026-08-20 14/700 2026-08-23 10:30 by wrm
[博后之家] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +3 DpSrDtM079iu 2026-08-22 5/250 2026-08-23 04:07 by OEbVnUOu01ol
[论文投稿] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 2JOx3r2CYEgw 2026-08-22 5/250 2026-08-23 03:52 by OEbVnUOu01ol
[硕博家园] 售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急 +3 2JOx3r2CYEgw 2026-08-22 7/350 2026-08-23 03:43 by OEbVnUOu01ol
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 2JOx3r2CYEgw 2026-08-22 6/300 2026-08-23 03:40 by OEbVnUOu01ol
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 QTy3jDtz1uLt 2026-08-21 9/450 2026-08-23 03:04 by OEbVnUOu01ol
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 DpSrDtM079iu 2026-08-22 3/150 2026-08-23 00:55 by OEbVnUOu01ol
[基金申请] 范进中举一文的中心思想 +3 zjuhero 2026-08-22 4/200 2026-08-22 20:02 by mycsru
[教师之家] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +4 2JOx3r2CYEgw 2026-08-21 4/200 2026-08-22 16:52 by sunzitan
[基金申请] 今天基金会出结果吗?20260819 +16 kkkl_v 2026-08-19 17/850 2026-08-22 16:12 by 阿布Abu
[基金申请] 放榜前的不淡定 40+4 snowwithsea 2026-08-19 14/700 2026-08-21 23:51 by cratir
[基金申请] 应该是下周三26日公布了吧? +4 哈哈蛤? 2026-08-21 4/200 2026-08-21 10:58 by Vivilian
[基金申请] 今天放榜没戏了吧 +9 yuleib84 2026-08-19 11/550 2026-08-21 10:06 by gltch
[基金申请] 基金啊基金 +4 longfie172 2026-08-20 4/200 2026-08-21 08:58 by mark mao
[基金申请] 今天系统多次维护,明天很可能放榜! +10 zju2000 2026-08-16 11/550 2026-08-20 20:02 by cl479861084
信息提示
请填处理意见