Вычислить y= │x-2│ по определению модуля на PascalABC
####################
program quess;
var x:integer;
begin
read(x);
write(abs(x-2));
end.