Катеты прямоугольного треугольника A и B соответственно равны 125, 127. Написать программу, определяющую площадь и периметр треугольника.

Question

Софьюшка

5 мая, 16:40

+4

Ответы (1)

Знаешь ответ?

Арнольд · Answer 1

Var

a, b, c: Real;

begin

a : = 125;

b : = 127;

c : = sqrt (sqr (a) + sqr (b));

Writeln ('S = ', a * b / 2);

Writeln ('P = ', a + b + c);

end.