Работа со списками, pascal Опции

[fasty]

Необходимо выполнить до 5 января 3 лабы на паскале.
1 Написать рекурсивную процедуру или функцию, определяющую, предшествует ли один заданный символ другому заданному символу.Это нужно добавить в уже выполненную лабу,каторую я предоставлю.
2. Написать программу, позволяющую ввести элементы линейного списка и выполнить задание, указанное в варианте:
Написать процедуру, которая удаляет элемент списка перед каждым вхождением элемента X, если такой есть и отличен от X. Значение X вводить с клавиатуры
3.
Написать программу, позволяющую ввести элементы линейного списка и выполнить задание, указанное в варианте:
С клавиатуры вводятся слова и помещаются в D-список (info:string). Написать проце-дуру, которая меняет местами слова с четными и нечетными номерами (1-е со 2-м, 3-е с 4-м и т.д.).