Даны два катета прямоугольного треугольника найти его гипотенузу Решите через поскаль

Question

Даны два катета прямоугольного треугольника найти его гипотенузу
Решите через поскаль

Answer 1

Program test;
var
a,b,g:real;
begin
Writeln('Длина катетов a,b: ');
readln(a,b);
g:=sqrt(sqr(a)+sqr(b));
writeln(g);
end.