版塊導(dǎo)航: 正在加載中...

應(yīng)《網(wǎng)絡(luò)安全法》要求，自2017年10月1日起，未進(jìn)行實(shí)名認(rèn)證將不得使用互聯(lián)網(wǎng)跟帖服務(wù)。為保障您的帳號(hào)能夠正常使用，請(qǐng)盡快對(duì)帳號(hào)進(jìn)行手機(jī)號(hào)驗(yàn)證，感謝您的理解與支持！

24小時(shí)熱門(mén)版塊排行榜

返回列表

xingxiao

銅蟲(chóng) (小有名氣)

應(yīng)助: 0 (幼兒園)
金幣: 101.5
帖子: 110
在線: 62.9小時(shí)
蟲(chóng)號(hào): 712761
注冊(cè): 2009-03-02
專業(yè): 理論和計(jì)算化學(xué)

[求助] 運(yùn)行結(jié)果為0，怎么回事？

我編了下面一段子程序，運(yùn)行后結(jié)果輸出0，不知道是怎么回事，存儲(chǔ)空間肯定能存儲(chǔ)這么大的數(shù)，而且沒(méi)有越界：
   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

我想實(shí)現(xiàn)的目的是統(tǒng)計(jì)粒子在一個(gè)空間邊界處的數(shù)目，粒子在電場(chǎng)力的作用下向前走，每走一步（如果走到了邊界處）就把粒子數(shù)目加1

[ Last edited by xingxiao on 2012-2-10 at 13:22 ]

回復(fù)此樓

» 猜你喜歡

材料，紡織，生物（0856、0710），化學(xué)招生啦已經(jīng)有7人回復(fù)
301求調(diào)劑已經(jīng)有5人回復(fù)
281求調(diào)劑（0805）已經(jīng)有7人回復(fù)
材料與化工求調(diào)劑已經(jīng)有6人回復(fù)
299求調(diào)劑已經(jīng)有4人回復(fù)
277調(diào)劑已經(jīng)有6人回復(fù)
341求調(diào)劑已經(jīng)有7人回復(fù)
328求調(diào)劑，英語(yǔ)六級(jí)551，有科研經(jīng)歷已經(jīng)有8人回復(fù)
293求調(diào)劑已經(jīng)有12人回復(fù)
070300化學(xué)319求調(diào)劑已經(jīng)有4人回復(fù)

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

來(lái)看看proe 5.0 出猜怎么回事啊已經(jīng)有3人回復(fù)
配置的0.5M的EDTA 溶液渾濁是怎么回事？已經(jīng)有10人回復(fù)
做充放電測(cè)試時(shí)電壓充到0.4V左右時(shí)就沖不上去了，是怎么回事？已經(jīng)有8人回復(fù)
為什么這個(gè)程序運(yùn)行時(shí)有延遲，在VC++6.0中，就是點(diǎn)運(yùn)行要過(guò)一會(huì)兒才提示輸入已經(jīng)有8人回復(fù)
jade5.0出來(lái)的譜圖是階梯狀是怎么回事？已經(jīng)有5人回復(fù)

1樓 2012-02-10 12:50:16

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

snoopyzhao

至尊木蟲(chóng) (職業(yè)作家)

程序強(qiáng)帖: 16
應(yīng)助: 157 (高中生)
貴賓: 0.02
金幣: 18844.7
紅花: 29
帖子: 3803
在線: 1422.4小時(shí)
蟲(chóng)號(hào): 183750
注冊(cè): 2006-02-13
專業(yè): 污染生態(tài)化學(xué)

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

感謝參與，應(yīng)助指數(shù) +1
jjdg(金幣+1): 感謝參與 2012-02-11 09:03:01

你把 an(i,j,1) 和 q 打印出來(lái)看看不就知道了……

這個(gè)程序的判斷句中就有可能跳過(guò)一些條件的啊

贊一下

回復(fù)此樓

» 本帖已獲得的紅花（最新10朵）

xingxiao

2樓2012-02-10 16:39:18

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

emanlee

木蟲(chóng) (小有名氣)

應(yīng)助: 28 (小學(xué)生)
金幣: 3521.6
散金: 100
紅花: 2
帖子: 116
在線: 125.6小時(shí)
蟲(chóng)號(hào): 1466309
注冊(cè): 2011-10-29
性別: GG
專業(yè): 計(jì)算機(jī)應(yīng)用技術(shù)

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

感謝參與，應(yīng)助指數(shù) +1
jjdg(金幣+1): 感謝參與 2012-02-11 09:03:07

先把Ng的值改得比較小，比如改為5。然后，單步執(zhí)行程序，觀察各個(gè)變量的值。找到問(wèn)題之后，再改回Ng的原值。

贊一下

回復(fù)此樓

» 本帖已獲得的紅花（最新10朵）

xingxiao

3樓2012-02-10 23:31:23

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

xingxiao

銅蟲(chóng) (小有名氣)

應(yīng)助: 0 (幼兒園)
金幣: 101.5
帖子: 110
在線: 62.9小時(shí)
蟲(chóng)號(hào): 712761
注冊(cè): 2009-03-02
專業(yè): 理論和計(jì)算化學(xué)

