Question

Натуральное число из n является числом Армстронга т.е сумма его цифр возведенная в n степень, равна самому числу (153=1*1*1+5*5*5+3*3*3). Получить все числа Армстронга  для n=4, n=3.

Answer 1

Uses crt;
Var
         n,n1,n2,n3,n4,i,Armst:integer;
Begin
   Write('Введите n: '); readln(n);
   Write('Числа Армстронга для n=',n,': ');
      if n=3 then
                        for i:=100 to 999 do begin
                                                    n1:=i div 100;
                                                    n2:=i mod 100 div 10;
                                                    n3:=i mod 10;
                                                    Armst:=(n1*n1*n1)+(n2*n2*n2)+(n3*n3*n3);
                                                    if Armst = i then write(Armst,' ');
                                                    end;
                                                          if n=4 then
                        for i:=1000 to 9999 do begin
                                                    n1:=i div 1000;
                                                    n2:=i div 100 mod 10;
                                                    n3:=i mod 100 div 10;
                                                    n4:=i mod 10;
                      Armst:=(n1*n1*n1*n1)+(n2*n2*n2*n2)+(n3*n3*n3*n3)+(n4*n4*n4*n4);
                                                    if Armst = i then write(Armst,' ');
                                                    end;
                                                      
Writeln;
Readkey;
End.

Answer 2

Для нахождения всех чисел Армстронга для заданных значений n, вы можете написать программу на Python или другом языке программирования. Вот пример кода на Python для нахождения всех чисел Армстронга для n = 4 и n = 3:

pythonCopy code
def is_armstrong_number(number, n):
    digit_sum = sum(int(digit) ** n for digit in str(number))
    return number == digit_sum

def find_armstrong_numbers(n):
    armstrong_numbers = []
    upper_limit = 10 ** (n + 1)  # Устанавливаем верхний предел для поиска

    for number in range(10, upper_limit):
        if is_armstrong_number(number, n):
            armstrong_numbers.append(number)

    return armstrong_numbers

n_values = [3, 4]

for n in n_values:
    armstrong_numbers = find_armstrong_numbers(n)
    print(f"Числа Армстронга для n = {n}: {armstrong_numbers}")

Этот код определяет две функции: is_armstrong_number, которая проверяет, является ли число числом Армстронга для заданного значения n, и find_armstrong_numbers, которая находит все числа Армстронга для заданного значения n.

Затем код выполняет поиск чисел Армстронга для n = 3 и n = 4 и выводит результат на экран.