Program Gipotenuza;
var a,b,c:real;
begin
writeln('Введите сторону a: ');
readln(a);
writeln('Введите сторону b: ');
readln(b);
c:=sqrt(a*a+b*b);
writeln('Гипотенуза равна: ', c);
end.
Program Gipotenuza;
var a,b,c:real;
begin
writeln('Введите сторону a: ');
readln(a);
writeln('Введите сторону b: ');
readln(b);
c:=sqrt(a*a+b*b);
writeln('Гипотенуза равна: ', c);
end.