Влототроне по порядку лежат шары с номерами от 100 до 200. он выбрасывает каждый седьмой. составьте алгоритм для определения номеров выпавших шаров. цикл с предусловием. на языке паскаль.
295
311
Ответы на вопрос:
Var i: integer; begin i: =100; while (i+7< 200) do begin inc(i,7); write(i,' '); end; end.
Const nm = 100; type mas = array[1..nm] of integer; procedure shell(var a: mas; n: integer); { сортировка методом шелла } var i, j, step, t: integer; begin 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 + 1]; a[i + 1] : = t end; i : = i + step end end; step : = step div 2 end end; var x: mas; i, n: integer; begin randomize; write('введите число элементов в массиве (1-100): '); readln(n); writeln('исходный массив'); for i : = 1 to n do begin x[i] : = random(101) - 50; write(x[i]: 4) end; shell(x, n); writeln(#13#10, 'отсортированный массив'); for i : = 1 to n do write(x[i]: 4) end. тестовое решение: введите число элементов в массиве (1-100): 20 исходный массив -8 -17 -19 1 -3 23 -33 30 -27 -45 12 26 -24 18 37 8 47 -14 -19 -3 отсортированный массив -45 -33 -27 -24 -19 -19 -17 -14 -8 -3 -3 1 8 12 18 23 26 30 37 47
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
NOKANplay25.10.2021 02:03
-
Ануар2211.11.2020 03:03
-
фарангиз503.09.2022 15:17
-
0динокийхомяк09.03.2020 17:36
-
БейшеналиеваГ31.05.2021 21:19
-
flelf30.04.2021 16:15
-
Vladyslav200911.03.2023 15:50
-
NastyaKoryak05.06.2021 03:00
-
2dybala123.06.2020 17:00
-
moonmyrreg28.06.2020 15:38
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.