Дана последовательность чисел a i (i=1,2.,n) подсчитать произведение и количество четных чисел вывести их значения и порядковые номера
232
382
Ответы на вопрос:
// pascalabc.net 3.1, сборка 1219 от 16.04.2016 begin // формируем массив a случайных чисел и выводим его var a: =arrrandom(readinteger('n='),1,50); a.println; // формируем последовательность кортежей s из четных элементов a var s: =a.select((x,i)-> rec(x,i+(x-> x.item1.iseven); write('четные элементы: '); s.select(x-> x.item1+'['+x.item2+']').println; write('их количество равно ',s.count,', произведение равно ', s.select(x-> x.item1).aggregate(1.0,(p,i)-> p*i)) end. тестовое решение: n= 15 6 28 32 37 21 34 37 24 1 22 21 16 10 1 2 четные элементы: 6[1] 28[2] 32[3] 34[6] 24[8] 22[10] 16[12] 10[13] 2[15] их количество равно 9, произведение равно 30883184640
Пока включён компьютер. если не сохранил данные, то они удаляются при выключении
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
арллтссрдз11.12.2020 17:21
-
bubink9316.05.2023 07:05
-
Черепашка31218.06.2022 02:23
-
Inna2103200209.11.2022 15:15
-
DashaPOPOVA00000009.07.2020 20:53
-
ruzall23.10.2020 22:41
-
Andrey24566705.02.2020 04:50
-
instajohap091g204.06.2021 23:22
-
lol102715.02.2022 07:22
-
Printsesska04201714.12.2021 02:42
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.