помогите найти количество одинаковых элементов массива в Delphi не знаю, что продумать

И чего ты не знаешь? Как проходить по массиву? Или как проверять числа на равенство? ИЛи как увеличивать числа? Что здесь сложного?? ?
Цикл идёт от нижнего до верхнего. Открой книгу и почитай как циклы запускать.