составить программу которая запрашивает длину 2-ух катетов прямоугольного треугольника и выводят гипотенузы.

C=a^2+b^2
c:= SQRT(a х а + b х b)
Продолжите пж.

Program z1;var a,b,c1,c2:real;beginwriteln('Введите катет A:');readln(a);writeln('Введите катет B:');readln(B);C1:=a*a+b*b;c2:=sqrt(c1);writeln('Гипотенуза в квадрате:',c1);writeln('Корень из гипотенузы:',c2);end.