В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
PavelOlga
PavelOlga
21.05.2023 12:02 •  Информатика

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

Показать ответ
Ответ:
Celebrat
Celebrat
06.10.2020 20:28
// 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
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота