Даны 2 целых числа m и n.напишите программу в pascal,которая вычитает из первого числа 100,если оно больше второго по абсолютной величине

var m,n: integer;
begin
write('Введите два числа: ');
readln(m,n);
if abs(m) > abs(n) then writeln(m-100);
end.