В прямоугольном треугольнике известны катет и гипотенуза. Найдите другой катет. решить...

Question

В прямоугольном треугольнике известны катет и гипотенуза. Найдите другой катет. решить программным способом

Answer 1

Var a,b,c:real;
begin
write('Катет и гипотенуза:');
readln(a,c);
b:=sqrt(abs(c*c-a*a));
writeln('b = ',b);
end.

Пример:
Катет и гипотенуза:3 5
b = 4