Построение перепндикуляра в Delphi

[Desha]

Это графическое решение задач линейного программирования.
На плоскости дана некая прямая (гардиент вектор), выходящая из начала координат(0,0). Известны координаты ее конца. Необходимо построить к ней перпендикуляр.

Пример: На этой картинке розовым цветом начерчена прямая. Она должна являться перпендикуляром к некой прямой. Вот как начертить эту некую прямую я и не знаю. Как высчитать координаты? Может там как то с углами можно...

З.Ы. может кого на мысли наведет - эта некая прямая должна быть перпендикулярна розовой линии (см. рисунок), а еще она должна соприкасаться с общей ОДЗ (там где пересекаются штриховки).

[MadReason]

греби в сторону линейной алгебры и аналитической геометрии

http://eek.diary.ru/p58930840.htm