Решить уравнение ax + b = 0 на Паскале

Для решения уравнения $ax + b = 0$ на языке программирования Паскаль, нам нужно выразить переменную $x$ через другие переменные. Сначала преобразуем уравнение:

Далее, в программе на Паскале можно реализовать решение этого уравнения следующим образом:

pascal
Копировать код
program SolveEquation;
var
  a, b, x: real;
begin
  { Вводим значения для a и b }
  writeln('Введите значение a:');
  readln(a);
  writeln('Введите значение b:');
  readln(b);
  
  { Проверяем, что a не равно 0, чтобы избежать деления на ноль }
  if a = 0 then
    writeln('Ошибка: a не может быть равно 0!')
  else
    begin
      { Вычисляем значение x }
      x := -b / a;
      writeln('Решение уравнения: x = ', x:0:2);
    end;
end.

Пояснение:

1. Программа сначала запрашивает ввод значений для $a$ и $b$.

2. Далее проверяется, что $a \neq 0$, потому что при $a = 0$ уравнение теряет смысл (деление на ноль).

3. Если $a \neq 0$, вычисляется значение $x$ по формуле $x = \frac{-b}{a}$.

4. Результат выводится с точностью до двух знаков после запятой.

Это простое решение линейного уравнения, которое корректно обрабатывает случай с $a = 0$.