jzoj 2040. 【2016.5.21普及组模拟】博物馆

2040. 【2016.5.21普及组模拟】博物馆 
(File IO): input:museum.in output:museum.out

时间限制:  1000 ms  空间限制:  262144 KB  具体限制  

Goto ProblemSet

题目描述

     从前，有一个偌大的博物馆，每天都会有数以万计的人们来参观，欣赏这里的艺术作品。这一天，博物馆来了N批人，第i批人有Ai个人以及一个导游组成，他们依次到达，但同时也有一些批次的人离开，由于人次太多，博物馆的管理人员递给你一些人数表，就请你来统计一下剩下多少人。

 

注意导游！

代码：

const
  maxn=1000000;
var
  a:array[0..maxn] of longint;
  i,x,y,ans,n,p:longint;
begin
   assign(input,'museum.in');reset(input);
  assign(output,'museum.out');rewrite(output);
  readln(n);
  p:=1;
  for i:=1 to n do
    begin
      read(x);
      if x=0 then
       begin
        readln(a[p]);
        inc(ans,a[p]+1);
        inc(p);
       end
      else begin
             readln(y);
             dec(ans,a[y]+1);
           end;
    end;
  writeln(ans);
  close(input);close(output);
end.