Составить программу решения линейного уравнения ax + b = 0, где а не равно 0.

begin
  var (a,b):=ReadReal2('a,b=');
  Writeln('x = ',-b/a)
end.


a,b= -15 2.18
x = 0.145333333333333