Question

Составьте программу, которая из введенного с клавиатуры натурального числа удалит все 5 и 1. Например, число 55901815 превратиться в 908.

Answer 1

var
a:integer; 

begin 
readln(a); 
writeln(a.ToString.Remove('5','1')); 
end.

Answer 2

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

pythonCopy code
def remove_ones_and_fives(number):
    result = ""
    for digit in str(number):
        if digit != '5' and digit != '1':
            result += digit
    return int(result)

# Основная часть программы
input_number = int(input("Введите натуральное число: "))
result_number = remove_ones_and_fives(input_number)
print("Результат:", result_number)

Программа начинается с объявления функции remove_ones_and_fives, которая принимает число в качестве аргумента и возвращает число, в котором удалены все цифры 5 и 1. В этой функции мы преобразуем число в строку и итерируемся по каждой цифре. Если цифра не равна 5 или 1, она добавляется к результату.

Затем в основной части программы мы запрашиваем у пользователя ввод натурального числа, вызываем функцию remove_ones_and_fives с этим числом и выводим результат на экран.

Например, если введенное число будет 55901815, программа выведет 908.