main=interact$foldr(\a s->a:['\n'|(x,_)<-reads s,gcd 7x>6]++s)""