Цикл Для каждого Pascal-23+

Упражнение на нахождение ошибок в цикле "Для каждого" на языке Pascal/