| 查看: 1607 | 回復(fù): 10 | |||
junmajifei銅蟲 (正式寫手)
|
[求助]
Fortran數(shù)組的調(diào)用問題 已有6人參與
|
|
在網(wǎng)上看到一段代碼, integer bi(50000) bi(20000) = 20000 ... if (bi(A).eq.A) goto 165 這里A的取值有兩種情況,或者是0,或者是20000 請問bi(0)的值為多少? 既然定義了integer bi(50000),bi應(yīng)該是默認(rèn)從1開始的,我不明白bi(0)存不存在,如果存在,默認(rèn)值時多少? 電腦上沒裝fortran,還請廣大蟲友指教。 |
計算機(jī)語言 |

新蟲 (初入文壇)
銅蟲 (正式寫手)

鐵桿木蟲 (著名寫手)
工程和科學(xué)數(shù)值計算咨詢
|
bi(0) 是沒有定義的。但是,一般的編譯器,比如CFV6.6,如果你沒有使用 /check:bounds 的option的話, 允許你用。但是,值就不一定了。很可能取決于內(nèi)存中排在數(shù)組 bi 之前的變量是什么。也就是說,有隨機(jī)性。所以,是一個沒有意義的問題。但,默認(rèn)值很大可能性是0. 這是因為大多數(shù)變量很可能尚未賦值過。 如果使用了 option /check:bounds 和 /traceback, 就會出 run time error,告訴你停在那里。 |
|
本帖內(nèi)容被屏蔽 |
銅蟲 (正式寫手)

銅蟲 (正式寫手)

| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 材料學(xué)碩333求調(diào)劑 +14 | 北道巷 2026-03-24 | 14/700 |
|
|---|---|---|---|---|
|
[考研] 材料化工340求調(diào)劑 +3 | jhx777 2026-03-30 | 3/150 |
|
|
[考研] 317分 一志愿南理工材料工程 本科湖工大 求調(diào)劑 +12 | 芋泥小鈴鐺 2026-03-28 | 12/600 |
|
|
[考研] 291求調(diào)劑 +8 | HanBeiNingZC 2026-03-24 | 8/400 |
|
|
[考研] 化學(xué)0703 調(diào)劑 306分 一志愿211 +8 | 26要上岸 2026-03-28 | 8/400 |
|
|
[考研] 085701求調(diào)劑初試286分 +5 | secret0328 2026-03-28 | 5/250 |
|
|
[考研] 0703本科鄭州大學(xué)求調(diào)劑 +7 | nhj_ 2026-03-25 | 7/350 |
|
|
[考研] 311求調(diào)劑 +10 | lin0039 2026-03-26 | 10/500 |
|
|
[考研] 08工科求調(diào)劑286 +3 | tgs_001 2026-03-28 | 3/150 |
|
|
[考研] 求調(diào)劑,一志愿 南京航空航天大學(xué) ,080500材料科學(xué)與工程學(xué)碩,總分289分 +7 | @taotao 2026-03-29 | 7/350 |
|
|
[考研] 調(diào)劑考研 +3 | 王杰一 2026-03-29 | 3/150 |
|
|
[考研] 0703化學(xué)調(diào)劑,求導(dǎo)師收 +9 | 天天好運來上岸?/a> 2026-03-24 | 10/500 |
|
|
[考研] 322求調(diào)劑 +5 | 舊吢 2026-03-24 | 5/250 |
|
|
[考研] 283求調(diào)劑 +7 | A child 2026-03-28 | 7/350 |
|
|
[考研] 340求調(diào)劑 +5 | jhx777 2026-03-27 | 5/250 |
|
|
[考研]
|
18419759900 2026-03-25 | 8/400 |
|
|
[考研] 調(diào)劑 +3 | 李嘉圖·S·路 2026-03-27 | 3/150 |
|
|
[考研] 0703化學(xué)一志愿南京師范大學(xué)303求調(diào)劑 +3 | zzffylgg 2026-03-24 | 3/150 |
|
|
[考研] 一志愿吉大071010,316分求調(diào)劑 +3 | xgbiknn 2026-03-27 | 3/150 |
|
|
[考研] 334分 一志愿武理-080500 材料求調(diào)劑 +4 | 李李不服輸 2026-03-25 | 4/200 |
|