OFFSET
0,11
MAPLE
P:=proc(n) local a, k, i; for i from 1 by 1 to n do a:=0; k:=i; while k>0 do a:=a+(k mod 10); k:=trunc(k/10); od; k:=binomial(a, (i mod a)); print(k); od; end: P(101);
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Paolo P. Lava and Giorgio Balzarotti, Apr 17 2008
STATUS
approved