sum

题目描述

给出n 个数a1..an，求两个数相加的绝对值的最小值
即求| ai + aj | (i 不等于j) 的最小值

输入

第一行一个数n
接下一行n 个数a1..an

输出

一行一个数ans, 两个数相加的绝对值的最小值

样例输入

5
-2 6 7 7 -8

样例输出

1

数据范围限制

• 对于40% 的数据，n <= 10^3，-10^6 <= ai <= 10^6。
• 对于80% 的数据，n <= 10^5，-10^6 <= ai <= 10^6。
• 对于100% 的数据，n <= 10^6，-10^6 <= ai <= 10^6。

TJ

先用每个数的绝对值作关键字排个序，再每两个相邻的数相加求最小和。

BC

var        n,i,ans:longint;        a:array[1..1000000]of longint;procedure kp(l,r:longint);var        i,j,mid,t:longint;begin        i:=l;        j:=r;        mid:=abs(a[(l+r)div 2]);        repeat                while abs(a[i])<mid do inc(i);                while abs(a[j])>mid do dec(j);                if i<=j then                begin                        t:=a[i];                        a[i]:=a[j];                        a[j]:=t;                        inc(i);                        dec(j);                end;        until i>j;        if l<j then kp(l,j);        if i<r then kp(i,r);end;begin        assign(input,'sum.in');reset(input);        assign(output,'sum.out');rewrite(output);        readln(n);        for i:=1 to n do read(a[i]);        kp(1,n);        ans:=maxlongint;        for i:=2 to n do if abs(a[i]+a[i-1])<ans then ans:=abs(a[i]+a[i-1]);        writeln(ans);        close(input);close(output);end.