liu8868235

金蟲(chóng) (正式寫(xiě)手)

應(yīng)助: 22 (小學(xué)生)
金幣: 1417.4
紅花: 6
帖子: 732
在線: 128.2小時(shí)
蟲(chóng)號(hào): 2576864
注冊(cè): 2013-08-01
性別: GG
專業(yè): 傳熱傳質(zhì)學(xué)

[求助] 編一個(gè)fortran循環(huán)程序求思路

自己感覺(jué)比較復(fù)雜剛接手肯定不會(huì)，求一個(gè)思路或者是編寫(xiě)基本讓我看看。

算是中  G D 都是已經(jīng)的定值，p1也已知，p1-p2=1（每次遞減1）N=300
v1，v2，h1,h2 這些都是溫度的函數(shù)  能調(diào)用公式把他們算出了。

循環(huán)結(jié)束的條件是：si - si+1<=0 S也是溫度的函數(shù) 能調(diào)用公式。

在書(shū)上看到的都是一些循環(huán)過(guò)程中只有簡(jiǎn)單的一、二步運(yùn)算的，這個(gè)忽然中間這么多運(yùn)算，不會(huì)弄了，現(xiàn)在  求出了第一小段：△L1 。就是不會(huì)往下這么設(shè)置循環(huán)？

求的就是這個(gè).jpg

總長(zhǎng)等于圖1的總和.jpg

這個(gè)是干度 x 的計(jì)算公式.jpg

圖三的干度x就是在這里用到的.jpg

求圖1中的f的公式.jpg

回復(fù)此樓

» 猜你喜歡

0703化學(xué)調(diào)劑已經(jīng)有12人回復(fù)
0703化學(xué) 305求調(diào)劑已經(jīng)有4人回復(fù)
0703化學(xué)調(diào)劑，求各位老師收留已經(jīng)有10人回復(fù)
271材料工程求調(diào)劑已經(jīng)有5人回復(fù)
281求調(diào)劑（0805）已經(jīng)有16人回復(fù)
304求調(diào)劑已經(jīng)有6人回復(fù)
材料工程專碩調(diào)劑已經(jīng)有6人回復(fù)
一志愿天大材料與化工（085600）總分338 已經(jīng)有4人回復(fù)
085700資源與環(huán)境308求調(diào)劑已經(jīng)有3人回復(fù)
求材料調(diào)劑已經(jīng)有8人回復(fù)

» 本主題相關(guān)價(jià)值貼推薦，對(duì)您同樣有幫助:

fortran和c混合編譯問(wèn)題？已經(jīng)有9人回復(fù)
求助fortran編程一個(gè)。。仿真模擬非穩(wěn)態(tài)（非）絕熱毛細(xì)管已經(jīng)有12人回復(fù)
fortran里一個(gè)子程序不運(yùn)行是怎么回事已經(jīng)有13人回復(fù)
求助：intel visual fortran的格式問(wèn)題已經(jīng)有14人回復(fù)
一百個(gè)FORTRAN任務(wù)怎么能一次提交SSH計(jì)算已經(jīng)有3人回復(fù)
FORTRAN新手求助主程序循環(huán)問(wèn)題已經(jīng)有10人回復(fù)
急求可用的fortran編譯器已經(jīng)有13人回復(fù)
大家?guī)臀铱匆粋€(gè)fortran的程序，我總是計(jì)算不出正確的結(jié)果已經(jīng)有20人回復(fù)
我編的Simpson積分法fortran程序給不出結(jié)果，大俠們看看哪里出了問(wèn)題？已經(jīng)有4人回復(fù)
怎么使用fortran程序創(chuàng)建一個(gè)立方晶格模型已經(jīng)有5人回復(fù)
求助Fortran編程已經(jīng)有8人回復(fù)
請(qǐng)教一個(gè)fortran小程序編譯出錯(cuò)的問(wèn)題，謝謝已經(jīng)有9人回復(fù)
如何用fortran編寫(xiě)高斯白噪聲程序已經(jīng)有6人回復(fù)
求助計(jì)算物理中用Fortran編程的程序，能運(yùn)行有注釋的，題目如下。。重謝��！已經(jīng)有3人回復(fù)
寫(xiě)了一個(gè)fortran90的小程序，編譯通不過(guò)，請(qǐng)大俠幫忙已經(jīng)有59人回復(fù)
【求助】如何寫(xiě)FORTRAN程序?qū)崿F(xiàn)求平均最近鄰距離已經(jīng)有34人回復(fù)
【求助】FORTRAN寫(xiě)文件時(shí)每行開(kāi)頭都多了一個(gè)空格？已經(jīng)有6人回復(fù)
【求助】FORTRAN中的這幾個(gè)關(guān)鍵字是什么意思呢【已完結(jié)】已經(jīng)有4人回復(fù)
【轉(zhuǎn)帖】intel Fortran編譯器的一個(gè)“危險(xiǎn)”優(yōu)化已經(jīng)有9人回復(fù)
【求助】請(qǐng)問(wèn)一下fortran的可視化編程已經(jīng)有7人回復(fù)

