Помогите Паскаль составить программу Отсортировать 4 столбец двумерного массива по

Помогите Паскаль составить программку
Отсортировать 4 столбец двумерного массива по возрастанию (8 на 8)

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3, сборка 1547 от 07.10.2017
// Внимание! Если программка не работает, обновите версию!

begin
  Writeln('*** Начальный массив ***');
  var a:=MatrRandom(8,8,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  a.SetCol(3,a.Col(3).OrderBy(x-gt;x).ToArray);
  Writeln('*** Приобретенный массив ***'); a.Println(4)
end.

Пример
*** Начальный массив ***
  77  68  79 -85  30 -28 -11  85
 -52 -62 -94 -30 -82  31 -16 -80
 -97 -95  84 -62 -53   5  68 -23
  53   7  38  10 -88 -66  98  85
 -99 -31  -6  71  32  -2  84 -87
  45  46 -35  -2 -97 -46 -76 -66
 -18 -10  72 -95  73 -55  -7 -27
  99   3 -39 -77  33  78  73 -85
--------------------------------
*** Приобретенный массив ***
  77  68  79 -95  30 -28 -11  85
 -52 -62 -94 -85 -82  31 -16 -80
 -97 -95  84 -77 -53   5  68 -23
  53   7  38 -62 -88 -66  98  85
 -99 -31  -6 -30  32  -2  84 -87
  45  46 -35  -2 -97 -46 -76 -66
 -18 -10  72  10  73 -55  -7 -27
  99   3 -39  71  33  78  73 -85
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт