Модули d Turbo Pascal

Запрограммировать решение нижеприведённой задачи. Процедурный тип и относящиеся к нему подпрограммы должны быть описаны в отдельном модуле. В другом модуле должна быть описана основная подпрограмма.
С помощью подпрограммы с параметром процедурного типа получить из двух векторов третий, каждый элемент которого равен меньшему элементу исходных векторов, и вектор, состоящий из сумм соответствующих компонентов исходных векторов.