try: while True: f=lambda l,r:r==x or l and f(l-1,[t%l for t in r])|f(l-1,r) x=input();l=len(x);print+f(l,range(l)) except: pass
[0, 1, 2, 3, 4, 5] [1] [0, 0, 0] [0, 1, 2, 0, 1, 2, 0, 0, 1, 2] [0, 0, 1] [0, 1, 2, 3, 4, 5, 6, 0, 0, 1, 2] [0, 1, 2, 0, 1, 2, 0, 1, 2, 3] [0, 2, 1, 0, 2, 1, 0, 2, 1] [0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1]