Проход по комментариям я уже где-то исправлял (кажется, в старых тулзовинах для поддержки олимпиад в старых школьных конфигурациях ББ).
Подсказывать не буду.
Идея технически простая, но не сразу зашоренным очам видная.
Пример на самом деле, что называется, парадигматический и давно включен в мой курс.

А на Вирта наезжать не надо -- ему простительно. Почему -- я объяснял в предисловии к "Алгоритмам".

На всякий случай прилагаю свою подсказку, тоже запароленную.

(Интересно, зачем 4 раза без пароля скачивали
Пароль -- paraliter.
В смысле по логике цикла его "бегунком" является пара литер, что и следует реализовать для полной очевидности.)