diff --git a/92/main.ua b/92/main.ua new file mode 100644 index 0000000..c599e04 --- /dev/null +++ b/92/main.ua @@ -0,0 +1,7 @@ +# next number in chain +N ← /+⍉°√⊥10 + +⍜-⇡1 1e7 +⍥N10 # the longest 1-chain is less than 10 +-⊙1e7 ⧻⊚=1 # count 1s to subtract from 1e7 +-1 # there are 999999 nums, because no 0