Процедурний тип //Pascal

Прошу помощи в решении данной задачи:
4 прямые заданные массивом линейных функций: l(x) = kx+b. Решить задачу анализа взаимного размещения прямых при использовании одной процедуры (подобрать прямые, чтоб они пересекались, совпадали и были параллельны ).