 |
 |
 |
 |
 |
 |
||
 |
 |
 |
 |
 |
小木蟲論壇-學術科研互動平臺 » 計算模擬區(qū) » 程序語言 » Fortran » 運行結果為0，怎么回事？
| 5 | 1/1 | 返回列表 |
| 查看: 2386 | 回復: 5 | ||
| 當前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖 | ||
[求助]
運行結果為0，怎么回事？
|
||
|
我編了下面一段子程序，運行后結果輸出0，不知道是怎么回事，存儲空間肯定能存儲這么大的數(shù)，而且沒有越界： implicit none real,intent(in)::q integer,intent(in)::Ng integer,dimension(1:Ng),intent(in)::ink real,dimension(1:Ng,1:3000,1:7),intent(in)::AN integer,intent(inout)::Nele,Nion integer i,j nele=0.0;nion=0.0 do i=1,Ng do j=1,ink(i) if(AN(i,j,1)<=0.0.and.q<0.0) then ！AN(i,j,1)是路程 ! Nele=nele+1 else if(AN(i,j,1)<=0.0.and.q>0.0) then Nion=nion+1 end if end do end do 我想實現(xiàn)的目的是統(tǒng)計粒子在一個空間邊界處的數(shù)目，粒子在電場力的作用下向前走，每走一步（如果走到了邊界處）就把粒子數(shù)目加1 [ Last edited by xingxiao on 2012-2-10 at 13:22 ] |
回復此樓» 猜你喜歡
281求調劑（0805）
已經(jīng)有9人回復
-
293求調劑
已經(jīng)有14人回復
-
0703化學336分求調劑
已經(jīng)有6人回復
-
304求調劑
已經(jīng)有9人回復
-
環(huán)境領域全國重點實驗室招收博士1-2名
已經(jīng)有3人回復
-
材料專碩306英一數(shù)二
已經(jīng)有10人回復
-
301求調劑
已經(jīng)有6人回復
-
一志愿天津大學化學工藝專業(yè)（081702）315分求調劑
已經(jīng)有7人回復
-
302求調劑
已經(jīng)有6人回復
-
26博士申請
已經(jīng)有3人回復
» 本主題相關價值貼推薦，對您同樣有幫助:
- 來看看proe 5.0 出猜怎么回事啊
已經(jīng)有3人回復
- 配置的0.5M的EDTA 溶液渾濁是怎么回事？
已經(jīng)有10人回復
- 做充放電測試時電壓充到0.4V左右時就沖不上去了，是怎么回事？
已經(jīng)有8人回復
- 為什么這個程序運行時有延遲，在VC++6.0中，就是點運行要過一會兒才提示輸入
已經(jīng)有8人回復
- jade5.0出來的譜圖是階梯狀是怎么回事？
已經(jīng)有5人回復
送鮮花一朵 
4樓2012-02-11 08:43:59
snoopyzhao
至尊木蟲 (職業(yè)作家)
- 程序強帖: 16
- 應助: 157 (高中生)
- 貴賓: 0.02
- 金幣: 18844.7
- 紅花: 29
- 帖子: 3803
- 在線: 1422.4小時
- 蟲號: 183750
- 注冊: 2006-02-13
- 專業(yè): 污染生態(tài)化學
2樓2012-02-10 16:39:18
emanlee
木蟲 (小有名氣)
- 應助: 28 (小學生)
- 金幣: 3521.6
- 散金: 100
- 紅花: 2
- 帖子: 116
- 在線: 125.6小時
- 蟲號: 1466309
- 注冊: 2011-10-29
- 性別: GG
- 專業(yè): 計算機應用技術
3樓2012-02-10 23:31:23
5樓2012-02-11 08:44:55
| 最具人氣熱帖推薦 [查看全部] | 作者 | 回/看 | 最后發(fā)表 | |
|---|---|---|---|---|
|
[考研] 311求調劑 +9 | 冬十三 2026-03-15 | 10/500 |
|
|---|---|---|---|---|
|
|
[考研] 085601專碩，總分342求調劑，地區(qū)不限 +4 | share_joy 2026-03-16 | 4/200 |
|
|
|
[考研] 化學工程321分求調劑 +11 | 大米飯！ 2026-03-15 | 14/700 |
|
|
|
[考研] 【0856】化學工程（085602）313 分，本科學科評估A類院�；瘜W工程與工藝，誠求調劑 +7 | 小劉快快上岸 2026-03-11 | 8/400 |
|
|
|
[考研] 290求調劑 +6 | 孔志浩 2026-03-12 | 11/550 |
|
|
[考研] 材料與化工專碩調劑 +5 | heming3743 2026-03-16 | 5/250 |
|
|
|
[考研] 一志愿南京大學，080500材料科學與工程，調劑 +4 | Jy? 2026-03-16 | 4/200 |
|
|
|
[考研] 0854控制工程 359求調劑 可跨專業(yè) +3 | 626776879 2026-03-14 | 9/450 |
|
|
|
[考研] 環(huán)境工程調劑 +6 | 大可digkids 2026-03-16 | 6/300 |
|
|
|
[考研] 070300化學學碩求調劑 +6 | 太想進步了0608 2026-03-16 | 6/300 |
|
|
|
[考研] 材料與化工一志愿南昌大學327求調劑推薦 +7 | Ncdx123456 2026-03-13 | 8/400 |
|
|
|
[考研] 327求調劑 +6 | 拾光任染 2026-03-15 | 11/550 |
|
|
|
[考研] 080500，材料學碩302分求調劑學校 +4 | 初識可樂 2026-03-14 | 5/250 |
|
|
|
[考研] 289求調劑 +4 | 這么名字咋樣 2026-03-14 | 6/300 |
|
|
|
[考研] 290求調劑 +9 | ADT 2026-03-11 | 9/450 |
|
|
|
[考研] 一志愿西南交大，材料專碩317求調劑 +5 | lx8568 2026-03-11 | 5/250 |
|
|
|
[考研] 307求調劑 +5 | 超級伊昂大王 2026-03-12 | 5/250 |
|
|
|
[考研] 工科材料085601 279求調劑 +8 | 困于星晨 2026-03-12 | 10/500 |
|
|
|
[考研] 求調劑 +3 | 程雨杭 2026-03-12 | 3/150 |
|
|
|
[考研] 070303一志愿西北大學學碩310找調劑 +3 | d如愿上岸 2026-03-13 | 3/150 |
|