1.Скласти програму для обчислення гіпотенузи прямокутного трикутника
(Паскаль)
Var
A, B, C: real;
begin
writeln(Введите сторону A);
readln(A);
writeln(Введите сторону B);
readln(B);
C := sqrt((a * a) + (b * b));
writeln(Гіпотенуза прямокутного трикутника дорівнює , c);
end.
Оцени ответ
