Опубликовано 26.01.2018 по предмету Информатика от Гость

Дан двумерный массив чисел 8 x 7. Отсортировать строки массива в порядке возрастания.
Язык pascal

Ответ оставил Гость

// PascalABC.NET 3.3, сборка 1540 от 16.09.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(*** Исходный массив [,8,,,7,] ***);
  var a:=MatrRandom(8,7,-99,99);
  a.Println(4); Writeln(4*a.ColCount*-);
  for var i:=0 to a.RowCount-1 do begin
    a.SetRow(i,a.Row(i).Sorted.ToArray)
    end;
  Writeln(*** Результирующий массив ***);
  a.Println(4)  
end.

Пример
*** Исходный массив [8,7] ***
 -45 -24  26  38 -83 -97  77
  15 -68  80 -47   3 -61 -52
 -71  70 -52  46  70  59 -15
 -66 -20 -32  82  63   1  76
  93 -99 -38  22  83 -36 -42
  53  17 -19  -7  47  12 -58
  53  21  40 -88 -89  65  80
 -73 -16 -78 -62   3  18 -79
----------------------------
*** Результирующий массив ***
 -97 -83 -45 -24  26  38  77
 -68 -61 -52 -47   3  15  80
 -71 -52 -15  46  59  70  70
 -66 -32 -20   1  63  76  82
 -99 -42 -38 -36  22  83  93
 -58 -19  -7  12  17  47  53
 -89 -88  21  40  53  65  80
 -79 -78 -73 -62 -16   3  18

Не нашел нужный ответ?

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.


Найти другие ответы