Паскаль:
Ввести переменные a, b, c (целые числа), если a>b, то c=a-b, если a вывести с

var a, b, c: integer;

begin

readln(a,b,c);

if (a>b) then

c:=a-b

else

writeln(c);

end.