ПОМОГИТЕ!!! С ИНФОРМАТИКОЙ! 30 БАЛОВ !

Question

ПОМОГИТЕ!!! С ИНФОРМАТИКОЙ! 30 БАЛОВ !

---

Answer 1

var x,y,z:real;
begin
readln(x,y);
z:=(x*x-y*y)/(x*x+y*y);
writeln('z = ',z:5:3);
end.

Пример:
5 2
z = 0.724