作者jubilee2 (3321)
看板Fortran
标题Re: [问题] 实在是找不到BUG~"~
时间Thu Nov 24 01:04:06 2011
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
1F：→ jubilee2:因为编译器有时候会用奇怪的方法优化程式.SO这样比较保险 11/24 01:21