Решите пункты а) и б) пожалуйста!!
а) Задан линейный массив. Преобразовать его элементы по следующему правилу:
Элементы, большие числа X , заменить на X, а элементы меньшие Y, на число -Y. Числа X и Y вводятся (x>y).
б) Задан линейный массив. Преобразовать его элементы по следующему правилу:
Элементы, кратные 3 оставить без изменения, а остальные заменить остатком от деления на 3.

Напмши саму программу в паскале

а)Начало ->  Ввод массива ->  Ввод X ->  Ввод Y ->  Если X>Y ->no->End ->yes-> p=0 -> ∨-> если элемент массива (p) > X, элемент массива (p) = X ->  если элемент массива (p) < Y, элемент массива (p) = Y ->  p = p + 1 -> если p больше размера массива      если нет -> Возврат на ∨      если да -> Вывод массива -> Конецб)Начало ->  Ввод массива ->  p=0 -> ∨-> если элемент массива (p) %(остаток от деления на) 3=0->yes->->no-> элемент массива (p) =элемент массива (p)%3->p=p+1->если p больше размера массива      если нет -> Возврат на ∨      если да -> Вывод массива -> Конец