Cod sursa(job #2062455)

Utilizator Alex18maiAlex Enache Alex18mai Data 10 noiembrie 2017 14:11:14
Problema Coduri Huffman Scor 100
Compilator cpp Status done
Runda Arhiva educationala Marime 3.8 kb
#include <fstream>
#include <queue>

using namespace std;

//ifstream cin ("huffman.in");
//ofstream cout ("huffman.out");

pair<int , int> node[2000100];
long long val[2000100];
pair<int , long long> ans[1000100];

queue <int> q;
queue <int> Q;

class InParser {
private:
    FILE *fin;
    char *buff;
    int sp;

    char read_ch() {
        ++sp;
        if (sp == 4096) {
            sp = 0;
            fread(buff, 1, 4096, fin);
        }
        return buff[sp];
    }

public:
    InParser(const char* nume) {
        fin = fopen(nume, "r");
        buff = new char[4096]();
        sp = 4095;
    }

    InParser& operator >> (int &n) {
        char c;
        while (!isdigit(c = read_ch()) && c != '-');
        int sgn = 1;
        if (c == '-') {
            n = 0;
            sgn = -1;
        } else {
            n = c - '0';
        }
        while (isdigit(c = read_ch())) {
            n = 10 * n + c - '0';
        }
        n *= sgn;
        return *this;
    }

    InParser& operator >> (long long &n) {
        char c;
        n = 0;
        while (!isdigit(c = read_ch()) && c != '-');
        long long sgn = 1;
        if (c == '-') {
            n = 0;
            sgn = -1;
        } else {
            n = c - '0';
        }
        while (isdigit(c = read_ch())) {
            n = 10 * n + c - '0';
        }
        n *= sgn;
        return *this;
    }
};

class OutParser {
private:
    FILE *fout;
    char *buff;
    int sp;

    void write_ch(char ch) {
        if (sp == 50000) {
            fwrite(buff, 1, 50000, fout);
            sp = 0;
            buff[sp++] = ch;
        } else {
            buff[sp++] = ch;
        }
    }


public:
    OutParser(const char* name) {
        fout = fopen(name, "w");
        buff = new char[50000]();
        sp = 0;
    }
    ~OutParser() {
        fwrite(buff, 1, sp, fout);
        fclose(fout);
    }

    OutParser& operator << (int vu32) {
        if (vu32 <= 9) {
            write_ch(vu32 + '0');
        } else {
            (*this) << (vu32 / 10);
            write_ch(vu32 % 10 + '0');
        }
        return *this;
    }

    OutParser& operator << (long long vu64) {
        if (vu64 <= 9) {
            write_ch(vu64 + '0');
        } else {
            (*this) << (vu64 / 10);
            write_ch(vu64 % 10 + '0');
        }
        return *this;
    }

    OutParser& operator << (char ch) {
        write_ch(ch);
        return *this;
    }
    OutParser& operator << (const char *ch) {
        while (*ch) {
            write_ch(*ch);
            ++ch;
        }
        return *this;
    }
};

void give_val(int &a ){
    if (q.empty()){
        a = Q.front();
        Q.pop();
    }
    else if (Q.empty()){
        a = q.front();
        q.pop();
    }
    else if (val[q.front()] < val[Q.front()]){
        a = q.front();
        q.pop();
    }
    else {
        a = Q.front();
        Q.pop();
    }
}

void dfs(int nod , int lv , long long val){

    if (node[nod].first == 0){
        ans[nod].first = lv;
        ans[nod].second = val;
        return;
    }

    dfs(node[nod].first , lv + 1 , (val << 1LL));
    dfs(node[nod].second , lv + 1 , (val << 1LL) + 1LL);

}

int main() {

    InParser fin("huffman.in");
    OutParser fout("huffman.out");

    int n;
    fin>>n;

    for (int i=1; i<=n; i++){
        int a;
        fin>>a;
        val[i] = (long long) a;
        q.push(i);
    }

    long long cont = 0;
    int nod = n;

    while (q.size() + Q.size() > 1){

        int st , dr;

        give_val(st);
        give_val(dr);

        nod ++;
        cont += val[st] + val[dr];

        Q.push(nod);
        val[nod] = val[st] + val[dr];
        node[nod].first = st;
        node[nod].second = dr;
    }

    fout<<cont<<'\n';

    dfs(nod , 0 , 0);

    for (int i=1; i<=n; i++){
        fout<<ans[i].first<<" "<<ans[i].second<<'\n';
    }

    return 0;
}