print$a[$p=($p+$_+(($_*=21**++$a[$p]+1)%=463))%463]&=1for($=)x$<