Var x,y,z:real;
begin
read(x,z);
y:=(x*x+z*z)/sqrt(x*z);
writeln(y);
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.