Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
egorushka55
05.11.2021 08:22 •
Информатика
Данн массив a(5)определить сумму элементов кратных 8.генератор случайных чисел [20; 40].вывести список элементов массива в одну строку
Ответ:
ser73
04.10.2020 20:39
// PascalABC.NET 3.2, сборка 1356 от 04.12.2016
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(5,20,40); a.Println;
Writeln('S=',a.Where(x->x mod 8=0).Sum)
end.
Пример
24 23 35 40 22
S=64
0,0
(0 оценок)
Популярные вопросы: Информатика
den532
26.06.2021 15:03
Напишите небольшой конспект для пятого класса графический редактор и графический планшет...
Jihye11
23.12.2020 09:10
Дан массив А (120), заполненный трехзначными случайными числами. Найти произведение тех элементов, которые принадлежат отрезку (30,60) и сумму тех элементов, которые кратны...
Dick666
22.04.2020 17:38
Дан массив из 8 элементов . определить а) сумму всех элементов массива ; б) произведение всех элементов массива ; в) среднее арифметическое всех элементов массива...
astakhovavictoria
22.04.2020 17:38
Как пользоваться кнопкой лечить с перезагрузкой в касперском антивирус...
taroslav
11.04.2020 03:58
Перевести целое число 26428 из системы счисления с основанием 8 в системы счисления с основаниями 2 и 16...
ilyaxybaeshka
31.12.2020 12:03
Где хранится закодированные изображения?...
ALEXAND2033
31.12.2020 12:03
Что стало причиной создания операционной системы...
tach11
26.03.2020 12:31
Сочинение на тему один день ремесленника древней руси...
полина10092003
26.03.2020 12:31
Какова роль минеральных солей в обмене веществ человека?...
БраткаТвой
26.03.2020 12:31
Сочинение на тему пустота как сущность бытия...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(5,20,40); a.Println;
Writeln('S=',a.Where(x->x mod 8=0).Sum)
end.
Пример
24 23 35 40 22
S=64