Написать программу решения уравненияax3+bx=0 для произвольных a, b. Помогите) плииз!

Question

88

в избранное ссылка

Знаете ответ?

fsy777 · Accepted Answer

85

fsy777

07 марта 2023

Var a,b,x1,x2: real; begin Read (a); readln (b); if (a*b>0) and (b<>0) then writeln (-2*sqrt (b) ,',2*sqrt (b) ,','0'); else writeln ('0'); end.

комментировать

в избранное ссылка отблагодарить