var
a, b : integer
R : real
begin
R = 0;
readln ( a, b );
R = ( a ^1/2 + b^1/2) / (( a^2 + b^2)^1/2);
writeln (R);
end.
Объяснение:
var
a, b : integer
R : real
begin
R = 0;
readln ( a, b );
R = ( a ^1/2 + b^1/2) / (( a^2 + b^2)^1/2);
writeln (R);
end.
Объяснение: