Rosetta Code

Narcissistic decimal number: Difference between revisions

Page Discussion

Narcissistic decimal number (view source)

Revision as of 11:59, 11 June 2023

265 bytes removed ,  11 months ago
m
→‎{{header|EasyLang}}
Line 764:
=={{header|EasyLang}}==
<syntaxhighlight lang="easylang">
 
proc prime x . r .
# in work ...
for i = 2 to sqrt x
 
if x mod i = 0
r = 0
break 2
.
.
r = 1
.
for i = 2 to 999
call prime i r
if r = 1
ind += 1
sum += i
call prime sum r
if r = 1
print ind & ": " & sum
.
.
.
</syntaxhighlight>
 
Chkas
1,969

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/344727"