Найти корни квадратного уравнения x(x+a)=0, для произвольного значения постоянного коэффициента a. Последний этап решения реализовать на языке программирования Pascal.
Var a, x: longint;
begin
readln (a);
x:=-a;
writeln (x1=0);
writeln (x2=,x);
end.
Оцени ответ
