（昨天的）codevs天梯 数的划分 dp

题目：

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

1 5 1

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

分析：

可以把一个数分成J分，一种是最小，只能为1，另一种是不为1，可以减去J再继续求，得出DP方程f[i,j]=f[i-1,j-1]+f[i-1,j];

代码：

const
  maxn=300;


var
  f:array [0..maxn,0..maxn] of longint;
  n,m:longint;


procedure init;
begin
  readln(n,m);
end;


procedure main;
var
  i,j:longint;
begin
  for i:=1 to n do
    for j:=1 to m 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,m]);
end;


begin
  init;
  main;
end.