Найти корни квадратного уравнения x (x+a) = 0, для произвольного значения постоянного коэффициента a. Последний этап решения реализовать на языке программирования Pascal.

Question

Виталий

16 апреля, 17:38

+4

Ответы (1)

Знаете ответ на вопрос?

Тимофейка · Answer 1

Var a, x: longint;

begin

readln (a) ;

x:=-a;

writeln ('x1=0') ;

writeln ('x2=', x) ;

end.