Натуральное число называется числом Армстренга, если сумма цифр числа, возведённых в...

Question

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

Answer 1

Var i,k,n: integer;
begin
  for i:=100 to 999 do
  begin
    k:=i;  n:=0;
    repeat
      n:=n+round(power(k mod 10,3));
      k:=k div 10;
    until k=0;
    if n=i then write(i,' ');
  end;  
end.

153 370 371 407

Comments

Здравствуйте! Помогите пожалуйста с домашним заданием ( написать программу на языке турбопаскаль) Вот ссылки :
1) https://znanija.com/task/24333178
2) https://znanija.com/task/24333250
3) https://znanija.com/task/24333301