Вычислите высоту треугольника, опущенную на сторону a, по известным значениям длин его сторон a, b,c. программу для решения в паскале, пожалуйста.

1

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

2013-05-12T23:24:48+04:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

Program treygolnik;

Var A, B, C: integer;

H, P: real;

Begin

Write ('Введите сторону А');

Read (A);

Write ('Введите сторону B');

Read (B);

Write ('Введите сторону C');

Read (C);

P:= (A + B + C)/2;

H:= (2*(Sqr(P * (P - A) * (P - B) * (P - C))) / A;

Write ('Длина высоты Н =' , Н);

End.