var i,j,k:word;begin repeat i:=i+1;k:=1;j:=0;repeat j:=j+1;k:=k+j*ord(i mod j<1)until j=k;if i<k then writeln(i)until i>499end.