Написать программу паскаль, для решения уравнения a*x+b=0 . коэффициенты a и b вводятся пользователем во время работы программы. в программе необходимо предусмотреть проверку коэффициентов a и b.

PascalABC.NET

begin

 var (a, b) := ReadReal2('Введите значения a и b:');

 if a = 0 then

   if b = 0 then

     Println('Решений бесконечно много')

   else

     Println('Решений нет')

 else

   Println('x =', -b / a)

end.