Extra primes: Difference between revisions

m
Forth - simplified code
(Added Forth solution)
m (Forth - simplified code)
Line 697:
dup 2 = if drop 1+ exit then
dup 3 = if drop 2 + exit then
dup 5 = if drop 2 + exit then
drop
10 / recurse 10 * 2 + ;
 
1,777

edits