Question

（循环）求水仙花数。所谓水仙花数，是指一个三位数abc，

Answer 1

水仙花数（Narcissistic
number）也被称为超完全数字不变数（pluperfect
digital
invariant,
PPDI）、自恋数、自幂数、阿姆斯壮数或阿姆斯特朗数（Armstrong
number），水仙花数是指一个
n
位数（n≥3
），它的每个位上的数字的
n
次幂之和等于它本身（例如：1^3
+
5^3+
3^3
=
135）。
pascal代码：
var
a,
b,
c,
i,
t
:
integer;
begin
i
:=
100;
repeat
a:=trunc(i/100);
b:=trunc(i/10)
-
a*10;
c:=i-trunc(i/10)
*
10;
t:=
a*a*a
+
b*b*b
+
c*c*c;
if
i
=
t
then
writeln(i,'=',a,'^3+',b,'^3+',c,'^3');
i
:=
i
+
1
until
i
>
999
end.