Написать программу решения линейного алгебраического уравнения с произвольными параметрами: A*X+B=0.

var  a,b,x:real;beginwrite('Введите коэффициенты а и b: ');readln(a,b);x:=-b/a;writeln('Ответ: x=',x);end.