Даны числа x и y. Вычислить их сумму, разность и произведение — Pascal(Паскаль)

program Dekio;

var
  x, y: integer;

begin
  writeln('Введите x, y');
  readln(x, y);
  writeln('Сумма ', x + y);
  writeln('Разность ', abs(x - y));
  writeln('Произведение ', x * y);

end.