Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
dok12369
07.03.2020 21:33 •
Информатика
Сформировать массив из n случайных чисел от 0 до 86. найти сумму чисел кратных 3.
Показать ответ
Ответ:
Санси
05.10.2020 23:22
//PascalABC.Net 3.2 сборка 1318
begin
var ar:=ArrRandomInteger(ReadInteger(),0,86).Println;
write(ar.Where(x -> x mod 3=0).sum);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
annayotubeanna
30.07.2021 17:23
Впродаже имеются следующие компьютерные устройства клавиатура 1200, сканер 2500, мышь 990, принтер 4500, джойстик 2100, системный блок 25000, модем 2600, монитор 4500. вопрос:...
Андріана1111111
08.06.2020 18:13
с питоном! Задача №336. Цифра в числе Входные данные Вводятся 2 числа: x и d. Выходные данные Подсчитайте и выведите одно число - сколько раз встречается в записи натурального...
emin19
11.10.2020 06:36
Phyton. Сформировать массив (список) из 20 элементов. Каждый элемент равен случайному целому числу от 1 до 5. С клавиатуры вводим значение для числа X В качестве ответа,...
nursultan18
06.12.2021 08:10
Как задать формат вводимых чисел...
Пташник
30.08.2021 12:11
В записи С12, что означает буква и цифра...
vsofa666
28.08.2022 08:12
добавить цикл while в этот код, очень надо( print( Enter first number ) a=int(input()) print( Enter second number ) b=int(input()) print( Enter math operation ) c=input()...
maxxx1114
23.01.2022 01:57
Информатика, 10 класс. Вся информация на фото, календарь в паскале надо...
настюха20998
04.04.2023 18:45
HTML-документи мають чітку структуру. З яких стандартних частин складається веб документ? а) заголовна частина; б) службова інформація; в) розділ ініціалізації; г) тіло...
QueenKulumshina
05.07.2021 12:27
В парке высадили молодые деревья: 68 берез, 70 осин и 57 тополей. Подсчитайте общее количество высаженных деревьев, их процентное соотношение. Постройте объемный вариант...
milanasadykovaMilok
26.12.2020 19:05
Валфавите языка племени тумба-юмба четыре буквы: ы , ш , ч и о . нужно вывести на экран всевозможные слова, состоящие из к букв, в которых вторая буква ы . подсчитайте количество...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var ar:=ArrRandomInteger(ReadInteger(),0,86).Println;
write(ar.Where(x -> x mod 3=0).sum);
end.