Геометрическое моделирование. Паскаль

[Rêve]

Здравствуйте! Помогите пожалуйста с заданием. (Паскаль)
Задание: Построить равнобедренный треугольник по боковой стороне и высоте, которая опущена на основание.

[zetrix]

Словесное решение:

Пусть треугольник назван ABC (ВС - основание). AH - высота, H - точка на основании.

высота (AH - известно), половина основания (BH - искомое) и боковая сторона (AB - известно) = прямоугольный треугольник (AHB) с гипотенузой АВ.

Находим по теореме Пифагора половину основания, затем умножаем на два (т.к. высота в равнобедренном треугольнике, опущенная к основанию = гипотенузе = медиане), чтобы найти всё основание BC.
Итак, теперь строим на экране основание (мы его уже знаем BC = 2*BH). Находим середину (элементарно среднее по Х-координате точек В и С), это будет точка Н. Затем из неё строим высоту AH (она известна по условию). Всё, все вершины треугольника отображены на экране, осталось их соединить.

Теперь спрашивайте, что вы не можете сделать в Паскале? Работа в графическом режиме в достаточной мере есть в самом хелпе Паскаля (даже старого доброго турбопаскаля).