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

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.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.