Так как язык не указан, приведу пример на SWI-Prolog.
Код:
read_int(Int) :- read(Int), integer(Int).split_int_by_numbers(0, []) :- !. split_int_by_numbers(N, [Number|Ints]) :- Number is mod(N, 10), RestN is div(N, 10), split_int_by_numbers(RestN, Ints).test_to_div(_, []).test_to_div(N, [Number|Ints]) :- mod(N, Number) =:= 0, test_to_div(N, Ints). test(Int) :- split_int_by_numbers(Int, Numbers), test_to_div(Int, Numbers), write(Int), write(" - Yes!"), nl.test(Int) :- write(Int), write(" - No!"), nl.?- read_int(Int), test(Int).Поделитесь своими знаниями, ответьте на вопрос:
Отметьте виды сортировок сортировка в порядке возрастания и убывания чисел сортировка по дате сортировка по времени сортировка в порядке следования букв в алфавите Деление объектов на группы по определенному признаку называется кодирование информатизация систематизация хранение Список учащихся в классном журнале отсортирован по следующему признаку по времени в порядке возрастания и убывания чисел по дате в порядке следования букв в алфавите Сопоставьте понятия и их значения маркированный список нумерованный список перед каждым элементом добавляется маркер каждый элемент списка имеет свой порядковый номер перед каждым элементом добавляется маркер каждый элемент списка имеет свой порядковый номер Размещение информации в определенном порядке называется сортировка поиск передача хранение Отметьте верные высказывания для того, чтобы отменить продолжение списка нужно нажать клавишу Enter два раза план решения некоторых задач удобно оформлять в виде списка кнопка служит для создания маркированного списка кнопка служит для создания нумерованного списка
К первому поколению относят ламповые машины 1940-х годов, которые пришли на смену табуляторам. Скорость счета у них доходила до 20 тысяч операций в секунду. Данные вводились с перфокарт и перфоленты
2.Технологии хранения данных активно совершенствуются со времен появления первых компьютеров. Еще вчера мы пользовались 1,44-мегабайтными дискетами, а сегодня в продаже можно найти 256-гигабатные флеш-накопители. А ведь это далеко не предел. Пока инженеры трудятся над созданием новых, более прогрессивных носителей информации, мы вспоминаем, как повлияли на компьютерную индустрию перфокарты, магнитные ленты и форматы CD и DVD