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

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