第1题：宁宁爱化学
宁宁很喜欢化学课。最近要做一个实验，他需要用到N化学物质。在实验的时候，他需要将所有化学物质主在桌面上，按次序排成一条直线。然而每一种化学物质都是危险品，对于第i个化学物质，如果有其它的化学化学物质与它的距离小于Ai，那么就会发生爆炸。
宁宁想知道要安全的完成他的实验，桌子最短可以多短。
【输入说明】
第1行 一个整数N，表示化学物质的个数；
第2行 有N个整数， 第i个整数Ai，表示第i个化学物质必须与其它化学物质保持的距离。
【输出说明】 ’
输出共一行一个整数， 表示能够让宁宁安全完成实验的桌子最小长度。
【样例输入】
表示；
3
3 1 2
【样例输出】
5
【程序清单】

var
  n,i:longint;
  ans:int64;
  a:array[1..1000005] of longint;
  function max(a,b:longint):longint;
  begin
    if a>b then exit(a);
           else exit(b);
  end;
  begin
    readln(n);
    for i:=1 to n do 
       read(a[i]);
    ans:=0;
    for i:=2 to n do
       ans:=ans+ max(a[i],a[i-1]) ;
    writeln(ans);
  end.