描述
在河上有一座独木桥，一只青蛙想沿着独木桥从河的一侧跳到另一侧。在桥上有一些石子，青蛙很讨厌踩在这些石子上。由于桥的长度和青蛙一次跳过的距离都是正
整数，我们可以把独木桥上青蛙可能到达的点看成数轴上的一串整点：0，1，……，L（其中L是桥的长度）。坐标为0的点表示桥的起点，坐标为L的点表示桥
的终点。青蛙从桥的起点开始，不停的向终点方向跳跃。一次跳跃的距离是S到T之间的任意正整数（包括S,T）。当青蛙跳到或跳过坐标为L的点时，就算青蛙
已经跳出了独木桥。
题目给出独木桥的长度L，青蛙跳跃的距离范围S,T，桥上石子的位置。你的任务是确定青蛙要想过河，最少需要踩到的石子数。
对于30%的数据，L <= 10000；
对于全部的数据，L <= 10^9。
格式
输入格式
输入的第一行有一个正整数L（1 <= L <=
10^9），表示独木桥的长度。第二行有三个正整数S，T，M，分别表示青蛙一次跳跃的最小距离，最大距离，及桥上石子的个数，其中1
<= S <= T <= 10，1 <= M <=
100。第三行有M个不同的正整数分别表示这M个石子在数轴上的位置（数据保证桥的起点和终点处没有石子）。所有相邻的整数之间用一个空格隔开。
输出格式
输出只包括一个整数，表示青蛙过河最少需要踩到的石子数。
样例输入：
10
2 3 5
2 3 5 6 7
样例输出：
2
题目分析：
这道题主要考察了区间类动态规划和我们对于代码的优化能力。事实上这道题是小Shy暑假做的，但不知道为啥小Shy把它翻译成C++之后只得了60分，所以只好发Pascal的代码了……
我们用f[i]表示走到i最少踩到的石子数。很明显当i
接下来我们会发现，如果两个石子之间的距离超过了t，那么相当于这两个石子之间没有距离t。因此我们把后面的石子全部前挪。挪动的幅度是kt。（k>=1）
然后我们就可以转移了。f[i]是从f[i-t]到f[i-s]中最小的转移过来的。
var f:array[1..10000] of longint;
i,j,l,s,t,m,ans,p:longint;
a:array[0..110] of longint;
b:array[1..10000] of longint;
function min(a,b:longint):longint;
begin
if a>b exit(b); exit(a);
end;
begin
readln(l);
readln(s,t,m);
for i:=1 to m do read(a[i]);
for i:=1 to 10000 do f[i]:=maxlongint;
if s=t then
begin
for i:=1 to m do if a[i] mod t=0 then inc(ans);
writeln(ans);
halt;
end;
for i:=1 to m do
for j:=i+1 to m do
if a[i]>a[j] then
begin
p:=a[i];
a[i]:=a[j];
a[j]:=p;
end;
for i:=1 to m do
begin
p:=a[i]-a[i-1]-t;
if p>0 then
for j:=i to m do a[j]:=a[j]-p;
end;
l:=min(a[m]+t,l);
for i:=1 to m do b[a[i]]:=1;
for i:=s to l do
begin
if i>t then for j:=i-t to i-s do f[i]:=min(f[i],f[j])
else for j:=1 to i-s do f[i]:=min(f[i],f[j]);
if f[i]=maxlongint then f[i]:=0;
f[i]:=f[i]+b[i];
end;
writeln(f[l]);
end.