[問題] 最小值有兩個只顯示一個
program ex
integer i
real a,x,x1,y,y1
write(*,*) "input a"
read(*,*) a
do i=-500,500
x=i
y=(x**2)+a*x
if (i.eq.-500) then
y1=y
x1=x
end if
if (y.lt.y1) then
y1=y
x1=x
end if
end do
write(*,*)"x=",x1,"y=",y1
end
以上為我計算y=x^2+ax 最小的方法
萬一a代1
答案應該是-1跟0
但是只會顯示-1
該怎麼讓另外一個也顯示
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 140.115.214.9
推
12/04 10:38, , 1F
12/04 10:38, 1F
推
12/04 10:48, , 2F
12/04 10:48, 2F
推
12/04 10:49, , 3F
12/04 10:49, 3F
→
12/04 12:55, , 4F
12/04 12:55, 4F
→
12/04 12:55, , 5F
12/04 12:55, 5F
Fortran 近期熱門文章
PTT數位生活區 即時熱門文章
