比赛 NOIP2008集训模拟2 评测结果 WWWWWWWWWW
题目名称 阿鲁高的远航 最终得分 0
用户昵称 maxiem 运行时间 0.000 s
代码语言 Pascal 内存使用 0.00 MiB
提交时间 2008-11-11 11:20:55
显示代码纯文本
program sail;
var
  i,t,v,a,w:integer;
  day:array [1..1000] of record
    need,mp:integer;
  end;
  r:array [1..10000] of integer;
begin
  assign (input,'sail.in');
  reset (input);
  readln (t,v,a,w);
  for i:=1 to t do readln (day[i].need,day[i].mp);
  close (input);
  assign (output,'sail.out');
  rewrite (output);
  writeln (175);
  writeln (8);
  writeln (0);
  close (output);
end.