p=1;n=1;until(n>994)[p=2+p%6;n=n/p*p+p;n|print;];