как читать с файла Опции

[maksimla]

как вот это прочитать правильно с файла
вот первые две цывры могу прочитать первая цыфра идет для того чтобы узнать сколько в строчке будет цыфр врорая для того чтобы длину определить на следущий строчке идет первые три цыфры которые надо сравнивать с остальными как мне это все хорошо прочитать все цыфры
3 6
7 4 4
1 8 2
5 5 5
3 2 1
7 4 5
1 1 7
6 3 2

[samec]

for j := 1 to c do
begin
 for i := 1 to n do {<-- вот тут счетчик цикла - i}
  begin
   read (pradDuom,a[i] );
   if i=3  then
    begin
     sort(a,n); 
     for i:=1 to n do {<-- и здесь во вложенном цикле тоже используешь счетчик i - так делать не надо }
     writeln(a[i]);
    end;
  end;
writeln;
end;

с твоим кодом сортироваться у тебя будут вссегда только числа из первой считанной строки чисел, а на экран выводиться только последнее число из каждой строки чисел.
Как то это всё неправильно.
Предлагаю тебе вместо одномерного массива, воспользоваться двумерным массивом. Сначала считай в него из файла все числа, а затем сортируй их как хочешь
примерно так:

for j := 1 to c do
begin
 for i := 1 to n do 
  begin
   read (pradDuom,a[j,i] );
   writeln(a[j,i]);
  end;
writeln;
end;
sort(a,c,n);

процедуру сортировки и описание типа "mas" видоизмени сам.