Digital root: Difference between revisions

Content added Content deleted
(Added BASIC256, True BASIC and Yabasic)
Line 1,784: Line 1,784:
numbers[] = [ 627615 39390 588225 393900588225 ]
numbers[] = [ 627615 39390 588225 393900588225 ]
for i in numbers[]
for i in numbers[]
call digitalRoot i x persistence
digitalRoot i x persistence
print i
print i
print "Additive persistence: " & persistence
print "Additive persistence: " & persistence