Ответы на вопрос:
//pascal abc.net 3.1 сборка 1219 const n=10; var ar: array[1..n] of integer; i,j,c: integer; begin randomize; readln(c); writeln('array: '); for i: =1 to n do begin ar[i]: =random(-10,10); write(ar[i]: 4); end; for i: =1 to n-1 do for j: =i+1 to n do if (ar[i]> ar[j]) and (ar[i]< 0) and (ar[j]< 0) and (ar[i] mod c=0) and (ar[j] mod c=0) then swap(ar[i],ar[j]); writeln; writeln('final array: '); for i: =1 to n do write(ar[i]: 4); end. пример ввода: 2 пример вывода: array: -7 3 9 -2 7 -7 3 -6 -6 -3 final array: -7 3 9 -6 7 -7 3 -6 -2 -3
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
klychkovs6625.08.2020 17:08
-
денис113912.10.2021 03:55
-
ivan08020602.04.2023 06:41
-
lilyabelousova31.08.2020 19:42
-
kripto12307.02.2021 03:46
-
tema1011200909.12.2020 12:39
-
6df531.10.2022 07:24
-
VF8505.09.2020 11:02
-
алекей402.08.2021 21:39
-
qwdv21.02.2022 08:33
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.