送鮮花一朵

引用回帖:

樓: Originally posted by emanlee at 2012-02-10 23:31:23:
先把Ng的值改得比較小，比如改為5。然后，單步執(zhí)行程序，觀察各個(gè)變量的值。找到問(wèn)題之后，再改回Ng的原值。

感謝你的提醒，這是一個(gè)思路

贊一下

回復(fù)此樓

4樓2012-02-11 08:43:59

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

xingxiao

銅蟲(chóng) (小有名氣)

應(yīng)助: 0 (幼兒園)
金幣: 101.5
帖子: 110
在線: 62.9小時(shí)
蟲(chóng)號(hào): 712761
注冊(cè): 2009-03-02
專業(yè): 理論和計(jì)算化學(xué)

送鮮花一朵

引用回帖:

樓: Originally posted by snoopyzhao at 2012-02-10 16:39:18:
你把 an(i,j,1) 和 q 打印出來(lái)看看不就知道了……

這個(gè)程序的判斷句中就有可能跳過(guò)一些條件的啊

應(yīng)該是我程序中還有一些條件沒(méi)考慮全，謝謝

贊一下

回復(fù)此樓

5樓2012-02-11 08:44:55

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

joy4210

金蟲(chóng) (小有名氣)

應(yīng)助: 9 (幼兒園)
金幣: 3095.3
散金: 2
帖子: 219
在線: 114.7小時(shí)
蟲(chóng)號(hào): 1096044
注冊(cè): 2010-09-11
專業(yè): 原子和分子物理

AN(i,j,1）和q的值沒(méi)有給��！所以應(yīng)該沒(méi)有進(jìn)入if判斷里邊吧

贊一下

回復(fù)此樓

6樓2012-02-14 16:20:32

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

相關(guān)版塊跳轉(zhuǎn) 我要訂閱樓主 xingxiao 的主題更新

返回列表

普通表情龍兔虎貓

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

[考研] 299求調(diào)劑 +4	△小透明* 2026-03-17	4/200	2026-03-17 20:09 by peike
[考研] 277調(diào)劑 +5	自由煎餅果子 2026-03-16	6/300	2026-03-17 19:26 by 李leezz
[考研] 293求調(diào)劑 +7	zjl的號(hào) 2026-03-16	12/600	2026-03-17 18:22 by 重科小霸王
[考研] 301求調(diào)劑 +4	A_JiXing 2026-03-16	4/200	2026-03-17 17:32 by ruiyingmiao
[考研] 304求調(diào)劑 +8	小熊joy 2026-03-14	8/400	2026-03-17 17:29 by ruiyingmiao
[考研] 275求調(diào)劑 +4	太陽(yáng)花天天開(kāi)心 2026-03-16	4/200	2026-03-17 10:53 by 功夫瘋狂
[考研] 289求調(diào)劑 +6	步川酷紫123 2026-03-11	6/300	2026-03-17 10:23 by Sammy2
[考研] 材料專碩274一志愿陜西師范大學(xué)求調(diào)劑 +5	薛云鵬 2026-03-13	5/250	2026-03-17 10:15 by Sammy2
[考研] 283求調(diào)劑 +3	聽(tīng)風(fēng)就是雨； 2026-03-16	3/150	2026-03-17 07:41 by 熱情沙漠
[文學(xué)芳草園] 伙伴們，祝我生日快樂(lè)吧 +17	myrtle 2026-03-10	26/1300	2026-03-16 18:32 by 青橙Ln
[考研] 環(huán)境工程調(diào)劑 +6	大可digkids 2026-03-16	6/300	2026-03-16 17:16 by barlinike
[考研] 283求調(diào)劑 +10	小樓。 2026-03-12	14/700	2026-03-16 16:08 by 13811244083
[考研] 285求調(diào)劑 +6	ytter 2026-03-12	6/300	2026-03-16 15:05 by njzyff
[基金申請(qǐng)] NSFC申報(bào)書(shū)里申請(qǐng)人簡(jiǎn)歷中代表性論著還需要在申報(bào)書(shū)最后的附件里面再上傳一遍嗎 20+5	NSFC2026我來(lái)了 2026-03-10	14/700	2026-03-15 23:53 by 不負(fù)韶華的虎
[考研] 一志愿哈工大材料324分求調(diào)劑 +5	閆旭東 2026-03-14	5/250	2026-03-14 14:53 by 木瓜膏
[考研] 招收0805（材料）調(diào)劑 +3	18595523086 2026-03-13	3/150	2026-03-14 00:33 by 123%、
[考研] （081700）化學(xué)工程與技術(shù)-298分求調(diào)劑 +12	11啦啦啦 2026-03-11	35/1750	2026-03-13 21:25 by JourneyLucky
[考研] 311求調(diào)劑 +3	冬十三 2026-03-13	3/150	2026-03-13 20:41 by JourneyLucky
[考研] 0703化學(xué)求調(diào)劑 +7	綠豆芹菜湯 2026-03-12	7/350	2026-03-13 17:25 by njzyff
[考研] 308求調(diào)劑 +3	是Lupa啊 2026-03-12	3/150	2026-03-13 14:30 by 求調(diào)劑zz