// PascalABC.NET 3.3, сборка 1611 от 06.01.2018// Внимание! Если программа не работает, обновите версию!begin var (a,b):=ReadReal2('Введите а и b:'); Writeln('Кoрень уравнения вида ax+b=0 равен ',-b/a)end.ПримерВведите а и b: -2.5 6Кoрень уравнения вида ax+b=0 равен 2.4