动态规划入门（一维一边推4：护卫队）

1066: 动态规划入门（一维一边推4：护卫队）

时间限制: 1 Sec 内存限制: 128 MB
题目描述
【问题描述】
护卫车队在一条单行的街道前排成一队，前面河上是一座单行的桥。因为街道是一条单行道，所以任何车辆都不能超车。桥能承受一个给定的最大承载量。为了控制桥上的交通，桥两边各站一个指挥员。护卫车队被分成几个组，每组中的车辆都能同时通过该桥。当一组车队到达了桥的另一端，该端的指挥员就用电话通知另一端的指挥员，这样下一组车队才能开始通过该桥。每辆车的重量是已知的。任何一组车队的重量之和不能超过桥的最大承重量。被分在同一组的每一辆车都以其最快的速度通过该桥。一组车队通过该桥的时间是用该车队中速度最慢的车通过该桥所需的时间来表示的。问题要求计算出全部护卫车队通过该桥所需的最短时间值。

【输入文件】
输入文件第一行包含三个正整数（用空格隔开），第一个整数表示该桥所能承受的最大载重量（用吨表示）；第二个整数表示该桥的长度（用千米表示）；第三个整数表示该护卫队中车辆的总数（n<1000）。接下来的几行中，每行包含两个正整数W和S（用空格隔开），W表示该车的重量（用吨表示），S表示该车过桥能达到的最快速度（用千米/小时表示）。车子的重量和速度是按车子排队等候时的顺序给出的。

【输出文件】
输出文件应该是一个实数，四舍五入精确到小数点后1位，表示整个护卫车队通过该桥所需的最短时间（用分钟表示）。

本题要学会解释有没有后效性。
输入
输出
样例输入
100 5 10
40 25
50 20
50 20
70 10
12 50
9 70
49 30
38 25
27 50
19 70
样例输出
75.0

题解

program Project1;
var sw:array[0..1100]of real;
    st,f:array[0..1100]of real;
    n,len,w,i,j:longint;
    x,v,mt:real;
function min(p,q:real):real;
begin
  if p>q then exit(q) else exit(p);
end;
function max(p,q:real):real;
begin
  if p<q then exit(q) else exit(p);
end;
begin

  read(w,len,n);
  for i:=1 to n do
  begin
    readln(x,v);
    st[i]:=len/v*60;
    sw[i]:=sw[i-1]+x;
  end;

  for i:=1 to n do f[i]:=99999999999.0;
  f[0]:=0;
  for i:=1 to n do
  begin
    mt:=-9999999999.0;
    for j:=i downto 1 do                             ;
    begin
      if sw[i]-sw[j-1]>w then break
      else
        begin
          mt:=max(mt,st[j]);
          f[i]:=min(f[i],f[j-1]+mt);
        end;
    end;
  end;
  writeln(f[n]:0:1);
end.