Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
alina1885
24.04.2020 21:52 •
Информатика
Дан массив qwe (20 элементов). заполните его целыми числами в интервале [-5; 18]. найдите произведение нечётных элементов массива.
Показать ответ
Ответ:
colaboyy7704ox6ktx
16.08.2020 16:21
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=ArrRandom(20,-5,18); mas.Println;
Writeln('Произведение нечетных элементов =',mas.Where(t->t.isOdd).Aggregate(biginteger(1),(x,y)->x*y));
0,0
(0 оценок)
Популярные вопросы: Информатика
rusakovwn
18.11.2020 17:37
ID песни полковнику некто не пишет- Би 2 в ROBLOX...
БолатовДосжан
14.11.2022 14:08
Заполнить массив из 10 элементов случайными значениями в диапазоне от -150 до 150 1) вывести наименьший элемент массива 2) вывести количество нечетных элементов и их индексы...
FizTex
01.01.2022 20:44
Ккакоу глаголу относится слово расправив...
Artem58268343
07.03.2022 18:56
Вынесите множитель из под знака корня 1)√98 2)√160 3)√675 4)2√18 5)7√75 6)0,2√300...
oleshckewitchd
07.03.2022 18:56
Складіть алгоритм приготування страви...
kiki52
07.03.2022 18:56
Кроме задали . послушайте.. андрей пошёл к фотографу, имея с собой 100 крон. он заказал фотографии для паспорта за 40 крон и ещё свой портрет за 50 крон. сколько крон осталось...
stashea
07.03.2022 18:56
Які величини можна зміряти абсолютно точно...
Dginh
07.03.2022 18:56
Составьте предложение со словами,в которых имеется латинский корень акв! быстрее !...
BOTAN1337228101
07.03.2022 18:56
Найдите наибольший общий делитель и наименьшее общее кратное чисел: 12 и 18 13 и 39...
KARAZINO
07.03.2022 18:56
Найдите число, если 75% его равны 36; 2) 80 % его равны 48...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
//Внимание! Если программа не работает, обновите версию!
begin
var mas:=ArrRandom(20,-5,18); mas.Println;
Writeln('Произведение нечетных элементов =',mas.Where(t->t.isOdd).Aggregate(biginteger(1),(x,y)->x*y));