Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.56/9: Рейтинг темы: голосов - 9, средняя оценка - 4.56
0 / 0 / 0
Регистрация: 08.02.2014
Сообщений: 20

Отсортировать элементы четных строк матрицы по возрастанию, а нечетных - по уменьшению значения

04.03.2014, 14:19. Показов 1799. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Отсортировать элементы четных строк матрицы по возрастанию, а нечетных - по уменьшению значения.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
04.03.2014, 14:19
Ответы с готовыми решениями:

Отсортировать элементы четных строк матрицы по возрастанию значения, а нечетных - по убыванию значения
Помогите написать код, с описанием(Новичок). Отсортировать элементы четных строк матрицы по возрастанию значения, а нечетных - по...

Элементы массива на четных позициях отсортировать по возрастанию, а на нечетных – по убыванию
вот задание: Составить программу для сортировки массива размерностью элементов целого типа по следующему принципу: элементы на...

Отсортировать элементы вектора, на нечетных местах - по убыванию, на четных местах - по возрастанию
дан вектор размера n состоящий из целых положительных и отрицательных элементов отсортировать вектор о следующему правилу элементы...

2
191 / 161 / 116
Регистрация: 14.09.2013
Сообщений: 302
09.03.2014, 13:54
Лучший ответ Сообщение было отмечено adams1995 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
var
  a: array[1..1000, 1..1000] of longint;
  n, m, i, j, jj, t: longint;
  
begin
  readln(n, m);
  for i := 1 to n do
    for j := 1 to m do read(a[i, j]);
  for i := 1 to n do
    begin
      if i mod 2 <> 0
        then Begin
               for j := 1 to m do
                 for jj := j + 1 to m do
                   if a[i, j] > a[i, jj]
                     then begin
                            t := a[i,j];
                            a[i, j] := a[i, jj];
                            a[i, jj] := t
                          end
             End
        else Begin
               for j := 1 to m do
                 for jj := j + 1 to m do
                   if a[i, j] < a[i, jj]
                     then begin
                            t := a[i, j];
                            a[i, j] := a[i, jj];
                            a[i, jj] := t
                          end
             End
    end;
  for i := 1 to n do
    begin
      for j := 1 to m do write(a[i, j],' ');
      writeln
    end
end.
1
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33376 / 21500 / 8236
Регистрация: 22.10.2011
Сообщений: 36,895
Записей в блоге: 11
11.03.2014, 03:26
AlexKolc, зачем это дублирование кода?

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
// ...
  readln(n, m);
  for i := 1 to n do
    for j := 1 to m do a[i, j] := random(200); // read(a[i, j]);
  for i := 1 to n do
  begin
    for j := 1 to m do
      for jj := j + 1 to m do
        if (a[i, j] > a[i, jj]) = not odd(i) 
          // или 
          // if (a[i, j] > a[i, jj]) = (i mod 2 = 0)
        then begin
          t := a[i, j];
          a[i, j] := a[i, jj];
          a[i, jj] := t
        end
  end;
  for i := 1 to n do
  begin
    for j := 1 to m do write(a[i, j], ' ');
    writeln
  end;
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
11.03.2014, 03:26
Помогаю со студенческими работами здесь

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

Элементы нечетных строк матрицы сдвинуть циклически влево, а элементы четных - вправо
Дана целочисленная квадратная матрица. 1) Элементы строки с четными значениями циклически сдвинуть влево на количество элементов, равное...

Отсортировать по убыванию элементы, стоящие на четных местах, а элементы стоящие на нечетных местах - по возрастанию
Дан вектор размером N. Отсортировать по убыванию элементы, стоящие на четных местах, а элементы стоящие на нечетных местах - по возрастанию

Элементы массива с нечетных позиций необходимо отсортировать по возрастанию, с четных - по убыванию
Значит есть одномерный массив из 10 чисел. Заполнен случайными значениями. Числа расположенные на нечетных позициях необходимо...

Сортировка четных строк матрицы по возрастанию, а нечетных - по убыванию
Здравствуйте! Есть задача: отсортировать чётные строки массива А по возрастанию, а нечётные по убыванию. Написал следующий код: ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Загрузка PNG-файла с альфа-каналом с помощью библиотеки SDL3_image на Android
8Observer8 27.01.2026
Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
влияние грибов на сукцессию
anaschu 26.01.2026
Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru