Даны катеты прямоугольного треугольника. Найти его гипотенузу. Составить программу.
Var a,b:real;beginwrite(Введите катеты: );read(a,b);writeln;write(Гипотенуза = ,sqrt(sqr(a)+sqr(b)):0:2);end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var a,b:real;beginwrite(Введите катеты: );read(a,b);writeln;write(Гипотенуза = ,sqrt(sqr(a)+sqr(b)):0:2);end.