POJ 1010 STAMPS

#include <cstdio>
#include <cstring>
#include <algorithm>
using namespace std;

#define N 25

struct Node {
    int typ, num, mx, amo[N];  //种类数,张数,最大面值,各种类数量
} p, t;
int a[N], x, n, ans;

void dfs(int num, int val, int crt) {  //当前数量,当前总面值,第crt种
    if (val == x) {  //符合条件
        t.typ = t.mx = 0;
        t.num = num;
        for (int i = 0; i < n; ++i) {  //计算数据
            if (t.amo[i]) {
                ++t.typ;
                if (t.mx < a[i]) {
                    t.mx = a[i];
                }
            }
        }
        if (t.typ > p.typ || t.typ == p.typ && t.num < p.num || t.typ == p.typ && t.num == p.num && t.mx > p.mx) {
            ans = 1;  //得到更佳方案
            p = t;
        }
        else if (t.typ == p.typ && t.num == p.num && t.mx == p.mx) {
            ++ans;  //方案相同
        }
        return;
    }
    for (int i = 0; i < 5; ++i) {  //枚举当前种邮票的张数
        if (num + i <= 4 && val + i * a[crt] <= x && crt < n) {  //剪枝
            t.amo[crt] += i;
            dfs(num + i, val + i * a[crt], crt + 1);
            t.amo[crt] -= i;
        }
    }
}

int main() {
    while (~scanf("%d", &x) && x) {
        for (a[n = 0] = x, n++;;) {
            scanf("%d", &x);
            if (!x) {
                break;
            }
            int cnt = 0;
            for (int i = 0; i < n; ++i) {
                if (a[i] == x) {
                    ++cnt;
                }
            }
            if (cnt < 5) {  //同面值保留5种
                a[n++] = x;
            }
        }
        sort(a, a + n);  //按面值从小到大排序
        while (~scanf("%d", &x) && x) {
            ans = 0;
            memset(&t, 0, sizeof(t));
            memset(&p, 0, sizeof(p));
            dfs(0, 0, 0);
            printf("%d ", x);
            if (!ans) {  //没有方案
                printf("---- none\n");
            }
            else if (ans > 1) {  //多于一个最佳方案
                printf("(%d): tie\n", p.typ);
            }
            else {
                printf("(%d):", p.typ);
                for (int i = 0; i < n; ++i) {
                    if (p.amo[i]) {
                        for (int j = 0; j < p.amo[i]; ++j) {
                            printf(" %d", a[i]);
                        }
                    }
                }
                printf("\n");
            }
        }
    }
    return 0;
}