Решить линейное уравнение ax+b=0, a и b ввести с клавиатуры (программу написать на языке Паскаль).
var a, b, x: real;
begin
readln(a, b);
x:= -1 * b / a;
writeln(x)
end.