Narcissistic decimal number: Difference between revisions
Content added Content deleted
| Line 764: | Line 764: | ||
=={{header|EasyLang}}== |
=={{header|EasyLang}}== |
||
<syntaxhighlight lang="easylang"> |
<syntaxhighlight lang="easylang"> |
||
while cnt < 25 |
|||
s$ = n |
|||
# in work ... |
|||
ln = len s$ |
|||
s = 0 |
|||
for i to ln |
|||
s += pow number substr s$ i 1 ln |
|||
. |
|||
if s = n |
|||
print s |
|||
cnt += 1 |
|||
. |
|||
n += 1 |
|||
. |
|||
</syntaxhighlight> |
</syntaxhighlight> |
||