for(i=1; i<=101; i++)
       f[0][i]=f[1][i]=f[i][1]=1;
 for(; i<=1001; i++)
       f[i][1]=1;
 for(i=2; i<=1001; i++) {
       for(j=2; j<=101; j++)
             if(i>=j)
                    f[i][j]=f[i-j][j]+f[i][j-1];
            else
       for(; j<=101; j++)
                     f[i][j]=f[i][i];