Для выполнения функции ReadKey следует включить в пограмму стандартный модуль: CRT (USES CRT)

AB и CD - прямые

1 случай Если AB параллельна CD, общих точек у этих прямых нет

2 случай Если AB не параллельна CD, то у прямых одна общая точка

AB и CD отрезки

1 случай Если AB и CD параллельны, общих точек у этих отрезков нет

2 случай Если AB и CD не параллельны, то у них может быть общая точка, если они пересекаются в одной точке. Если же отрезки не пересекаются, общей точки нет.

AB прямая CD луч

1 случай Если AB и CD параллельны, общих точек у них нет

2 случай Если AB и CD не параллельны, то у них может быть общая точка, если луч пересекает прямую. Общей точки нет, если луч не пересекает прямую.

AB прямая

DC луч

Аналогичен описанному выше

1 случай Если AB и DС параллельны, общих точек у них нет

2 случай Если AB и DC не параллельны, то у них может быть общая точка, если луч пересекает прямую. Общей точки нет, если луч не пересекает прямую.