Question

Дано натуральное число n. Выведите в порядке возрастания все трёхзначные числа, сумма цифр которых равна n.

Answer 1

Если Pascal:

var

n: byte;

i: integer;

begin

readln(n);

for i:=100 to 999 do

if ((i mod 10) + ((i div 10) mod 10) + (i div 100)) = n then writeln(i);

end.

Answer 2

Для решения этой задачи, вам необходимо перебрать все трёхзначные числа и проверить, имеет ли каждое из них сумму цифр, равную заданному числу n. Если условие выполняется, вы можете вывести это число. Вот пример кода на Python, который решает данную задачу:

pythonCopy code
def sum_of_digits(number):
    # Функция, вычисляющая сумму цифр числа
    return sum(int(digit) for digit in str(number))

def find_numbers_with_sum(n):
    for number in range(100, 1000):
        if sum_of_digits(number) == n:
            print(number)

# Пример использования:
n = int(input("Введите натуральное число n: "))
find_numbers_with_sum(n)

Вы можете запустить этот код, и он выведет все трёхзначные числа, сумма цифр которых равна введенному числу n.