Дан массив целых чисел. напечатать: а) все четные элементы массива; б) все элементы, оканчивающиеся нулем.
231
443
Ответы на вопрос:
Program maschetinol; var a: array [1..25] of integer; i: integer; begin write ('массив: '); for i: =1 to 25 do begin a[i]: =random(51); write (a[i], ' '); end; writeln; write('чётные элементы: '); for i: =1 to 25 do if a[i] mod 2 = 0 then write (a[i],' '); writeln; write('элементы, оканчивающиеся на ноль: '); for i: =1 to 25 do if a[i] mod 10 = 0 then write(a[i],' ') end.
Var i, n: integer; s: byte; arr: system.collections.generic.list< integer> : = new system.collections.generic.list< integer> (); begin write('enter a number of values: '); readln(n); for i : = 0 to (n - 1) do begin arr.add(random(-50, 50)); write(string.format('[{0}] => {1}; ', i, arr[i])); if ((arr[i] < 0) and (arr[i] mod 2 = 0)) then s += 1; end; writeln(system.environment.newline, '> ', s); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
silverfinn10.10.2022 23:39
-
helen1511198303.08.2021 09:00
-
Викa100000016.10.2021 01:19
-
kazantsevaira230.12.2020 11:13
-
Марьяна20041325.04.2022 12:06
-
lawrence0231.05.2021 13:48
-
хамзикош03.03.2021 22:55
-
941645107.05.2022 11:40
-
sleepyfriend1823.09.2022 08:25
-
Niker0414.11.2021 11:56
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.