даны катеты прямоугольно треугольника а и б найти его гипотенузу с и периметр c=Sqrt(a2+b2), P=a+b+c
Ответы
Ответ дал:
0
var
a, b, c: real;
begin
Readln(a, b);
c := sqrt(a * a + b * b);
writeln('c = ', c);
writeln('P = ', a + b + c);
end.
a, b, c: real;
begin
Readln(a, b);
c := sqrt(a * a + b * b);
writeln('c = ', c);
writeln('P = ', a + b + c);
end.
Похожие вопросы
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад