seen=0\\到目前为止看到的值掩码未发现=1 \\尚未看到的最小值其他(p)=我的(v=看不见);而(bittest(seen,v)>0|isquarefree(p*v),v++);seen+=2^v;while(bittest(seen,unseen),unseven++);返回(v)a=4;\\强制a(1)=1对于(n=1,2000,a=其他(a);打印(n“”a)退出