195
range1
m:
        dup
        dup
        show
        reverse
        read-num
        +
    b6
    100
    times #(eval)
    101
    make-array
        show
        dup
        reverse
        =
    f4
    head
    show-line