C=101;a['~~'];i;main(k){for(;*a=printf(i%C-k?"":"p(%d)=%d\n",i%C,a[i]=k?a[i-C]+a[i%C<k?:i-k]:0)<17;)k=++i/C;}