for i=3to 2e3step 2f=0 for j=2to i/2f=f+!mod(i,j)next if g*!f?i-2,",",i g=!f next