#include <iostream>
#include <algorithm>
#include <bitset>
#include <map>
#include <queue>
#include <set>
#include <stack>
#include <string>
#include <utility>
#include <vector>
#include <complex>
#include <string.h>
#include <numeric>
using namespace std;

//#define int long long
#define reps(i,s,n) for(int (i)=(s);(i)<(n);++(i))
#define rep(i,n) reps(i,0,n)
#define rept(i,n) rep(i,(n)+1)
#define repst(i,s,n) reps(i,s,(n)+1)
#define reprt(i,n,t) for(int (i)=(n);(i)>=(t);--(i))
#define repr(i,n) reprt(i,n,0)
#define each(i,v) for(auto &(i):(v))
#define eachr(i,v) for(auto &(i)=(v).rbegin();(i)!=(v).rend();(i)++)
#define all(c) (c).begin(),(c).end()
#define rall(c) (c).rbegin(),(c).rend()
#define pb push_back
#define mp make_pair
#define fi first
#define se second
#define tmax(x,y,z) max(x,max(y,z))
#define tmin(x,y,z) min(x,min(y,z))
#define chmin(x,y) x=min(x,y)
#define chmax(x,y) x=max(x,y)
#define ln '\n'
#define bln(i,n) (((i)==(n)-1)?'\n':' ')
#define dbg(x) cout<<#x" = "<<(x)<<ln<<flush
#define dbga(x,n) {cout<<#x" : ";for(int (i)=0;i<(n);++i){cout<<((x)[i])<<(i==((n)-1)?'\n':' ')<<flush;}}
#define zero(a) memset(a,0,sizeof(a))
#define unq(a) sort(all(a)),a.erase(unique(all(a)),a.end())
#define endl "\n"

//typedef complex<double> P;
typedef long long ll;
typedef pair<int,int> pii;
typedef pair<ll,ll> pll;
typedef vector<int> vi;
typedef vector<ll> vl;
typedef vector<string> vst;
typedef vector<pii> vpii;
typedef vector<pll> vpll;
typedef vector<vector<int> > mat;

const ll inf = (ll)1e9+10;
const ll linf = (ll)1e18+10;
const ll mod = (ll)(1e9+7);
const int dx[] = {0, 1, 0, -1};
const int dy[] = {1, 0, -1, 0};
const int ddx[] = {0, 1, 1, 1, 0, -1, -1, -1};
const int ddy[] = {1, 1, 0, -1, -1, -1, 0, 1};
const double eps = 1e-10;

ll mop(ll a,ll b=mod-2,ll m=mod) {ll r=1;a%=m;for(;b;b>>=1){if(b&1)r=r*a%m;a=a*a%m;}return r;}
ll gcd(ll a,ll b) {return b?gcd(b,a%b):a;}
ll lcm(ll a,ll b) {return a/gcd(a,b)*b;}
bool ool(int x,int y,int h,int w) {return((x<0)||(h<=x)||(y<0)||(w<=y));}
bool deq(double a,double b) {return abs(a-b)<eps;}

struct oreno_initializer {
    oreno_initializer() {
        cin.tie(0);
        ios::sync_with_stdio(0);
    }
} oreno_initializer;



// + - -でデカイ+が作れる
// - - +で小さい-が作れる
// これら2つの操作は一切損をしない
// でかい+から小さい+を引くとか、同符号の2数に操作をするとそのぶん損をする
// どうしても損をしないといけない場合はなるべく小さい損がいい 具体的には引く方の数字の絶対値が小さいほどいい
// 逆から考えると最終的に残る2つはデカイ+と小さい-がいい
// 0がz個ある場合、z回だけ好きな数字の符号を反転できる
//
// 正負それぞれの個数をx,yとして、x=yかつx=偶数なら一切損をしない動きができる
// x=0 or y=0なら絶対値が一番小さい数字から大きい数字を引いて異符号を1個作ってから色々やればいい
// そうじゃない場合は+か-に寄せる漢字

int n, t, x, y, res;
vector<int> a, b;

signed main() {
    cin >> n;
    if (n==2) {
        cin >> x >> y;
        if (x<y) swap(x,y);
        cout << x-y << endl;
        cout << x << ' ' << y << endl;
        return 0;
    }
    rep(i,n) {
        cin >> t;
        (0<=t ? a : b).push_back(t);
    }
    x = a.size(), y = b.size();
    sort(all(a)), sort(all(b));
    each(i,a) res += abs(i);
    each(i,b) res += abs(i);

    if (x==0) {
        res -= abs(b.back())*2;
        cout << res << endl;
        cout << b.back() << ' ' << b[0] << endl;
        a.push_back(b.back() - b[0]);
        b.pop_back(), b.erase(b.begin());
        x++, y--, y--;
    }
    else if (y==0) {
        res -= abs(a[0])*2;
        cout << res << endl;
        cout << a[0] << ' ' << a.back() << endl;
        b.push_back(a[0] - a.back());
        a.pop_back(), a.erase(a.begin());
        x--, x--, y++;
    }
    else cout << res << endl;

    while (b.size()>=2) {
        cout << a[0] << ' ' << b.back() << endl;
        a[0] -= b.back();
        b.pop_back();
    }
    while (a.size()>=2) {
        cout << b[0] << ' ' << a.back() << endl;
        b[0] -= a.back();
        a.pop_back();
    }
    cout << a[0] << ' ' << b[0] << endl;
}


Measured memory_bytes: 2424