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

Question

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

Answer 1

Var
 a,x,b,rez:integer;
Begin
 readln(a,x,b);
 rez:= (a*x)-b;
 writeln(rez);
End.