Пример 10 стр 80 Алгоритм решения линейного уравнения
Напишите программу на языке Паскаль для решения линейного уравнения вида ax+b=0
x,a,b,c : real; - переменные целого типа
для ввода используется команда read(a,b);
для проверки условия необходимо использовать служебное слово if
if a<>0 then x:=-b/a //проверяем уравнение на линейность, если линейное, то находим корень
else if b<>0 then write('корней нет') else write('любое число') //если b не ноль то корней нет, если ноль, то корнем является любое число
для вывода ответа используется команда writeln(x);
после окончания программы пишем end.