\\A048720型T(n,k)={我的(v=0,e);而(k,k-=2^e=估价(k,2);v=比特异或(v,n*2^e););v(v)}vv=矢量(2^10,n,[]){对于(n=1,对于(k=1,oo,v=T(n,k);如果(v>#vv,break,vv[v]=concat(vv[v],n));););}应用(v->打印(n++“”v),连接(vv));退出