Question

Решить линейное уравнение ax+b=0, a и b ввести с клавиатуры (программу написать на языке Паскаль).

Answer 1

var a, b, x: real;

begin

   readln(a, b);

   x:= -1 * b / a;

   writeln(x)

end.

Answer 2

Я могу помочь вам решить линейное уравнение ax + b = 0 на языке Паскаль. Вот пример программы, которая считывает значения a и b с клавиатуры и выводит корень уравнения, если он существует:

program solve_linear_equation;
var
  a, b, x: real;
begin
  writeln('Введите коэффициенты a и b:');
  readln(a, b);
  if a = 0 then
    writeln('Уравнение не имеет решения, так как a = 0')
  else
    begin
      x := -b / a;
      writeln('Корень уравнения x = ', x:0:2);
    end;
end.

Вы можете запустить эту программу на онлайн-компиляторе Паскаля, например, [здесь]. Надеюсь, это вам поможет.