最小乘车费用
Time Limit:10000MS Memory Limit:65536K
Total Submit:169 Accepted:116
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
Source
elba
Source
Problem Id:1643 User Id:TRX
Memory:1960K Time:0MS
Language:Pascal Result:Accepted
- Source
var n,i,j:longint; a:array[1..10] of longint; 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]:=maxint; for j:=1 to 10 do if (i>=j)and(f[i-j]+a[j]<f[i]) then f[i]:=f[i-j]+a[j]; end; writeln(f[n]); end.