ac1131.pas

来自「某牛人写的acm.tongji.edu.cn上大部分ac的代码,仅供学习研究,请」· PAS 代码 · 共 19 行

program tju1131;
var
  n,x:longint;
  a:qword;
begin
  repeat
    read(n);
    n:=power(2,n);
    a:=n+1;
    a:=a*n div 2;
    repeat
      read(x);
      dec(a,x);
      dec(n);
    until n=1;
    writeln(a);
  until seekeof;
end.