1.Скласти програму для обчислення гіпотенузи прямокутного трикутника
(Паскаль)

varA, B, C: real;beginwriteln('Введите сторону A');readln(A);writeln('Введите сторону B');readln(B);C := sqrt((a * a) + (b * b));writeln('Гіпотенуза прямокутного трикутника дорівнює ', c);end.