不是VIP会员,不能显示答案

题目解答

题目:
第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.
考点: 0
分析:
解答: 当前距离取两边大的数
评论:
老师: 0