(print (mapv #(let[a(range 1(+ 1 %))](apply str(interleave a(reverse a)))) [1 4 26 100]))