Question

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

Answer 1

Var a,b:real; begin write('Введите катеты: '); read(a,b); writeln; write('Гипотенуза = ',sqrt(sqr(a)+sqr(b)):0:2); end.