Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
tima0204zhan
20.05.2023 01:38 •
Информатика
Решить в паскале : определить сколько из 5 чисел введенных пользователем кратны 3.
Ответ:
makoldinvyacheoxyw3a
10.10.2020 20:21
===== PascalABC.NET =====
begin
ReadSeqInteger(5).Count(p -> p mod 3 = 0).Println
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
polinapetrova8
23.02.2020 00:14
с информатикой 1 и 2 задание тема алгебра логики...
Nurlan2010
05.05.2022 11:25
1) перевести целые числа из десятичной системы счисления в троичную: 65, 325, 121. 2) перевести целые числа из десятичной системы счисления в восьмеричную: 6435, 856...
vlad1446
01.12.2020 23:57
Протабулировать заданную функцию y=f(x) на промежутке [3.2, 3.9] с постоянным шагом h=0.1. функция y(x) имеет вид: (x-1)^sin(x), если ctan(x) - 0.1 (x+1)^sin(x), если...
algor7979
01.12.2020 23:57
Дано два числа. если их сумма кратна 5, то прибавить 1, иначе вычесть 2. результат вывести на экран.дано два числа. если их сумма кратна 5, то прибавить 1, иначе вычесть...
Luda11058
01.12.2020 23:57
Написать программу в паскале: известен год рождения каждого человека из группы. определить число лю- дей, родившихся до 1985 года, и число людей, родившихся после 1990...
maistrenko1
01.12.2020 23:57
А& (не(аилив& с)) составьте таблицу !...
vgoidin
01.04.2021 05:03
E Үйге тапсырмаS2 1. Интернетке тәуелділік дегенне? 2. Интернетке тәуелділікпроблемаларын шешу әдістеріқандай? 3. Интернеткетәуелділіктің себептері қандай?...
влада409
02.05.2022 12:07
Тело совершает гармонические колебания с амплитудой 12 см и периодом 0,25 с.Определить: 1) максимальную скорость; 2) максимальное ускорение колеблющегося тела....
AlsiMaksimowa
11.06.2020 21:01
Преимущества размножение и развитие млекопитающих по сравнению с другими позвоночными является...
SaintRomik
09.09.2021 20:26
найдите с координатной прямой сумму чисел -8 и 3...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
===== PascalABC.NET =====
begin
ReadSeqInteger(5).Count(p -> p mod 3 = 0).Println
end.