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

Question

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

Answer 1

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