生命不息---奮斗不止.不要因?yàn)樽叩倪h(yuǎn)了就忘了最初出發(fā)的目的；不要因?yàn)橐稽c(diǎn)小小的成就就忘了最初低調(diào)的自己，要記住最初的自己是誰(shuí)。

1樓 2013-10-26 15:29:50

已閱關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

liu8868235

金蟲(chóng) (正式寫(xiě)手)

應(yīng)助: 22 (小學(xué)生)
金幣: 1417.4
紅花: 6
帖子: 732
在線: 128.2小時(shí)
蟲(chóng)號(hào): 2576864
注冊(cè): 2013-08-01
性別: GG
專業(yè): 傳熱傳質(zhì)學(xué)

加下標(biāo)m 就是 f1 與 f2 的平均值大家也都知道的

贊一下

回復(fù)此樓

2樓2013-10-26 15:30:55

已閱關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

jerkwin

專家顧問(wèn) (正式寫(xiě)手)

專家經(jīng)驗(yàn): +14
應(yīng)助: 454 (碩士)
金幣: 20699.1
散金: 148
紅花: 81
帖子: 813
在線: 2648.3小時(shí)
蟲(chóng)號(hào): 1023452
注冊(cè): 2010-05-19
專業(yè): 理論和計(jì)算化學(xué)
管轄: 分子模擬

你終于還是來(lái)求助了啊
還以為你能自己搞定呢

贊一下

回復(fù)此樓

3樓2013-10-26 21:58:50

已閱關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

liu8868235

金蟲(chóng) (正式寫(xiě)手)

應(yīng)助: 22 (小學(xué)生)
金幣: 1417.4
紅花: 6
帖子: 732
在線: 128.2小時(shí)
蟲(chóng)號(hào): 2576864
注冊(cè): 2013-08-01
性別: GG
專業(yè): 傳熱傳質(zhì)學(xué)

引用回帖:

3樓: Originally posted by jerkwin at 2013-10-26 21:58:50
你終于還是來(lái)求助了啊
還以為你能自己搞定呢

那你看到了還不幫幫我，我這次寫(xiě)帖子的時(shí)候還在想，上次怎么不這樣寫(xiě)呢，要上次都寫(xiě)這么詳細(xì)或許你已經(jīng)給我解決了呢。呵呵

贊一下

回復(fù)此樓

4樓2013-10-26 22:05:01

已閱關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

liu8868235

金蟲(chóng) (正式寫(xiě)手)

應(yīng)助: 22 (小學(xué)生)
金幣: 1417.4
紅花: 6
帖子: 732
在線: 128.2小時(shí)
蟲(chóng)號(hào): 2576864
注冊(cè): 2013-08-01
性別: GG
專業(yè): 傳熱傳質(zhì)學(xué)

引用回帖:

3樓: Originally posted by jerkwin at 2013-10-26 21:58:50
你終于還是來(lái)求助了啊
還以為你能自己搞定呢

真心的還是沒(méi)思路？不知道該怎么辦？現(xiàn)在就是不知道如何把下角標(biāo) 2換為3 1換位2 這樣不就完成循環(huán)了嗎？給點(diǎn)意見(jiàn)唄

贊一下

回復(fù)此樓

5樓2013-10-26 22:06:37

已閱關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

jerkwin

專家顧問(wèn) (正式寫(xiě)手)

專家經(jīng)驗(yàn): +14
應(yīng)助: 454 (碩士)
金幣: 20699.1
散金: 148
紅花: 81
帖子: 813
在線: 2648.3小時(shí)
蟲(chóng)號(hào): 1023452
注冊(cè): 2010-05-19
專業(yè): 理論和計(jì)算化學(xué)
管轄: 分子模擬

【答案】應(yīng)助回帖

★
感謝參與，應(yīng)助指數(shù) +1
liu8868235(jjdg代發(fā)): 金幣+1, 感謝參與 2013-10-27 02:34:55

