24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 1275  |  回复: 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

金虫 (正式写手)

加下标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的回帖

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的回帖

jerkwin

专家顾问 (正式写手)

【答案】应助回帖


感谢参与,应助指数 +1
liu8868235(jjdg代发): 金币+1, 感谢参与 2013-10-27 02:34:55
不用循环, 用个while判断, 达到条件就推出
一个Spre记录上一步的S, 一个Snow记录当前S, abs(Snow-Spre)<eps exit
6楼2013-10-26 22:17:02
已阅   关注TA 给TA发消息 送TA红花 TA的回帖

liu8868235

金虫 (正式写手)

引用回帖:
6楼: Originally posted by jerkwin at 2013-10-26 22:17:02
不用循环, 用个while判断, 达到条件就推出
一个Spre记录上一步的S, 一个Snow记录当前S, abs(Snow-Spre)<eps exit

大神,能不能说的再稍微详细点,我刚接触这东西,还不是很懂。每一次Fm,Vm都不一样也能用WHILE啊?
生命不息---奋斗不止.不要因为走的远了就忘了最初出发的目的;不要因为一点小小的成就就忘了最初低调的自己,要记住最初的自己是谁。
7楼2013-10-27 13:00:47
已阅   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 liu8868235 的主题更新
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料科学与工程求调剂 +8 深V宿舍吧 2026-03-29 8/400 2026-03-30 22:25 by 我是小康
[考研] 289求调剂 +16 新时代材料 2026-03-27 16/800 2026-03-30 19:04 by Wang200018
[考研] 材料化工340求调剂 +3 jhx777 2026-03-30 3/150 2026-03-30 17:54 by JourneyLucky
[考研] 08工科,295,接受跨专业调剂 +3 lmnlzy 2026-03-30 3/150 2026-03-30 17:49 by wangjy2002
[考研] 材料专硕 085600求调剂 +7 BBQ233 2026-03-30 7/350 2026-03-30 17:44 by oooqiao
[考研] 286求调剂 +5 Faune 2026-03-30 5/250 2026-03-30 17:15 by 无际的草原
[考研] 298求调剂 +3 什么是胖头鱼 2026-03-30 5/250 2026-03-30 14:41 by 青海小西牛
[考研] 317求调剂 +10 蛋黄咸肉粽 2026-03-26 10/500 2026-03-30 09:45 by longlotian
[考博] 26申博自荐 +6 whh869393 2026-03-24 6/300 2026-03-29 21:05 by nxgogo
[考研] 291求调剂 +5 Y-cap 2026-03-29 6/300 2026-03-29 13:18 by mumin1990
[考研] 340求调剂 +6 Amber00 2026-03-26 6/300 2026-03-29 12:06 by 无际的草原
[考研] 321求调剂 +7 璞玉~~ 2026-03-25 8/400 2026-03-29 06:41 by 544594351
[考研] 311(085601)求调剂 +4 liziyeyeye 2026-03-28 4/200 2026-03-28 18:50 by 535743368
[考研] 086502化学工程342求调剂 +6 阿姨复古不过 2026-03-27 6/300 2026-03-28 07:06 by wangy0907
[有机交流] 高温高压反应求助 10+4 chibby 2026-03-25 4/200 2026-03-27 21:08 by BT20230424
[考研] 285求调剂 +4 AZMK 2026-03-27 7/350 2026-03-27 20:59 by AZMK
[考研] 305求调剂 +5 哇卢卡库 2026-03-26 5/250 2026-03-27 14:01 by laoshidan
[考研] 一志愿郑大085600,310分求调剂 +5 李潇可 2026-03-26 5/250 2026-03-27 11:14 by 不吃魚的貓
[考研] 321求调剂 +6 Ymlll 2026-03-24 6/300 2026-03-26 20:50 by 不吃魚的貓
[考研] 材料专硕 335 分求调剂 +4 拒绝冷暴力 2026-03-25 4/200 2026-03-25 18:45 by haxia
信息提示
请填处理意见