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

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