Ответы на вопрос:
Const nm = 100; {максимальная длина массива} var i, j, n, step, t: integer; a: array[1..nm] of integer; begin write('введите количество элементов в массиве: '); readln(n); write('введите элементы массива через пробел '); for i : = 1 to n do read(a[i]); { сортировка методом шелла } step : = n div 2; while step > 0 do begin for j : = n - step downto 1 do begin i : = j; while i < = n - step do begin if a[i] > a[i + step] then begin t : = a[i]; a[i] : = a[i + step]; a[i + step] : = t end; i : = i + step end end; step : = step div 2 end; writeln('*** отсортированный массив ***'); for i : = 1 to n do write(a[i], ' ') end. тестовое решение: введите количество элементов в массиве: 15 введите элементы массива через пробел 15 26 -35 7 0 21 5 9 27 0 -11 26 4 42 -23 *** отсортированный массив *** -35 -23 -11 0 0 4 5 7 9 15 21 26 26 27 42
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
йфцыяувчкасепм09.07.2021 13:35
-
dimanyapr24.03.2022 01:28
-
vikulka148810.09.2022 17:34
-
subbotina1701.12.2021 13:41
-
ammmisha200618.07.2021 13:14
-
Lidyanka13.12.2021 16:04
-
baha2001zzz05.05.2022 17:27
-
ufvsjfhgdgkhdvj29.10.2022 05:07
-
рпрситмиср31.05.2023 12:25
-
Единорог2000126.06.2021 23:47
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.