i=100
a=[1]+[0]*i
while i:j=k=101-i;exec'a[j]+=a[j-k];j+=1;'*i;i-=1;print"p(%u)="%k+`a[k]`