for(i,1,999,n:=i;a:=0;while(7%n>0,n=(n%2*n*23+n+2)/4|0;a=a+1)writeln(if(n>1,"Infinity",a),", ",i))