Решить линейное уравнение ax+b=0,
a и b ввести с клавиатуры (программу написать на языке Паскаль).

var a, b, x: real;

begin

   readln(a, b);

   x:= -1 * b / a;

   writeln(x)

end.