Купить Решение к задаче по файлам 31 (Pascal)

Решение к задаче по файлам 31) Создать файл, где компонентой будет массив из N целых чисел. Найти среднее арифметическое положительных чисел каждой компоненты и записать их в новый файл. Компоненты с минимальным и максимальным средним арифметическим поменять местами в исходном файле.

Код написан на языке Pascal , с помощью программы Pascal ABC.