Post Reply 
(33s) OEIS A348783: An Efficient Description of Digital Content
09-30-2022, 02:51 PM
Post: #1
(33s) OEIS A348783: An Efficient Description of Digital Content
Takes a natural number from the stack & returns A348783 (N) to stack.
Digits of index decreasing positionally.

eg For input

188904

the programme returns

1200010011

https://oeis.org/A348783

Preserves stack.

Code:
1.    LBL A
2.    STO N
3.    CLx
4.    STO C
1.    LBL B
2.    CLx
3.    ALOG(RMDR(N:10))
4.    STO+ C
5.    CLx
6.    IDIV(N:10)
7.    STO N
8.    x≠0?
9.    GTO B
10.    CLx
11.    RCL C
12.    RTN

A: LN = 12
B: LN = 62
Find all posts by this user
Quote this message in a reply
Post Reply 




User(s) browsing this thread: 1 Guest(s)