Question

натуральное число называется числом Армстронга, если сумма цифр числа, возведенных в N-ю степень, где N - количество цифр в числе, равна самому числу. Напримерт153=1^3 5^3 3^3. Найдитетвсе трехзначныеии четырехзначныеичисла Армстронга

Answer 1

Var a,b,c,d,a2:integer;
begin 
 for a:=100 to 9999 do begin      
 d:=0;      
 a2:=a; 
 while (a2 <> 0) do begin
      b:= a2 mod 10;
      a2:= a2 div 10;
      if a<1000 then c:= (b*b*b)
      else c:=(b*b*b*b);
      d:= d+c;
   end;
       if (a = d) then writeln('число армстронга ==> ', a);
     end;
end.

Answer 2

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

Для трехзначных чисел:

1. Создайте цикл, который будет перебирать все трехзначные числа от 100 до 999.
2. Для каждого числа разделите его на цифры (сотни, десятки и единицы).
3. Возведите каждую цифру в третью степень (потому что у нас трехзначные числа).
4. Просуммируйте эти возведенные в степень цифры.
5. Если сумма равна исходному числу, то это число является числом Армстронга.

Для четырехзначных чисел:

1. Создайте цикл, который будет перебирать все четырехзначные числа от 1000 до 9999.
2. Повторите шаги 2-4, но возводите каждую цифру в четвертую степень (потому что у нас четырехзначные числа).

Вот пример кода на Python для поиска таких чисел:

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

armstrong_numbers = []

# Для трехзначных чисел
for number in range(100, 1000):
    if is_armstrong_number(number):
        armstrong_numbers.append(number)

# Для четырехзначных чисел
for number in range(1000, 10000):
    if is_armstrong_number(number):
        armstrong_numbers.append(number)

print("Числа Армстронга:", armstrong_numbers)

Запустив этот код, вы найдете все трехзначные и четырехзначные числа Армстронга.