Помогите составить программу "Найти гипотенузу по известным катетам a, b"

1

Ответы и объяснения

Лучший Ответ!
2013-11-18T21:21:05+00:00
Program lanrius;
var a,b:integer;   
c:real;
begin
write('a=');read(a);
write('b=');read(b);
c:=sqrt(sqr(a)+sqr(b));
write('c=',c);
end.