Data update

This commit is contained in:
Ingy döt Net 2025-08-11 18:05:26 -07:00
parent 4d5544505c
commit 4924dd0264
3073 changed files with 55820 additions and 4408 deletions

View file

@ -0,0 +1,18 @@
!YS-v0
defn main(b):
each n range(10):
say:
format '%.6f':
vdc: n b
defn vdc(n b):
loop n n, d 1, vdc 0.0:
if n > 0:
then:
d *=: b
r =: n % b
n .=: quot(b)
vdc +=: r / d
recur: n, d, vdc
else: vdc