Составьте программу на языке программирования Паскаль для решения следующей задачи:

Даны катеты прямоугольного треугольника a и b. Найти его периметр P.
\( $c = (a^2 + b^2)^{1/2}, P = a + b + c$ \)

• program N;
• var a, b, c, P: real;
• begin
• readln\(a, b\);
• c := sqrt\(sqr\(a\) + sqr\(b\));
• P := a + b + c;
• writeln\('Периметр прямоугольного треугольника равен: ',P\);
• end.