Pascal ABC, обработка массива

На скриншоте задание, не совсем понимаю, как сделать именно такой алгоритм, прошу помощи :D