print~~map{grep$'==++$a[$_*$i],1..$`/$_*!$a[$i=$_]}<>=~$"*2..$`