Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
илья1968
28.01.2020 19:02 •
Информатика
Дан массив натуральных чисел,заполненный случайными числами. найти произведение элементов кратных 3.
Ответ:
CTRAHNK
24.05.2020 00:29
s := 1 ;
for i := 1 to n do
if a[i] mod 3 = 0 then
s := s * a[i];
writeln(s);
0,0
(0 оценок)
Популярные вопросы: Информатика
фывапрпиол
06.06.2020 09:46
Чему равно х в десятичной системе счисления, если х = 2213 + 10112 + 105?...
саня45рг
29.01.2022 10:16
Выпишите самое главное объекты окружающего мира...
ася614
25.01.2021 22:29
Начало NoіfВыводf, i- цел12f: = 13і: = 1,65f: = f* і7f :f*I8fКонец....
57den16
30.10.2020 10:08
Составить программу: Определить меньшую из двух величин Y, где X=2-A2, Y=3-B. Значения А и В вводятся с клавиатуры. Вывести X, и результат обработки вывести на экран , не...
Retrica2002
23.12.2020 14:44
Умоляю помагите очень нужно сор по информат...
damila3434
16.12.2022 01:23
Выбери группу в которой все термины связаны с 1) рюрик , владимир красное солнышко , иван калита , иван грозный 2) княжество , вече , царь , парламент 3) нашествие батыя...
RassiaScream
16.12.2022 01:23
This person writes stories for newspapers кто это? журналист и редактор не подходит! должно быть 8 букв, первая r...
ДашаУмняшаТ
16.12.2022 01:23
Плюсы и минусы акционерного общества...
Polina22102005
16.12.2022 01:23
получения 1,3-диметилбензол (с реакциями)...
Botan0011
16.12.2022 01:23
Вкаких словах есть твёрдые согласные звуки выпишите их: малыш,лужицы,пальцы,подъезд,таблица,оркестр....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
s := 1 ;
for i := 1 to n do
if a[i] mod 3 = 0 then
s := s * a[i];
writeln(s);