Question

5. Даны катеты прямоугольного треугольника a и b. Найти его гипотенузу c и периметр P.Справка: c = , P = a + b + c.

Answer 1

//Pascal
var a, b, c: real;
begin
     readln(a, b);
     c := sqrt(sqr(a) + sqr(b));
     writeln('C = ', c, #13, 'P = ', a + b + c);
end.