Напишите программу в паскаль, в одномерном массиве из 10 элементов вычислить произведение чётных и сумму нечётных.
117
443
Ответы на вопрос:
Program z1; var a: array[1..10] of integer; i: integer; s,p: longint; begin p: =1; for i: =1 to 10 do read(a[i]); for i: =1 to 10 do if a[i] mod 2 = 0 then p: =p*a[i] else s: =s+a[i]; write('произведение четных = ',p,' сумма нечетных = ',s); end.
// pascalabc.net 3.2, сборка 1404 от 16.03.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(10,-99,99); a.println; writeln('сумма элементов с четным значением ', a.where(x-> x.iseven).sum); writeln('произведение элементов с нечетным значением ', a.where(x-> x.isodd).aggregate(int64(,y)-> x*y)) end. пример 45 -95 41 -26 -99 -96 77 -4 18 41 сумма элементов с четным значением -108 произведение элементов с нечетным значением 54780974325
1) собирается - журналист опрашивает людей для статьи 2) обрабатывается - ученик решает уравнение 2) - преподователь объясняет материал 3) создается - журналист придумывает статью 4) запоминается - парнень запоминает номер телефона девушки 5) измеряется - программист рассчитывает сколько бит займет программа 6) копируется - ученик списывает у одноклассника 7) передается - две девушки обмениваются новостями 8) принимается - ученики слушают учителя на уроке 9) разрушается - статья журналиста отвергается 10) делится на части - человек разбирает сообщение в котором пропущены пробелы 11) ищется - человек ищет материал для реферата в интернете
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
малина10617.09.2022 22:12
-
mamamama909.11.2021 12:17
-
darinakydryash20.06.2022 11:47
-
ТёмаТащер28.06.2022 07:12
-
Влад2712819.01.2022 15:30
-
fofanz16.09.2020 23:31
-
vika207508.03.2022 20:06
-
ПАПА12121109.07.2021 03:34
-
333999109.07.2021 18:18
-
kristinamoroz128.01.2020 04:28
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.