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

   x-y, если x>y
z=
   y-x+1, в противном случае

var
 x,y,z:integer;
begin
x:=5;
y:=9;
if x>y then
 z:=x-y
else
 z:=y-x+1;
 
 writeln(z);
end.