\\A067138号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,#vv,对于(k=1,oo,v=T(n,k);如果(v>#vv,break,vv[v]=集合联合(vv[v],[n]);););}应用(v->打印(n++“”v),连接(vv));退出