Есть ответ 👍

Вдвумерном массиве [1..6,1..7] поменять местами 1 и 2, 3 и 4, 5 и 6 строки.

250
276
Посмотреть ответы 3

Ответы на вопрос:


// pascalabc.net 3.2, сборка 1417 от 28.03.2017 // внимание! если программа не работает, обновите версию! begin   writeln('*** исходный массив [6,7] ***');   var a: =matrrandom(6,7,-99,99);   a.println(4); writeln(4*a.colcount*'-');   writeln('*** результирующий массив [6,7] ***');   for var i: =0 to 2 do a.swaprows(2*i,2*i+1);   a.println(4) end. пример *** исходный массив [6,7] ***   16 -26 -12  33  39 -28  -6   15 -77  15  63 -30 -59 -62   -14  -3 -94  42  49  86  95   -74  75 -69 -44 -43  -2 -62   -68  82 -36 -30 -92 -88  34   -34  16  81 -67    4  -8  80 *** результирующий массив [6,7] ***   15 -77  15  63 -30 -59 -62   16 -26 -12  33  39 -28  -6   -74  75 -69 -44 -43  -2 -62   -14  -3 -94  42  49  86  95   -34  16  81 -67    4  -8  80   -68  82 -36 -30 -92 -88  34
linkingday
4,7(17 оценок)

  const     n = 6;     m = 7; var     a: array[1..n,1..m] of integer;     i,j,b: integer; procedure obmen(n1,n2: integer); var     j: integer; begin for j: = 1 to m do       begin       b: =a[n1,j];       a[n1,j]: =a[n2,j];       a[n2,j]: =b;       end; end; begin writeln('исходный массив: '); for i: = 1 to n do       begin       for j: = 1 to m do               begin               a[i,j]: =random(21)-10;               write(a[i,j]: 3,' ');               end;       writeln;       end; writeln('изменённый массив: '); obmen(1,2); obmen(3,4); obmen(5,6); for i: = 1 to n do       begin       for j: = 1 to m do               write(a[i,j]: 3,' ');       writeln;       end; end. исходный массив:   -1    8  -2    3  -7    3 -10   -4    8    6    2  -1  10  -8   -5  -7    0    2  -6  -2    4   10  -1  -6  -5    2    2  -7   7  -2    8  -8  -3    7  -2   -9  -7    9    2  -2    3  -6 изменённый массив:   -4    8    6    2  -1  10  -8   -1    8  -2    3  -7    3 -10   10  -1  -6  -5    2    2  -7   -5  -7    0    2  -6  -2    4   -9  -7    9    2  -2    3  -6   7  -2    8  -8  -3    7  -2

mail ru

В mail ru можно получать и отправлять почту.

если я не ошибаюсь там можно еще играть, задавать вопросы или отвечать на др вопросы.

Объяснение:

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

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

Подпишись на наш телеграмм канал

GTP TOP NEWS