Сформировать одномерный целочисленный массив a размерностью n. запросить у пользователя индекс k и поменять местами два соседних элемента a [k -1] и a [k +1]. вывести на экран исходный и итоговый массивы. если k = 1 или n – вывести сообщение об ошибке.
139
224
Ответы на вопрос:
//pascal abc.net v3.1 сборка 1219 const n=10; var ar: array[1..n] of integer; k,i,c: integer; begin randomize; writeln('first array: '); for i: =1 to n do begin ar[i]: =random(9); write(ar[i]: 4); end; writeln; write('enter index: '); readln(k); if (k=1) or (n=1) then begin writeln('mwahahahaha(no)'); exit; end; c: =ar[k+1]; ar[k+1]: =ar[k-1]; ar[k-1]: =c; writeln('final array: '); for i: =1 to n do write(ar[i]: 4); end. пример работы программы: first array: 1 8 4 2 8 5 8 7 1 8 enter index: 3 final array: 1 2 4 8 8 5 8 7 1 8
## код на ruby 2.2.3p173 def lineuparraysize(num) cur_size = 4 while num > cur_size cur_size = 2 * cur_size + 8 end cur_size = 2 * cur_size + 8 end def getspiralneighbours(num) a = [] a[0] = [0, 0] a[1] = [-1, 1] moves = [[1, 0], [0, -1], [-1, 0], [0, 1]] move_direction = 0 side_size = 2 cur_size = 1 cycle = 1 mode_direction = 0 for i in 2..lineuparraysize(num) new_num = array.new(2) new_num[0] = a.last[0] + moves[move_direction][0] new_num[1] = a.last[1] + moves[move_direction][1] a[i] = new_num # p new_num cur_size += 1 if cur_size == side_size cur_size = 1 move_direction = (move_direction + 1) % 4 side_size += 1 if move_direction % 2 == 0 cycle += 1 if move_direction == 0 end end a.each_with_index do |i,x| p [x, i] if (i[0]-a[num][0]).abs < = 1 and (i[1]-a[num][1]).abs < = 1 end end getspiralneighbours(1090) вывод (числа и условные координаты) [962, [15, 16]] [1089, [15, 17]] [1090, [16, 17]] [1091, [16, 16]] [1224, [15, 18]] [1225, [16, 18]] [1226, [17, 18]] [1227, [17, 17]] [1228, [17, 16]]
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
katyat151024.07.2022 07:57
-
hewiky15.04.2022 19:27
-
prozorovamary2304.12.2020 14:19
-
ОляКatschanjukolaola30.03.2021 11:29
-
adweafd23.05.2021 20:44
-
НяшаНика06.08.2022 00:32
-
Stopnuyk201710.10.2020 16:31
-
Eliseyy04.03.2022 02:45
-
nasstya0510.08.2021 16:04
-
nastya0511214.05.2023 14:28
![Caktus Image](/tpl/img/cactus.png)
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.