Разбиение строки на строки(Pascal).

[Lappi]

Задание:
1.*Написать программу, организующую разбиение заданной строки на несколько строк в соответствии с задаваемым шаблоном-разделителем.
2.*Считывание строки и разделителя должно осуществляться с экрана и быть реализовано в виде отдельной подпрограммы с передачей параметра-строки по адресу.
3.*Разбиение строки должно выполняться в отдельной функции.
4.*Вывод результата необходимо выполнять с помощью отдельной подпрограммы.

Просьба написать программу с пояснениями, чтобы я был в силах разобраться)