Массивы в Делфи.
Помогите с заданием,не могу разобраться,как записать условие отбора элементов для массива

Спасибо огромное за ответ!Но я так понимаю,это код для паскаля?Не могли бы вы подсказать,как все это оформить в среде Делфи?