Если два числа равны , то вывести их сумму, а иначе модуль разности

Program task;
var a, b:integer;
begin
write('Введите числа : ');
read(a,b);
if a=b then writeln('Сумму чисел = ', a+b)
else writeln('Модуль разности = ',abs(a-b) );
end.