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

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.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку