Создать файл, где каждая компонента массив из 10 чисел...

[Hitzor]

Создать файл, где каждая компонента массив из 10 чисел. Определить среднее арифметическое положительных чисел каждой компоненты. Эти средние записать в новый файл и определить номер компоненты с максимальным значением. Результат вывести на дисплей

[Serge_Bliznykov]

типичная задача на типизированные файлы.
их на форуме было - не пересчесть!

начало примерно такое:

type  MyArr = array[1..10] of integer;

var
   MyFile : file of MyArr;
   OneElemnet : MyArr;
....