Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
speedoflight3
19.07.2021 04:44 •
Информатика
Вцелочисленном массиве из 10 эл. найти произведение четных чисел и вывести его. (+написать программу в паскале)
Ответ:
Юриякамория
08.10.2020 17:06
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,-999,999); a.Println;
Writeln('П=',a.Where(t->t.IsEven).Aggregate(BigInteger(1),(p,q)->p*q))
end.
Пример
112 -439 -766 -476 -83 718 742 -303 -20 126
П=-54825504325079040
0,0
(0 оценок)
Популярные вопросы: Информатика
местоимение111
09.02.2023 13:22
Составьте таблицы умножения и сложения 12-ной системы счисления. ,выручайте)...
Мирамкуль1
15.04.2022 20:46
Знание и понимание 1. Что такое моделирование?2. Из каких этапов состоит моделирование?3. Чем отличается математическая модель от компьютерной?4. Что такое тестирование...
Yotuberik
16.07.2022 21:42
Расположить в порядке возрастания 1010байтов,2байта,1кбайт , 20битов, 10битов...
ЛаймовыйКотик00
16.07.2022 21:42
Записать все кодовые комбинации из двух 0 и 1...
bozenka20042004
12.05.2020 16:31
Айтындарш нифига не понел берем...
thetrueraincorn
11.10.2020 20:47
Назовите основные объекты текстового процессора...
popova2017
26.04.2020 02:01
наберите 1 литр воды в любом из 2 сосудов А(объемом 5 литров) или В (объемом 3 литра). изначально сосуды пустые...
gan1298
09.01.2023 05:34
Гироскопический датчик Цифровой гироскопический датчик предназначен для измеренияивращения робота, а такжеего вращения. Точность измерения составляет +/-°, максимальная...
оооо140
01.11.2022 03:18
Запишите эти выражения по правилам языка паскаля...
ByArts1000
10.10.2021 09:00
До іть із визначенням. ів Історики – це…...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(10,-999,999); a.Println;
Writeln('П=',a.Where(t->t.IsEven).Aggregate(BigInteger(1),(p,q)->p*q))
end.
Пример
112 -439 -766 -476 -83 718 742 -303 -20 126
П=-54825504325079040