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

#define int64 long long int
#define arb node*

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[1000001];
int64 V_val[1000001];

char rez[20000001];
char* rezP = rez;

char DATA[20000001];
char *buff;

int get_nr() {
     int tmp = 0;
     for (int i = 0; buff[i] != 0; i++) {
         tmp = tmp * 10 + (buff[i] - '0');
     } 
     return tmp;     
}

void read_() {
     FILE* in = fopen("huffman.in", "r");
     fseek(in, 0, SEEK_END);
     int64 in_size = ftell(in);
     fseek(in, 0, SEEK_SET);
     fread(DATA, 1, in_size, in);
     
     buff = strtok(DATA, "\n\0 ");
     n = get_nr();
     
     buff = strtok(NULL, "\n\0 ");
     
     for (int i = 0; i < n; i++) {
         int x = get_nr();
         
         arb El = new node();
         El->frecv = x;     
         El->poz = i;
         Init.push(El);
         buff = strtok(NULL, "\n\0 ");
     } 
     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; 
         
         A.push(Fin);  
         S += Fin->frecv;   
     }
}

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);     
    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;
}