Составить программку,которая уменьшит 1-ое число в 5 раз,если оно больше второго

var
x, y : integer;
z : real; // переменной z присваиваем тип real, поскольку она может принимать дробные значения.

begin
write ( Введите первое число: );
readln ( x );
write ( Введите второе число: );
readln (y);
if абс (x) gt; абс (y) then z := x / 5;
writeln (z);
end.