比赛 20101116 评测结果 AAAAAAAAAA
题目名称 长路上的灯 最终得分 100
用户昵称 wo shi 刘畅 运行时间 0.000 s
代码语言 Pascal 内存使用 0.00 MiB
提交时间 2010-11-16 10:03:26
显示代码纯文本
var
  n,t,i,z,min,j,max:longint;
  s:real;
  f:array[0..20000000]of boolean;

begin
  assign(input,'light.in'); reset(input);
  assign(output,'light.out'); rewrite(output);
  readln(n);
  for i:=1 to n do
  begin
    readln(s,t);
    for j:=1 to t do
    begin
      z:=trunc(j*s);
      if not f[z] then f[z]:=true
      else f[z]:=false;
      if z>max then max:=z;
      if z<min then min:=z;
    end;
  end;
  for i:=min to max do
  if f[i] then
  begin
    writeln(i);
    break;
  end;
  close(input);
  close(output);
end.