看板 [ Fortran ]
討論串[問題] 實在是找不到BUG~"~
共 3 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
下一頁
尾頁
#1
[問題] 實在是找不到BUG~"~
推噓1(1推 0噓 4→)留言5則，0人參與, 最新作者junny621 (junny)時間13年前 (2011/11/22 15:45), 編輯資訊
1
0
0
內容預覽:
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
(還有127個字)
#2
Re: [問題] 實在是找不到BUG~"~
推噓2(2推 0噓 1→)留言3則，0人參與, 最新作者snowanimal (動物先生)時間13年前 (2011/11/22 16:13), 編輯資訊
0
0
0
內容預覽:
你的t(i)是整數還是實數？你如果前面沒有定義，那麼程式會自動判定為實數。. 還有你的216d0指的應該是216度？. 基本上我猜是real跟integer出問題. 解決辦法. 把t(i)設為實數. 接著把 216d0 改為 216.d0 其餘照辦試試看吧. --. ※ 發信站: 批踢踢實業坊(pt
#3
Re: [問題] 實在是找不到BUG~"~
推噓0(0推 0噓 1→)留言1則，0人參與, 最新作者jubilee2 (3321)時間13年前 (2011/11/24 01:04), 編輯資訊
0
0
0
內容預覽:
do i=1,n. if(t(i)>216d0)then. cp(i)=1060. else. if(184d0<t(i).and.t(i)<=216d0)then. cp(i)=1500. else. if(182d0<t(i).and.t(i)<=184d0)then. cp(i)=2000.
首頁
上一頁
1
下一頁
尾頁