Готовое решение задачи Паскаль. Решения Pascal. Задачи паскаль. Задачи pascal

Условие Задачи: Решение ТУТ

Дана последовательность натуральных чисел {Aj}j=1...n (n<=10000). Удалить из последовательности числа, содержащие хотя бы пару одинаковых цифр, а среди оставшихся продублировать числа, содержащие цифру 5.

___________________________________________________________