//,map$\+=($p[$']=$p[$'/2]+$'%2)==$p[$_]&&$'&$_,@@for@@=0..<>;print