Question

Язык програмирования PASKAL/
задача:
Даны катеты прямоугольного треугольника .Найти его гипотенузу

Answer 1

program pr_1;
a, b:integer;
begin
a := readln()
b := readln()
writeln((a * a + b * b) ** 0.5);
end.