组合数

题目大意：输入自然数n，然后将其拆分成由若干数相加的形式，参与加法运算的数可以重复。 

这道题目要转化啊……c[i.j]表示将数字i拆成j个数（易知j<=i）那么c[i-j,j]表示的则是从比i小j的数拆分成j个数，将这j个数每个都+1就转移到了c[i,j]，另外一种是c[i-1,j-1]添加一个新的数字1也可以转移到当前状态。

program Neayo;
const
        inf='number.in';
        ouf='number.out';

var
        i,j,k,n:longint;
        ans:int64;
        f:array[0..501,0..501]of int64;
procedure init;
begin
     assign(input,inf);assign(output,ouf);
     reset(input);rewrite(output);
     readln(n);
     close(input);
end;
procedure go;
begin
     f[0,1]:=1;
     for i:=1 to n do
      for j:=1 to i do
      f[i,j]:=(f[i-1,j-1]+f[i-j,j])mod 10000007;
     for i:=2 to n do
     ans:=(ans+f[n,i])mod 10000007;
     writeln(ans);

end;
begin
     init;
     go;
     close(output);
end.