Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
лллаал
01.09.2022 18:30 •
Информатика
Вычислите произведение элементов массива значения которых больше 5, но меньше 10 на паскале
Ответ:
Шамиль1233
07.10.2020 21:11
// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(15,0,15);a.Println;
var answer:= a.Where(t -> (t > 5) and (t < 10)).Aggregate(biginteger(1), (x,y) -> x*y);
Writeln(answer);
Пример:
4 0 15 8 10 13 9 13 4 8 11 5 7 1 4
4032
0,0
(0 оценок)
Популярные вопросы: Информатика
Карамель6666
10.10.2021 14:56
Как найти в паскале нечётные числа среди введённых?...
привет888
13.06.2020 17:02
Паскаль 1)решить тремя вычислить сумму s=1+1/2+1/3++1/50. 2) напечатать в виде таблицы значения функции у = (3х2-2)/ 4, для значений х, изменяющегося - 3 до 3 с шагом 0,2 3)...
лейла1102
13.06.2020 17:02
Составить программу, которая формирует одномерный массив по формуле i*2-1 и выводит его на экран....
missmarial2010
07.01.2020 11:50
Сколько гигабит информации содержит сообщение объемом 2 в 33 степени байт?...
ironthewolf72
18.08.2021 22:30
Операционная стстема это word/windows/basic...
egame
22.02.2022 16:04
19-сұрақ Пунктуация термині қандай мағынаныбілдіреді?нүкте деген мағынаны білдіредітыныс белгі деген мағынаныбілдіредібелгі деген мағынаны білдіредісызықша деген мағынаны білдіреді...
iradazlnv
10.02.2020 07:21
Какой из жанров нельзя отнести к фольклор у а пословица б повесть в былина г предание...
8HELP8
04.07.2021 23:32
тест с одним или несколькими ответами 1 Цель питания а группа организмов обитающих в одной экосистеме группа организмов в симбиозе Б группа организмов находящихся в отношениях...
onealoner13
04.07.2021 23:32
Образуй правильную форму глаголов...
али421
25.04.2020 17:34
4. В кафе «Пицца» в течение 15 дней фиксировалось количество заказов с доставкой на дом. Получили такой ряд данных: 49, 43, 55, 35, 43, 30, 37, 48, 44, 43, 50, 54, 55, 42. 37.Найдите...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(15,0,15);a.Println;
var answer:= a.Where(t -> (t > 5) and (t < 10)).Aggregate(biginteger(1), (x,y) -> x*y);
Writeln(answer);
Пример:
4 0 15 8 10 13 9 13 4 8 11 5 7 1 4
4032