Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
senazubik63kfkd
06.08.2022 18:23 •
Информатика
Напишите программу. Ввести 8 чисел с клавиатуры и найти количество всех нечетных чисел, кратных 5.
Ответ:
tkurchanova
23.10.2020 03:59
Так как целевой язык не указан, приведу пример на SWI-Prolog.
Код
count_if_condition([], 0).count_if_condition([H|T], NC) :- cond(H), count_if_condition(T, N), succ(N, NC).count_if_condition([_|T], N) :- count_if_condition(T, N).cond(H) :- mod(H, 5) =:= 0.read_ints(0, []).read_ints(N, [X|Ints]) :- read(X), integer(X), succ(NN, N), read_ints(NN, Ints).?- read_ints(8, Ints), count_if_condition(Ints, N), nl, write("Count is "), writeln(N).
0,0
(0 оценок)
Популярные вопросы: Информатика
sultanguloverik2
26.04.2021 02:54
Каталог (папка) это: 1)команда оперативной системы обеспечивающий доступ к данным 2)группа файлов на 1 носители объединённых по какому либо критерию 3)устройство для...
nurbo55555555551
18.03.2020 14:30
Вождь племени мульти поручил своему министру разработать двоичный код и перевести в него важную информацию. какой разрядности потребуется двоичный код, если алфавит....
Agartala236
18.03.2020 14:30
Постройте графическую модель вашей квартиры . что это : карта , схема , чертеж ? , как это будет выглядеть ? !...
B1o2o3m4
31.12.2022 02:54
Арифметические действия в двоичной системе счисления решить надо 1100+1101= 101+101= 1011*101= 111*101= 1101-110= 10001-1110= 1011010-1010=...
igordergaysov
31.12.2022 02:54
3. выберите имена файлов, содержащие программы, готовые к выполнению: 1) мас.ехе; 2) мас.txt; 3) маc.doc; 4) маc.bas; 5) маc.com....
Arino4ka7381
31.12.2022 02:54
14. в какой строке верно представлена схема передачи информации? а) источник -» кодирующее устройство -» декодирующее устройство —»приёмник б) источник — кодирующее...
rusakovwn
31.12.2022 02:54
Найти среднее арифмитическое элементов массива из 10 элементов и записать его на место минимального элемента. (с++)...
scumak399p07zdf
24.07.2022 00:39
Нужно решить в паскале, условие таково: найти наименьшее кратное двух чисел a и b насколько я помню в этой можно использовать команду break....
Каала
24.07.2022 00:39
Набрать буквы основного ряда через запятую и пробел: а)прописные б)заглавные . придумать слова с использование букв основного ряда (желательно имена существительные)...
edvi01
24.07.2022 00:39
Нужно решить в паскале, условие таково: пользователь вводит число заранее неизвестное. выяснить есть ли в этом числе хотя бы две одинаковые цифры....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Так как целевой язык не указан, приведу пример на SWI-Prolog.
Код
count_if_condition([], 0).count_if_condition([H|T], NC) :- cond(H), count_if_condition(T, N), succ(N, NC).count_if_condition([_|T], N) :- count_if_condition(T, N).cond(H) :- mod(H, 5) =:= 0.read_ints(0, []).read_ints(N, [X|Ints]) :- read(X), integer(X), succ(NN, N), read_ints(NN, Ints).?- read_ints(8, Ints), count_if_condition(Ints, N), nl, write("Count is "), writeln(N).