как найти количество одинаковых елементов одномерного массива (паскаль)?

1. Отсортировать массив по возрастанию.
2. В цикле перебрать все элементы и повторы.