3 lines
149 B
Text
3 lines
149 B
Text
VdC(n)=n=binary(n);sum(i=1,#n,if(n[i],1.>>(#n+1-i)));
|
|
VdC(n)=sum(i=1,#binary(n),if(bittest(n,i-1),1.>>i)); \\ Alternate approach
|
|
vector(10,n,VdC(n))
|