记录编号 213823 评测结果 AAAAAAAAAAAAAAAAAAAAA
题目名称 [HAOI 2014]贴海报 最终得分 100
用户昵称 Gravatar甘罗 是否通过 通过
代码语言 Pascal 运行时间 0.815 s
提交时间 2015-12-13 15:45:35 内存使用 34.67 MiB
显示代码纯文本
program zht;
var
n,m,i,t,p,ans:longint;
a,b:array[0..1000] of longint;
bh:array[0..10000000] of longint;

begin
assign(input,'ha14d.in');
assign(output,'ha14d.out');
reset(input);
rewrite(output);

readln(n,m);
for i:=1 to m do
readln(a[i],b[i]);
for i:=m downto 1 do
 begin
 t:=a[i];
 p:=bh[0];
 while t<=b[i] do
  begin
  if t>b[i] then break;
  if bh[t]=0 then begin inc(bh[0]); bh[t]:=b[i]; inc(t);continue; end;
  if bh[t]>0 then t:=bh[t]+1;

  end;
 if p<>bh[0] then inc(ans);

 end;
writeln(ans);
close(input);
close(output);

end.