#include <stdio.h>
#include <limits>
#include <fstream>
#include <cstdio>
#include <queue>

#define int64 long long int
#define arb node*
#define NMAX 1000001

using namespace std;

typedef struct node {
    int64 frecv;
    arb left;
    arb right; 
    int poz;       
} node;

queue<arb> A;
queue<arb> Init;

int n;
int64 S;
int V_h[NMAX];
int64 V_val[NMAX];

char rez[11 * NMAX];
char* rezP = rez;

void get_nr(int &tmp) {
     tmp = 0;
     
     int i = 0;
     while (rezP[i] < '0' || rezP[i] > '9') {
           i++;      
     } 
     rezP += i;
     
     for (i = 0; rezP[i] >= '0' && rezP[i] <= '9'; i++) {
         tmp = tmp * 10 + (rezP[i] - '0');
     } 
     rezP += i;  
}

void read_() {
     FILE* in = fopen("huffman.in", "r");
     fseek(in, 0, SEEK_END);
     int64 in_size = ftell(in);
     fseek(in, 0, SEEK_SET);
     fread(rez, 1, in_size, in);
     
     get_nr(n);
          
     for (int i = 0; i < n; i++) {
         int x;
         get_nr(x);
         
         arb El = new node();
         El->frecv = x;     
         El->poz = i;
         Init.push(El);
     } 
     fclose(in);
}

void solve_() {
     arb El = new node();
     El->frecv = numeric_limits<int64>::max();
     Init.push(El);
     
     node *El1, *El2, *Fin;
     for (int i = 1; i < n; i++) { 
         if (A.size() == 0 || (A.front())->frecv > (Init.front())->frecv) {
             El1 = Init.front();
             Init.pop();   
         }
         else  {
             El1 = A.front();
             A.pop();   
         } 
         
         if (A.size() == 0 ||  (A.front())->frecv > (Init.front())->frecv) {
             El2 = Init.front();
             Init.pop();   
         }
         else  {
             El2 = A.front();
             A.pop();  
         } 
         
         Fin = new node();
         Fin->frecv = El1->frecv + El2->frecv;
         Fin->left = El1;
         Fin->right = El2; 
         S += Fin->frecv;
         
         A.push(Fin);   
     }
}

void dfs_(arb H, int h, int64 val) {      
     if (H->left != NULL) {
         dfs_(H->left, h + 1, val << 1);
      
     }
     if (H->right != NULL) {
         dfs_(H->right, h + 1, (val << 1) + 1);
     }   
     if (H->left == NULL && H->right == NULL) { 
         V_h[H->poz] = h;
         V_val[H->poz] = val;     
     }
}

void print_nr_space(int64 nr){
    if (nr == 0) {
        rezP[0] = '0';
        rezP[1] = ' ';    
        rezP += 2;
    }  
    else {
        int crt = 0;
        char cuv[20];
        while (nr != 0) {
             cuv[crt++] = nr % 10;
             nr /= 10;     
        } 
        for (int i = crt - 1; i >= 0; i--) {
             rezP[crt - 1 - i] = cuv[i] + '0';
        }   
        rezP[crt] = ' ';    
        rezP += (crt + 1); 
    }
}


void print_nr_newL(int64 nr){
    if (nr == 0) {
        rezP[0] = '0';
        rezP[1] = '\n';     
        rezP += 2;
    }  
    else {
        int crt = 0;
        char cuv[20];
        while (nr != 0) {
             cuv[crt++] = nr % 10;
             nr /= 10;     
        } 
        for (int i = crt - 1; i >= 0; i--) {
             rezP[crt - 1 - i] = cuv[i] + '0';
        }   
        rezP[crt] = '\n';   
        rezP += (crt + 1); 
    }
}

void print_() {
    ofstream out("huffman.out", ios::binary);     
    rezP = rez;     
    print_nr_newL(S);
    for (int i = 0; i < n; i++) {
        print_nr_space(V_h[i]);
        print_nr_newL(V_val[i]);
    }    
    out.write(rez,rezP - rez);  
    out.close();
}
    
int main() {
    //freopen("huffman.in", "r", stdin);
    //freopen("huffman.out", "w", stdout);
    
    read_();  
    solve_();
    dfs_(A.front(), 0, 0);
    print_();    
    return 0;
}