$A=<>;print~~grep$_<=$A,map{//;map$'*2**$_,0..28}4,map{//;eval join'*',(3,5,17,257,65537)[grep$'>>$_&1,0..4]}0..30