[Ollympiya]

Составить программу решения задачи на Delphi: Даны целые числа а1,..., аn. Для каждого из чисел, входящих в последовательность, выяснить сколько раз оно вхо¬дит в эту последовательность.