(loop for n =(read)until(eq()n)do(format t"~d~a "n(reverse(subseq(reverse(format()"~:r"n))0 2))))