25 . упорядочите список дан список чисел: 3, 7, 1, 6, 2, 4, 8, 5. разрешается за одну операцию поменять местами два любых числа в этом сjjиске. например, если поменять местами числа 6 и 8, то получится список 3, 7, 1, 8, 2, 4, 6, 5. упорядочите этот список по возрастанию, то есть получите из него список 1, 2, 3, 4, 5, 6, 7, 8, используя минимальное число обменов. решение этой нужно записать в виде последовательности обменов, каждый обмен записывается в одной строке. один обмен записывается в виде двух различных чисел от i до 8, которые нужно поменять местами, записанных через пробел (пример: 6 8 чем меньше обменов будет содержать ваше решение, тем больше вы получите (при условии, что предложенный порядок обмена действительно упорядочивает список).

1 и 7
3 и 1
6 и 2
4 и6
5 и 8
2 и 3
4 и 7
5 и 6
3 и 4
6 и 7

//PascalABC.Net 3.0, сборка 1064
type
  IntArray = array of integer;

var
  rows, cols: integer;
  M: array of IntArray;

begin
  Write('Количество строк и столбцов матрицы: '); Read(rows, cols);
  var Avg: array of double := new double[cols];
  M := new IntArray[rows];
  SetLength(Avg, cols);
  for var i := 0 to rows - 1 do
  begin
    M[i] := ArrRandom(cols, -25, 25);
    M[i].Println(#9)
  end;
  for var j := 0 to cols - 1 do
    Avg[j] := Range(0, rows - 1).Select(x -> M[x, j]).Average;
  Writeln('Наименьшее среднее по столбцам равно ', Avg.Min)
end.

Тестовое решение:
Количество строк и столбцов матрицы: 5 8
-22    -8    12    7    3    -18    8    22
2    -16    17    -13    -10    0    -19    2
20    -21    -6    13    2    -20    25    24
-7    -3    -2    -10    -2    8    18    23
4    -21    -8    8    23    -12    -13    -5
Наименьшее среднее по столбцам равно -13.8

Принципы здорового и осознанного образа жизни распространяются как новая религия планетарного масштаба — им учат в школах и за их соблюдением пристально следит общество.Активно распространяется интернет всего — к нему подключается все больше устройств, производство становится безлюдным, концепция Индустрии 4.0 доминирует не только в развитых, но и во многих развивающихся странах.Яркая черта периода. Каждый третий хотя бы раз задумывается о биохакинге — попытке «взломать» генетически заданный уровень здоровья и продолжительность жизни.Маловероятное событие (джокер). Наступает «инновационная зима» — самые масштабные инвестиции в передовые научные разработки не оправдаются. Результаты пока далеки от обещанных фундаментальных прорывов — начиная от искусственного интеллекта и заканчивая медициной, не говоря уже о скорости их распространения в сложных многоукладных экономиках.