使用(数字理论):T:=数组(1..64):k:=1:a:={0,1}:b:={1}:对于a9从0到1 do:对于a8从0到1do:针对a7从0到1:a6从0到1:1do:对a5从0到1,a4从0到1/1do:对于a2从0到1-1do:对于al1从0到1-do:对于a 1从0至1do:对于a0从0到1-do:n:=a0+a1*10^2+a3*10^3+a4*10^4+a5*10^5+a6*10^6+a7+a8*10^ 8+a9*10^9:m:=φ(n):x:=转换(转换(m,base,10),set):如果联合x=a或联合x=b,则T[k]:=n:k:=k+1:否则fi:od:od:od:od:od:0d:od:od:od:od:%d:od:od打印(T):