Data update
This commit is contained in:
parent
35bcdeebf8
commit
74c69a0df6
2427 changed files with 31826 additions and 3468 deletions
|
|
@ -0,0 +1,46 @@
|
|||
fastfunc nprim num .
|
||||
repeat
|
||||
i = 2
|
||||
while i <= sqrt num and num mod i <> 0
|
||||
i += 1
|
||||
.
|
||||
until num mod i <> 0
|
||||
num += 1
|
||||
.
|
||||
return num
|
||||
.
|
||||
prim = 2
|
||||
primcnt = 1
|
||||
proc nextprim . .
|
||||
prim = nprim (prim + 1)
|
||||
primcnt += 1
|
||||
.
|
||||
for i to 20
|
||||
write prim & " "
|
||||
nextprim
|
||||
.
|
||||
print ""
|
||||
while prim < 100
|
||||
nextprim
|
||||
.
|
||||
while prim <= 150
|
||||
write prim & " "
|
||||
nextprim
|
||||
.
|
||||
print ""
|
||||
while prim < 7700
|
||||
nextprim
|
||||
.
|
||||
while prim <= 8000
|
||||
cnt += 1
|
||||
nextprim
|
||||
.
|
||||
print cnt
|
||||
while primcnt < 10000
|
||||
nextprim
|
||||
.
|
||||
print prim
|
||||
while primcnt < 100000
|
||||
nextprim
|
||||
.
|
||||
print prim
|
||||
|
|
@ -1,4 +1,4 @@
|
|||
import "/fmt" for Fmt
|
||||
import "./fmt" for Fmt
|
||||
|
||||
var primeSieve = Fn.new { |limit|
|
||||
if (limit < 2) return []
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue