Дан массив из 25 целых чисел. элементы массива могут принимать целочисленные значения от -200 до 200. определите количество нулевых элементов, индексы которых не кратны 3.
108
176
Ответы на вопрос:
Const n = 25; var a: array[1..n] of integer; i,k: integer; begin k: =0; write('исходный массив: '); for i: = 1 to n do begin a[i]: =random(401)-200; write(a[i],' '); if (a[i] = 0)and(i mod 3 < > 0) then k: =k+1; end; writeln; writeln('k = ',k); end.
// pascalabc.net 3.2, сборка 1399 от 08.03.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(25,-200,200); a.println; writeln('n=',a.where((x,i)-> (x=0) and ((i+1) mod 3< > ) end. пример 13 -80 95 -146 127 -123 15 -98 51 119 -120 77 0 -9 85 165 -86 13 -37 157 -19 192 -80 156 178 n=1
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
89004613297cn30.01.2022 17:47
-
Smartfone08.06.2021 09:04
-
tysa13313.08.2021 20:00
-
Neon140705.02.2020 22:10
-
fyz07050431.07.2021 04:53
-
DerekHale2330.07.2021 21:09
-
Dfh3219.05.2023 20:30
-
gnastasiya506.12.2020 22:34
-
Maria961309.01.2023 09:06
-
Sasha20059304.10.2021 13:51
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.