Primes whose sum of digits is 25: Difference between revisions

Content added Content deleted
(Added Easylang)
 
Line 831: Line 831:
p = 2
p = 2
repeat
repeat
p = nextprim p
if digok p = 1
if digok p = 1
write p & " "
write p & " "
.
.
p = nextprim p
until p >= 5000
until p >= 5000
.
.