язык програмирования PASKAL/
задача:
Даны катеты прямоугольного треугольника a и b.Найти гипотенузу c и P периметр:
P=a+b+c
c=корень из a2+b2
РЕШИТЕ ПОЖАЛУЙСТА СРООООЧНО!!!!))))***

Program z1;var a,b,c,P:real;beginWriteln('Введите стороны a и b: ');Write('a = '); read(a);Write('b = '); read(b);c:=sqrt(sqr(a)+sqr(b));P:=a+b+c;Writeln('Гипотенуза равна: ',c);Writeln('Периметр треугольника равен: ',P);end.