Задание на языке паскаль: Ввести переменные A, B, C (целые числа), если A>B, то C=A-B, если A вывести C
var
A, B, C: integer;
begin
read(A, B, C);
if (A > B) then C := A - B
else write(C);
end.