Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
денисвеликий
30.09.2022 04:04 •
Информатика
Дан массив натуральных чисел,заполненный случайными числами. найти произведение элементов кратных 3.
Показать ответ
Ответ:
Сиплел
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 оценок)
Популярные вопросы: Информатика
valya0603
18.12.2022 23:42
Почему важно применять стандартные алгоритмы в процессе программирования?...
Tractorust
11.07.2020 14:08
Какой тип имеет переменная h, если после выполнения оператора write (h) на экран было выведено следующее: M?shortintcharbooleanнет верного ответа...
CoralineGilmor
12.05.2022 07:44
Напишите программу в pascal abс, чтобы когда ты вводил число 1-7 , показывал день недели, соответствующий данному числу...
Valya1873
14.03.2022 07:50
Умоляю, с паскалем 1. пользователь вводит неотрицательное однозначное число a. написать программу: вычисляющую в случае ввода 1 - площадь круга с радиусом a, вычисляющую...
DityaDyavola
14.03.2022 07:50
Умоляю, с паскалем 1) вычислить оптимальный вес по формуле рост-100 (фактический вес v и рост h вводятся пользователем) и выдать одно из сообщений: - у вас идеальный...
alinkis11
25.06.2022 00:37
C++. не могу написать программу вычисляющую n степень числа a (a^n) без использования pow(x,y)....
тузель
25.06.2022 00:37
Даны натуральные числа от 35 до 150,найти сумму и колличество тех из них которые при делении на 8, остаток 1 или 2...
A1mSh1k
19.06.2022 01:20
Вывести на экран значение функции f(x)=x^3-26x на интервале [-18; 12] с шагом 3. паскаль (на цикле)...
сhevapchichi0
27.08.2021 19:52
Придумать свой ключ шифрования и закодировать с него сообщение: бит - это минимальная единица измерения информации. (желательно пояснение)...
неточно1
09.09.2021 19:48
Тема множества: дан текст из строчных латинских букв, за которым следует точка. напечатать: - все буквы, входящие в текст не менее двух раз; - все буквы, входящие в текст...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
s := 1 ;
for i := 1 to n do
if a[i] mod 3 = 0 then
s := s * a[i];
writeln(s);