Description
假设某条街上每一公里就有一个公共汽车站,并且乘车费用如下表:
而任意一辆汽车从不行驶超过10公里。某人想行驶n公里,假设他可以任意次换车,请你帮他找到一种乘车方案,使得总费用最小
注意:10公里的费用比1公里小的情况是允许的。
Input
输入文件BUSSES.IN,文件共两行,第一行为10个不超过200的整数,依次表示行驶1~10公里的费用,相邻两数间用一个空格隔开;第二行为某人想要行驶的公里数。
Output
输出文件BUSSES.OUT,仅一行,包含一个整数,表示行使这么远所需要的最小费用。
Sample Input
12 21 31 40 49 58 69 79 90 101
15
Sample Output
147
一开始f[i]为maxlongint
动态转移方程为f[i]:=min(f[i],f[i-j]+a[j])
1<=i<=n
1<=j<=10
代码如下:
var
n,i,j:longint;
a,f:array[0..100] of longint;
begin
for i:=1 to 10 do read(a[i]);
read(n);
for i:=1 to n do
begin
f[i]:=maxlongint;
for j:=1 to 10 do
if i>=j then
if f[i-j]+a[j]<f[i] then f[i]:=f[i-j]+a[j];
end;
write(f[n]);
end.