| 5 | 1/1 | 返回列表 |
| 查看: 4139 | 回復(fù): 9 | |||
| 當(dāng)前只顯示滿足指定條件的回帖,點(diǎn)擊這里查看本話題的所有回帖 | |||
fish8900金蟲(chóng) (小有名氣)
|
[求助]
fortran中運(yùn)行中出現(xiàn)無(wú)窮大的數(shù)怎么處理
|
||
|
在計(jì)算的過(guò)程中出現(xiàn)了無(wú)窮大的數(shù)(然后程序終止),我想進(jìn)行以下幾種嘗試,不知如何進(jìn)行 1、當(dāng)A變得無(wú)窮大后,我想對(duì)它進(jìn)行賦值,令A(yù)=1.0E+10 2、當(dāng)A變得無(wú)窮大后,想用一個(gè)判據(jù)來(lái)進(jìn)行后來(lái)的其他計(jì)算,這個(gè)判據(jù)該怎么設(shè)置 3、如何判斷A變得無(wú)窮大了 |
北大科研分享 |
新蟲(chóng) (初入文壇)
木蟲(chóng) (小有名氣)
金蟲(chóng) (小有名氣)
|
您好,這是根據(jù)要求寫的一點(diǎn)代碼,希望對(duì)您有幫助。 LOGICAL ISLARGE !邏輯變量,是否是大數(shù) REAL LARGENUM, A PARAMETER(LARGENUM=1.0E10) !也可按需求設(shè)為其他大數(shù) ISLARGE=.FALSE. !判斷A是否是大數(shù),只考慮了正數(shù)情況, IF(A.GE.LARGENUM) !如果還要考慮負(fù)數(shù)情況則改為IF(ABS(A).GE.LARGENUM) A=1.0E10 !是大數(shù)則設(shè)定值為1.0E10 ISLARGE=.TRUE. ENDIF IF(ISLARGE) PRINT 'A is very large' !輸出信息,判斷A為大數(shù)之后的后續(xù)操作 ENDIF |
金蟲(chóng) (小有名氣)
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 274求調(diào)劑 +3 | xiao愛(ài)同學(xué) 2026-03-30 | 3/150 |
|
|---|---|---|---|---|
|
[考研] 一志愿中海洋材料357 +3 | 麥恩莉. 2026-03-30 | 3/150 |
|
|
[考研] 309求調(diào)劑 +15 | 誰(shuí)不是少年 2026-03-29 | 15/750 |
|
|
[有機(jī)交流] 考研調(diào)劑 +8 | watb 2026-03-26 | 8/400 |
|
|
[考研] 282求調(diào)劑 +4 | wcq131415 2026-03-24 | 4/200 |
|
|
[考研] 294分080500材料科學(xué)與工程求調(diào)劑 +8 | 柳溪邊 2026-03-26 | 8/400 |
|
|
[考研] 291求調(diào)劑 +5 | Y-cap 2026-03-29 | 6/300 |
|
|
[考研] 349求調(diào)劑 +6 | 李木子啊哈哈 2026-03-25 | 6/300 |
|
|
[考研] 調(diào)劑 +3 | 好好讀書(shū)。 2026-03-28 | 3/150 |
|
|
[考研] 材料277求調(diào)劑 +7 | min3 2026-03-24 | 7/350 |
|
|
[考研] 藥學(xué)105500求調(diào)劑 +3 | Ssun。。 2026-03-28 | 3/150 |
|
|
[考研] 286求調(diào)劑 +4 | 丟掉懶惰 2026-03-27 | 7/350 |
|
|
[考研] 086502化學(xué)工程342求調(diào)劑 +6 | 阿姨復(fù)古不過(guò) 2026-03-27 | 6/300 |
|
|
[考研] 0703化學(xué)求調(diào)劑,各位老師看看我!! +5 | 祁祺祺 2026-03-25 | 5/250 |
|
|
[考研]
|
18419759900 2026-03-25 | 8/400 |
|
|
[考研] 348求調(diào)劑 +4 | 小懶蟲(chóng)不懶了 2026-03-27 | 5/250 |
|
|
[考研] 289求調(diào)劑 +17 | 碩星赴 2026-03-23 | 17/850 |
|
|
[考研] 材料專碩 335 分求調(diào)劑 +4 | 拒絕冷暴力 2026-03-25 | 4/200 |
|
|
[考研] 各位老師您好:本人初試372分 +5 | jj涌77 2026-03-25 | 6/300 |
|
|
[考研] 300分,材料,求調(diào)劑,英一數(shù)二 +5 | 超贊的 2026-03-24 | 5/250 |
|