Data update

This commit is contained in:
Ingy döt Net 2025-06-11 20:16:52 -04:00
parent 72eb4943cb
commit 4d5544505c
2347 changed files with 62432 additions and 16731 deletions

View file

@ -1,9 +1,7 @@
fastfunc isprim num .
i = 2
while i <= sqrt num
if num mod i = 0
return 0
.
if num mod i = 0 : return 0
i += 1
.
return 1
@ -23,9 +21,7 @@ func sumdiv num .
until d > quot
if num mod d = 0
sum += d
if d <> quot
sum += quot
.
if d <> quot : sum += quot
.
d += 1
.
@ -37,7 +33,7 @@ func isduff n .
.
return 0
.
proc duffs . .
proc duffs .
print "First 50 Duffinian numbers:"
n = 4
repeat