wikioi 数的划分

题目描述 Description
将整数n分成k份，且每份不能为空，任意两种划分方案不能相同(不考虑顺序)。
例如：n=7，k=3，下面三种划分方案被认为是相同的。
1 1 5


1 5 1


5 1 1
问有多少种不同的分法。


输入描述 Input Description
输入：n，k (6<n<=200，2<=k<=6)


输出描述 Output Description


输出：一个整数，即不同的分法。


样例输入 Sample Input
 7 3


样例输出 Sample Output
4


数据范围及提示 Data Size & Hint

 {四种分法为：1，1，5;1，2，4;1，3，3;2，2，3;}

题解：f[i,j]表示将i分为j份的方案数   F[i,j]=f[i-1,j-1]+f[i-j,j]   

const
  maxn=250;
var
  n,k,i,j:longint;
  f:array[0..maxn,0..maxn]of longint;

begin
  readln(n,k);
  for i:=1 to n do
    for j:=1 to k do
    begin
      if i<j then f[i,j]:=0 else
      if i=1 then f[i,j]:=1 else
      if i=0 then f[i,j]:=0 else
      if j=0 then f[i,j]:=0 else
      f[i,j]:=f[i-1,j-1]+f[i-j,j];
    end;
  writeln(f[n,k]);
end.