Написать в паскаль вычислить значение выражения y=|x|-2*|z| . входные данные вводятся пользователем с экрана. вывод так же на экран

Var x, z: integer;
begin
     readln(x, z);
     writeln('y(', x, ',', z, ') = |', x, '| - 2 * |', z, '| = ', abs(x) - 2 * abs(z));
end.