Сортировка массива на Pascal

Дано:

одномерный массик х с размерностью m. Требуется разработать блок-схему алгоритма и соответствующую паскаль-программу.

Для решения задачи сдвинуть циклически массив вправо на k позиций, если в массиве имеется ровно k одинаковых элементов подряд и только один раз. В противном случае произвести смену флангов массива.

Предусмотреть отображение исходного массива и результирующего массива.

Будут вопросы - спрашивайте, ибо могли ошибиться с написанием условия.

P.S. Наполняем массив, естественно, рандомом.