Паскаль. Даны целые числа x и y. Вычислить: (x-y)/(1+xy)

Предыдущий
вопрос Следующий
вопрос

program Pascal;
var
x, y, result: real;
begin
write('Enter x: ');
readln(x);
write('Enter y: ');
readln(y);

result := (x - y) / (1 + x * y);

writeln('Result: ', result:0:2);
end.