Олимпиадные задачи по программированию. Лучшие решения. Часть 1. Ускова О.Ф - 61 стр.

UptoLike

перпендикуляра и прямой, координаты самой ближней к прямой
точки .
б) Существует третья точка, для которой выполняется условие:
перпендикуляр из этой точки к прямой и отрезки , соединяющие эту
точку с двумя заданными, образуют угол 120 градусов. На выходе:
длина перпендикуляра + сумма расстояний, координаты третьей
точки и ее проекции на прямую.
в) аналогично 1).
3. Программная реализация
Program Tubes; {Автор Поляков А.Е.}
Var X1,Y1,X2,Y2,A,B,C:LongInt;
Procedure Init;
{Инициализация}
Var F:Text;
Begin
Assign(F,'input.txt');ReSet(F);
ReadLn(F,A,B,C);
ReadLn(F,X1,Y1);
ReadLn(F,X2,Y2);
Close(F)
End;
Function TestLocation:Boolean;
{Проверка местонахождения заданных точек
Возвращает True, если точки расположены с одной стороны , и
False в противном случае }
Begin