Напишите программу для вычисления гипотенузы по катетам (паскаль) Спасибо

Question

Напишите программу для вычисления гипотенузы по катетам (паскаль)
Спасибо

Answer 1

Var g,c1,c2:real;
begin
readln(c1,c2);
g:=sqrt(sqr(c1)+sqr(c2));
writeln(g);
end.