Есть ответ 👍

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

213
272
Посмотреть ответы 3

Ответы на вопрос:


ЯП: C++

#include <iostream>

int main() {

int number;

std::cout << "Введите трехзначное число: "<< std::endl;

std::cin >> number;

int first_part = number / 100;

int second_part = (number / 10) % 10;

int third_part = number % 10;

if ((first_part) && (second_part) && (third_part))

{

 std::cout << "Вы ввели число: " << number << std::endl;

 if ((!(number % first_part)) && (!(number % second_part)) && (!(number % third_part)))

  std::cout << "Число делится нацело!" << std::endl;

 else

  std::cout << "Число не делится нацело!" << std::endl;

}

else

{

 std::cout<< "Число НЕ должно содержать нулей!";

}

return 0;

}

Объяснение:


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

// pascalabc.net 3.2, сборка 1353 от 27.11.2016 // внимание! если программа не работает, обновите версию! begin   var k: =readinteger('k=');   var a: =readarrinteger('> ',k);   var sp: =a.where(x-> x> 0).sum;   var po: =a.where(x-> x< 0).aggregate(biginteger(,q)-> p*q);   var b: =a.select(x-> x> 0? po: (x< 0? sp: ;   b.println end. пример k= 10 > 9 20 -11 5 0 16 8 11 2 -17 187 187 71 187 0 187 187 187 187 71

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

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

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS