Question

ЗАДАЧА. Разработать алгоритм вычисления гипотенузы прямоугольного треугольника по известным значениям длин его катетов а и b.​

Answer 1

var a, b:integer;

begin

write('Введите длину первого катета: ') ;

readln(a);

write('Введите длину второго катета: ') ;

readln(b);

write('Гипотенуза равна: ', sqrt(a*a+b*b))

end.