Дан массив натуральных чисел заданных случайным образом из диапазона от 0 до 20 и число х из этого же диапазона. длина массива равна n. вставить число х после первого элемента кратного пяти
287
300
Ответы на вопрос:
Const nmax=20; var a: array [1..nmax+1] of byte; n, j, i: byte; x: integer; begin repeat write('количество элементов, не более ', nmax, ', n='); readln(n); until n in [1..nmax]; for i: =1 to n do a[i]: =random(21); writeln('исходный массив'); for i: =1 to n do write(a[i]: 4); writeln; i : = 1; while (a[i] mod 5< > 0) and (i< n) do inc(i); if (i< n) or ((i=n) and (a[i] mod 5=0)) then begin write('x='); readln(x); for j: =n downto i+1 do a[j+1]: =a[j]; a[i+1]: =x; inc(n); end else writeln('нет элемента с заданными свойствами'); writeln('преобразованный массив'); for i: =1 to n do write(a[i]: 4); writeln; readln; end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Kotliarrostislav01.04.2021 10:47
-
Eeerok3321.04.2022 19:21
-
meriko204.02.2021 14:27
-
TanushaGuda01.08.2022 04:19
-
natalyacomandi05.08.2020 16:16
-
kurtenokalina217.01.2023 22:37
-
Karakatica4409.11.2020 14:43
-
xile4t12.04.2021 10:05
-
Cyndyma19.02.2022 17:02
-
rahimzhan20p0dqkg26.04.2021 15:34
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.