Question

Составить программу для решения следующей задачи : Найти натуральное число от 1 до 10000 с с максимальной суммой делителей.

Answer 1

var n,k: integer;begin  n:=1;  while n<10000 do  begin    k:=n+1;    n:=n*k;  end;  n:=n div k;  writeln('число:  ',n);end.

Answer 2

Программа для нахождения натурального числа с максимальной суммой делителей

Для решения данной задачи, можно написать программу, которая будет перебирать натуральные числа от 1 до 10000 и для каждого числа находить сумму его делителей. Затем программа будет сравнивать суммы делителей каждого числа и сохранять число с максимальной суммой делителей.

def sum_of_divisors(n):
    result = 0
    for i in range(1, n):
        if n % i == 0:
            result += i
    return result

max_sum = 0
number = 0
for i in range(1, 10001):
    current_sum = sum_of_divisors(i)
    if current_sum > max_sum:
        max_sum = current_sum
        number = i

print("Натуральное число с максимальной суммой делителей:", number)
print("Максимальная сумма делителей:", max_sum)

Эта программа будет последовательно проверять суммы делителей для всех чисел от 1 до 10000 и сохранять число с максимальной суммой делителей, а затем выводить это число и его сумму делителей.