Question

ввести переменные A, B, C (целые числа), если A>B, то C=A-B, если A вывести C

Answer 1

var A, B, C: integer;

begin

readln(A, B, C);

if (A>B) then

C:=A-B

else

writeln(C);

end.