斐波那契额数列是两个数加出第三个，此题是多个数加出下一个

program he;

var a:array[-10..51]of qword;

i,j,n,m:longint;

begin

read(n,m);

a[0]:=1;a[1]:=1;

for i:=2 to n+1 do

for j:=1 to m do

a[i]:=a[i]+a[i-j];

writeln(a[n+1]);

end.