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

//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.