ПОМОГИТЕ!!! С ИНФОРМАТИКОЙ! 30 БАЛОВ !
Приложения:

Ответы на вопрос
Ответил petyaGavrikov
0
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
begin
readln(x,y);
z:=(x*x-y*y)/(x*x+y*y);
writeln('z = ',z:5:3);
end.
Пример:
5 2
z = 0.724
Новые вопросы