fork download
  1. try:
  2. while True:
  3. f=lambda l,r:r==x or l and f(l-1,[t%l for t in r])|f(l-1,r)
  4. x=input();l=len(x);print+f(l,range(l))
  5. except:
  6. pass
Success #stdin #stdout 0.03s 9024KB
stdin
[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]
stdout
1
0
1
1
0
1
0
0
1