[問題] 實在是找不到BUG~"~

看板Fortran作者 (junny)時間12年前 (2011/11/22 15:45), 編輯推噓1(104)
留言5則, 5人參與, 最新討論串1/3 (看更多)
1 do i=1,n 2 if(t(i)>216d0)then 3 cp(i)=1060 4 else if(184d0<t(i).and.t(i)<=216d0)then 5 cp(i)=1500 6 else if(182d0<t(i).and.t(i)<=184d0)then 7 cp(i)=2000 8 else if(t(i)<=182d0)then 9 cp(i)=1190 t(i)從232開始降溫 程式開始跑 跑到T(i)=216就會停下來(就跑到216.001589519226300就不繼續往下了~"~) 如果將第4行後面改成t(i)<=215.95d0才能繼續跑 第6行也有相同問題t(i)<=183.95d0才能繼續跑 但這屬於偷吃步所以值有問題 實在是找不到BUG 請求板上高手幫忙 謝謝~~ -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.116.78.53

11/22 16:30, , 1F
不繼續往下是什麼意思? 當機? 跳出?
11/22 16:30, 1F

11/23 09:48, , 2F
你的t(i)降溫機制是什麼?由程式算還是外部讀入?
11/23 09:48, 2F

11/23 17:06, , 3F
實數盡量不要比大小
11/23 17:06, 3F

11/24 01:00, , 4F
不繼續往下是什麼意思? 跳出? cp(i)=0 ??
11/24 01:00, 4F

11/25 22:45, , 5F
可以偷問一下這是熱傳的作業嗎XD
11/25 22:45, 5F
文章代碼(AID): #1EorC0Wm (Fortran)
文章代碼(AID): #1EorC0Wm (Fortran)