Ormiston pairs: Difference between revisions
m
→{{header|EasyLang}}
(Added Easylang) |
|||
Line 624:
=={{header|EasyLang}}==
<syntaxhighlight>
maxn = 1000000
len isdiv[] maxn
i = 2▼
proc sieve . .
max = sqrt len isdiv[]
if num mod i = 0▼
for d = 2 to
for i = d * d step d to len isdiv[]
.
▲ i += 1
.
.
sieve
repeat
n += 1
until
.
return n
| |||