不用循環(huán), 用個(gè)while判斷, 達(dá)到條件就推出
一個(gè)Spre記錄上一步的S, 一個(gè)Snow記錄當(dāng)前S, abs(Snow-Spre)<eps exit

贊一下

回復(fù)此樓

6樓2013-10-26 22:17:02

已閱關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

liu8868235

金蟲(chóng) (正式寫(xiě)手)

應(yīng)助: 22 (小學(xué)生)
金幣: 1417.4
紅花: 6
帖子: 732
在線: 128.2小時(shí)
蟲(chóng)號(hào): 2576864
注冊(cè): 2013-08-01
性別: GG
專業(yè): 傳熱傳質(zhì)學(xué)

引用回帖:

6樓: Originally posted by jerkwin at 2013-10-26 22:17:02
不用循環(huán), 用個(gè)while判斷, 達(dá)到條件就推出
一個(gè)Spre記錄上一步的S, 一個(gè)Snow記錄當(dāng)前S, abs(Snow-Spre)<eps exit

大神，能不能說(shuō)的再稍微詳細(xì)點(diǎn)，我剛接觸這東西，還不是很懂。每一次Fm，Vm都不一樣也能用WHILE�。�

贊一下

回復(fù)此樓

7樓2013-10-27 13:00:47

已閱關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

最具人氣熱帖推薦 [查看全部]	作者	回/看	最后發(fā)表

[考研] 0703化學(xué)調(diào)劑 +8	妮妮ninicgb 2026-03-15	12/600	2026-03-19 05:55 by anny19840123
[考研] 304求調(diào)劑 +6	司空. 2026-03-18	6/300	2026-03-18 23:03 by 星空星月
[考研] 267一志愿南京工業(yè)大學(xué)0817化工求調(diào)劑 +8	SUICHILD 2026-03-12	8/400	2026-03-18 20:55 by winsuccess
[考研] 材料與化工一志愿南昌大學(xué)327求調(diào)劑推薦 +8	Ncdx123456 2026-03-13	9/450	2026-03-18 14:40 by haxia
[考研] 293求調(diào)劑 +11	zjl的號(hào) 2026-03-16	16/800	2026-03-18 08:10 by zhukairuo
[考研] 268求調(diào)劑 +7	好運(yùn)連綿不絕 2026-03-12	8/400	2026-03-17 20:28 by xilongliang
[考研] 275求調(diào)劑 +4	太陽(yáng)花天天開(kāi)心 2026-03-16	4/200	2026-03-17 10:53 by 功夫瘋狂
[考研] 278求調(diào)劑 +3	Yy7400 2026-03-13	3/150	2026-03-17 08:24 by laoshidan
[基金申請(qǐng)] 國(guó)自科面上基金字體 +6	iwuli 2026-03-12	7/350	2026-03-16 21:18 by sculhf
[考研] 機(jī)械專碩325，尋找調(diào)劑院校 +3	y9999 2026-03-15	5/250	2026-03-16 19:58 by y9999
[考研] 304求調(diào)劑 +5	素年祭語(yǔ) 2026-03-15	5/250	2026-03-16 17:00 by 我的船我的海
[考研] 304求調(diào)劑 +3	曼殊2266 2026-03-14	3/150	2026-03-16 16:39 by houyaoxu
[考研] 機(jī)械專碩調(diào)劑 +3	笨笨兔子 2026-03-12	3/150	2026-03-15 20:02 by 栗子粥?
[考研] 材料與化工求調(diào)劑一志愿 985 總分 295 +8	dream…… 2026-03-12	8/400	2026-03-13 22:17 by 星空星月
[考研] ［0860］321分求調(diào)劑，ab區(qū)皆可 +4	寶貴熱 2026-03-13	4/200	2026-03-13 22:01 by 星空星月
[考研] 311求調(diào)劑 +3	冬十三 2026-03-13	3/150	2026-03-13 20:41 by JourneyLucky
[考研] 328化工專碩求調(diào)劑 +4	。，。，。，。i 2026-03-12	4/200	2026-03-13 14:44 by JourneyLucky
[考研] 材料301分求調(diào)劑 +5	Liyouyumairs 2026-03-12	5/250	2026-03-13 14:42 by JourneyLucky
[考研] 308求調(diào)劑 +3	是Lupa啊 2026-03-12	3/150	2026-03-13 14:30 by 求調(diào)劑zz
[考研] 321求調(diào)劑（食品/專碩） +3	xc321 2026-03-12	6/300	2026-03-13 08:45 by xc321