Question

Чуваки, помогите. Не шарю совсем, надо написать программу и лучше с объяснениями. Дано натуральное число. Верно ли, что в данном числе нет данной цифры А (цифру А вводить с клавиатуры)

Answer 1

Требуемая программа:
var n,a: longint; b: boolean;
begin
readln(n);
readln(a);
b:=false;
while n>0 do
 begin
 if n mod 10 = a then b:=true;
 n:=n div 10;
 end;
if b 
 then writeln('В числе есть введенная цифра')
 else writeln('В числе нет введенной цифры');
end.

Пример:
1236548
2
В числе есть введенная цифра

Answer 2

Программа для проверки наличия цифры в числе

Чтобы написать программу, которая будет проверять наличие определенной цифры в заданном натуральном числе, вам понадобится использовать язык программирования. В данном случае, я предположу, что вы будете использовать язык Python.

Вот пример программы на Python, которая выполняет данную задачу:

def check_digit_in_number(number, digit):
    # Преобразуем число в строку для удобства работы с цифрами
    number_str = str(number)
    
    # Проверяем, есть ли заданная цифра в числе
    if str(digit) in number_str:
        return True
    else:
        return False

# Получаем число и цифру от пользователя
number = int(input("Введите натуральное число: "))
digit = int(input("Введите цифру, которую нужно проверить: "))

# Вызываем функцию для проверки наличия цифры в числе
result = check_digit_in_number(number, digit)

# Выводим результат
if result:
    print(f"Цифра {digit} присутствует в числе {number}.")
else:
    print(f"Цифра {digit} отсутствует в числе {number}.")

При запуске этой программы, она будет запрашивать у пользователя натуральное число и цифру, которую нужно проверить. Затем она вызывает функцию `check_digit_in_number`, которая проверяет наличие цифры в числе и возвращает соответствующий результат. Результат выводится на экран.

Пример работы программы:

Введите натуральное число: 12345
Введите цифру, которую нужно проверить: 2
Цифра 2 присутствует в числе 12345.

Введите натуральное число: 987654
Введите цифру, которую нужно проверить: 0
Цифра 0 отсутствует в числе 987654.