Write a program in Pascal (ABC) to solve a simple linear equation.

var
a, b, c, x: real;

begin
// implement input

writeln (‘Solving a simple linear equation ax + b = c’);
write (‘Enter coefficient a:’);
readln (a);
write (‘Enter b:’);
readln (b);
write (‘Enter c:’);
readln (c);

// calculate x
x: = (c-b) / a;

// output the result
writeln (‘The solution to the equation’, a, ‘x +’, b, ‘=’, c, ‘is x =’, x);
end.