| 记录编号 | 6958 | 评测结果 | AAAAAAAAAA | ||
|---|---|---|---|---|---|
| 题目名称 | 194.[USACO Mar03] 奶酪工厂 | 最终得分 | 100 | ||
| 用户昵称 | 是否通过 | 通过 | |||
| 代码语言 | Pascal | 运行时间 | 0.078 s | ||
| 提交时间 | 2008-11-05 19:13:52 | 内存使用 | 0.19 MiB | ||
program EmberAsh;
var
i,j,k,n,m,s,t:longint;
a,b:array[0..10000] of longint;
min:qword;
fin,fout:text;
BEGIN
assign(fin,'factory.in');reset(fin);
assign(fout,'factory.out');rewrite(fout);
readln(fin,n,s);
readln(fin,a[1],b[1]);
min:=a[1]*b[1];
for i:=2 to n do
begin
readln(fin,a[i],b[i]);
if a[i]>a[i-1]+s then
a[i]:=a[i-1]+s;
min:=min+a[i]*b[i];
end;
writeln(fout,min);
close(fin);close(fout);
END.