记录编号 130188 评测结果 AAAAAAAAAAAAAAATAAAAT
题目名称 [HAOI 2014]贴海报 最终得分 90
用户昵称 Gravatar传奇 是否通过 未通过
代码语言 Pascal 运行时间 2.426 s
提交时间 2014-10-21 20:52:39 内存使用 76.46 MiB
显示代码纯文本
program cojs1682;
var
  a,b,i,j,k,m,n,ans:longint;
  z,x:array[1..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
    begin
      readln(a,b);
      for j:=a to b do
        z[j]:=i;
    end;
  for i:=1 to n do
    if z[i]<>0 then x[z[i]]:=1;
  k:=0;
  for i:=1 to m do
    if x[i]<>0 then inc(ans);
  writeln(ans);

  close(input);
  close(output);
end.