Re: [問題] 實在是找不到BUG~"~
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
else
cp(i)=1190
end if
end if
end if
end do
試試看這樣子吧!
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 111.255.164.215
→
11/24 01:21, , 1F
11/24 01:21, 1F
討論串 (同標題文章)
完整討論串 (本文為第 3 之 3 篇)：
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
