Войти Регистрация Спроси ai-bota

Напишите программу: С клавиатуры вводится трёхзначное число (число десятков и число единиц не равна 0), проверить делится ли оно на каждую из своих цифр.

Показать ответ

Ответ:

Ксюха12111

23.09.2020 08:01

Так как язык не указан, приведу пример на 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).
Напишите программу: С клавиатуры вводится трёхзначное число (число десятков и число единиц не равна

Напишите программу: С клавиатуры вводится трёхзначное число (число десятков и число единиц не равна

Напишите программу: С клавиатуры вводится трёхзначное число (число десятков и число единиц не равна

Напишите программу: С клавиатуры вводится трёхзначное число (число десятков и число единиц не равна

0,0(0 оценок)

Популярные вопросы: Информатика

lexiagahadi

12.11.2021 22:06

Перевести двійковий код 1010010 у десяткове число...

Lopidon11

15.07.2021 09:19

Впрограмме «: =» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно операции сложения, вычитания, умножения и деления. правила выполнения...

nastyagosteva

15.07.2021 09:19

Впрограмме «: =» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно операции сложения, вычитания, умножения и деления. правила выполнения...

Anna18301

01.05.2022 12:48

Уисполнителя делитель две команды, которым присвоены номера: 1. раздели на 2 2. прибавь 1 первая из них уменьшает число на экране в 2 раза, вторая увеличивает его...

justdoit5

28.04.2020 02:56

Олимпиада по информатике. подпишите название элементов обозначенных цифрами на рисунке например 1 - окно, 2-подпись...

YanaAndreewna1

01.08.2022 19:46

Номер 5. завтра огэ. расскажите как делать этот номер с пояснением...

плюхплюх

05.11.2020 12:24

Книга содержит 256 страниц, на каждой странице - 64 строки, в каждой строке – 64 символа. каждый символ кодируется 1 байтом. сколько таких книг поместится на флэшке...

Adalet555

17.08.2021 23:23

155. ромбтың доғал бұрышынан кабырғасына түсірілген перпеньдикуляр оны 4 см және 8 см кесінділерге бөледі. ромбтың диаго-нальдарын табыңдар.өтінемі...

upsbeats

17.06.2020 15:05

Перед вами закодированное послание великого учёного поэта писателя и общественного деятеля м.в. ломоносова и его потомкам декодируйте это сообщение разгадав для...

CERRY050505

07.10.2020 17:38

KB Належить до хрящових риб: а) манта: б) сом: в) Щука: г) короп. 2. За до якого органа кісткові риби здатні сприймати рух води та течію: а) плавці: б) зяброві кришки....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку