Data update
This commit is contained in:
parent
5150844a7d
commit
4bb20c9b71
7735 changed files with 38060 additions and 199180 deletions
|
|
@ -1,12 +1,8 @@
|
|||
func isprim num .
|
||||
if num < 2
|
||||
return 0
|
||||
.
|
||||
if num < 2 : return 0
|
||||
i = 2
|
||||
while i <= sqrt num
|
||||
if num mod i = 0
|
||||
return 0
|
||||
.
|
||||
if num mod i = 0 : return 0
|
||||
i += 1
|
||||
.
|
||||
return 1
|
||||
|
|
@ -16,7 +12,7 @@ while count < 10
|
|||
n += 1
|
||||
f *= n
|
||||
op$ = "-"
|
||||
for fp in [ f - 1 f + 1 ]
|
||||
for fp in [ f - 1, f + 1 ]
|
||||
if isprim fp = 1
|
||||
count += 1
|
||||
print n & "! " & op$ & " 1 = " & fp
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue