結果
問題 | No.5014 セクスタプル (reactive) |
ユーザー | wanui |
提出日時 | 2022-12-29 22:00:16 |
言語 | C++17 (gcc 12.3.0 + boost 1.83.0) |
結果 |
AC
|
実行時間 | 1,840 ms / 2,000 ms |
コード長 | 9,580 bytes |
コンパイル時間 | 2,444 ms |
実行使用メモリ | 22,832 KB |
スコア | 637,599,676 |
平均クエリ数 | 34.65 |
最終ジャッジ日時 | 2022-12-29 22:05:48 |
合計ジャッジ時間 | 175,179 ms |
ジャッジサーバーID (参考情報) |
judge15 / judge11 |
純コード判定しない問題か言語 |
(要ログイン)
テストケース
テストケース表示入力 | 結果 | 実行時間 実行使用メモリ |
---|---|---|
testcase_00 | AC | 1,639 ms
21,880 KB |
testcase_01 | AC | 1,640 ms
22,596 KB |
testcase_02 | AC | 1,692 ms
21,928 KB |
testcase_03 | AC | 1,697 ms
22,204 KB |
testcase_04 | AC | 1,676 ms
21,904 KB |
testcase_05 | AC | 1,662 ms
21,892 KB |
testcase_06 | AC | 1,640 ms
22,432 KB |
testcase_07 | AC | 1,686 ms
22,600 KB |
testcase_08 | AC | 1,648 ms
21,980 KB |
testcase_09 | AC | 1,810 ms
22,576 KB |
testcase_10 | AC | 1,651 ms
22,204 KB |
testcase_11 | AC | 1,631 ms
21,892 KB |
testcase_12 | AC | 1,612 ms
21,928 KB |
testcase_13 | AC | 1,592 ms
21,768 KB |
testcase_14 | AC | 1,650 ms
22,264 KB |
testcase_15 | AC | 1,650 ms
21,892 KB |
testcase_16 | AC | 1,597 ms
21,928 KB |
testcase_17 | AC | 1,624 ms
22,204 KB |
testcase_18 | AC | 1,638 ms
21,916 KB |
testcase_19 | AC | 1,670 ms
21,868 KB |
testcase_20 | AC | 1,616 ms
21,940 KB |
testcase_21 | AC | 1,594 ms
22,432 KB |
testcase_22 | AC | 1,656 ms
22,192 KB |
testcase_23 | AC | 1,673 ms
21,916 KB |
testcase_24 | AC | 1,589 ms
21,940 KB |
testcase_25 | AC | 1,605 ms
21,968 KB |
testcase_26 | AC | 1,626 ms
21,928 KB |
testcase_27 | AC | 1,635 ms
22,204 KB |
testcase_28 | AC | 1,678 ms
22,528 KB |
testcase_29 | AC | 1,642 ms
22,432 KB |
testcase_30 | AC | 1,596 ms
22,240 KB |
testcase_31 | AC | 1,655 ms
22,608 KB |
testcase_32 | AC | 1,541 ms
22,564 KB |
testcase_33 | AC | 1,629 ms
21,940 KB |
testcase_34 | AC | 1,693 ms
22,564 KB |
testcase_35 | AC | 1,647 ms
21,868 KB |
testcase_36 | AC | 1,700 ms
22,680 KB |
testcase_37 | AC | 1,638 ms
22,588 KB |
testcase_38 | AC | 1,609 ms
21,952 KB |
testcase_39 | AC | 1,665 ms
21,968 KB |
testcase_40 | AC | 1,607 ms
21,756 KB |
testcase_41 | AC | 1,670 ms
22,576 KB |
testcase_42 | AC | 1,677 ms
21,756 KB |
testcase_43 | AC | 1,638 ms
21,660 KB |
testcase_44 | AC | 1,667 ms
21,892 KB |
testcase_45 | AC | 1,626 ms
21,880 KB |
testcase_46 | AC | 1,672 ms
22,264 KB |
testcase_47 | AC | 1,616 ms
21,768 KB |
testcase_48 | AC | 1,648 ms
22,564 KB |
testcase_49 | AC | 1,674 ms
22,692 KB |
testcase_50 | AC | 1,717 ms
21,928 KB |
testcase_51 | AC | 1,657 ms
21,980 KB |
testcase_52 | AC | 1,647 ms
21,904 KB |
testcase_53 | AC | 1,668 ms
21,940 KB |
testcase_54 | AC | 1,607 ms
22,372 KB |
testcase_55 | AC | 1,632 ms
21,868 KB |
testcase_56 | AC | 1,840 ms
22,588 KB |
testcase_57 | AC | 1,836 ms
22,832 KB |
testcase_58 | AC | 1,600 ms
22,240 KB |
testcase_59 | AC | 1,671 ms
21,928 KB |
testcase_60 | AC | 1,617 ms
21,868 KB |
testcase_61 | AC | 1,630 ms
22,588 KB |
testcase_62 | AC | 1,733 ms
21,904 KB |
testcase_63 | AC | 1,688 ms
21,868 KB |
testcase_64 | AC | 1,661 ms
21,756 KB |
testcase_65 | AC | 1,688 ms
21,980 KB |
testcase_66 | AC | 1,624 ms
21,844 KB |
testcase_67 | AC | 1,580 ms
21,916 KB |
testcase_68 | AC | 1,651 ms
22,576 KB |
testcase_69 | AC | 1,641 ms
22,192 KB |
testcase_70 | AC | 1,650 ms
21,992 KB |
testcase_71 | AC | 1,711 ms
21,928 KB |
testcase_72 | AC | 1,624 ms
21,892 KB |
testcase_73 | AC | 1,651 ms
21,880 KB |
testcase_74 | AC | 1,708 ms
22,564 KB |
testcase_75 | AC | 1,654 ms
21,756 KB |
testcase_76 | AC | 1,631 ms
21,880 KB |
testcase_77 | AC | 1,706 ms
21,980 KB |
testcase_78 | AC | 1,600 ms
21,928 KB |
testcase_79 | AC | 1,665 ms
21,916 KB |
testcase_80 | AC | 1,575 ms
21,928 KB |
testcase_81 | AC | 1,621 ms
22,204 KB |
testcase_82 | AC | 1,655 ms
21,928 KB |
testcase_83 | AC | 1,704 ms
22,204 KB |
testcase_84 | AC | 1,608 ms
21,744 KB |
testcase_85 | AC | 1,654 ms
22,240 KB |
testcase_86 | AC | 1,783 ms
21,576 KB |
testcase_87 | AC | 1,678 ms
21,892 KB |
testcase_88 | AC | 1,662 ms
22,576 KB |
testcase_89 | AC | 1,687 ms
22,432 KB |
testcase_90 | AC | 1,643 ms
21,928 KB |
testcase_91 | AC | 1,639 ms
22,600 KB |
testcase_92 | AC | 1,636 ms
21,744 KB |
testcase_93 | AC | 1,620 ms
22,216 KB |
testcase_94 | AC | 1,615 ms
21,980 KB |
testcase_95 | AC | 1,666 ms
21,940 KB |
testcase_96 | AC | 1,613 ms
22,420 KB |
testcase_97 | AC | 1,656 ms
22,432 KB |
testcase_98 | AC | 1,686 ms
21,928 KB |
testcase_99 | AC | 1,699 ms
22,600 KB |
ソースコード
#include <bits/stdc++.h> // clang-format off using namespace std; void print0(){}; template<typename H,typename... T> void print0(H h,T... t){cout<<h;print0(t...);} void print(){print0("\n");}; template<typename H,typename... T>void print(H h,T... t){print0(h);if(sizeof...(T)>0)print0(" ");print(t...);} #define debug1(a) { cerr<<#a<<":"<<a<<endl; } #define debug2(a,b) { cerr<<#a<<":"<<a<<" "<<#b<<":"<<b<<endl; } #define debug3(a,b,c) { cerr<<#a<<":"<<a<<" "<<#b<<":"<<b<<" "<<#c<<":"<<c<<endl; } #define debug4(a,b,c,d) { cerr<<#a<<":"<<a<<" "<<#b<<":"<<b<<" "<<#c<<":"<<c<<" "<<#d<<":"<<d<<endl; } using pii = pair<int,int>; // clang-format on namespace marathon { mt19937 engine(0); clock_t start_time; double now() { return 1000.0 * (clock() - start_time) / CLOCKS_PER_SEC; } void marathon_init() { start_time = clock(); random_device seed_gen; engine.seed(seed_gen()); } int randint(int mn, int mx) { int rng = mx - mn + 1; return mn + (engine() % rng); } bool anneal_accept(double new_score, double old_score, double cur_time, double begin_time, double end_time, double begin_temp, double end_temp) { const int ANNEAL_RND = 1e8; const double ANNEAL_EPS = 1e-6; double temp = (begin_temp * (end_time - cur_time) + end_temp * (cur_time - begin_time)) / (end_time - begin_time); return (exp((new_score - old_score) / temp) > double(engine() % ANNEAL_RND) / ANNEAL_RND + ANNEAL_EPS); } } // namespace marathon const int N2 = 36; const int N = 6; const int SCORE_BASE = 3; const double END_TIME = 1900; struct six { int val[6]; }; struct monte_carlo_state { bool row_exist[6][6]; bool col_exist[6][6]; int row_cnt[6][6]; int col_cnt[6][6]; }; vector<six> all_rolls; map<vector<int>, int> rev_all_rolls; void make_all_rolls() { for (int a = 0; a < N; a++) { for (int b = 0; b < N; b++) { for (int c = 0; c < N; c++) { for (int d = 0; d < N; d++) { for (int e = 0; e < N; e++) { for (int f = 0; f < N; f++) { six s; for (int j = 0; j < N; j++) { s.val[j] = 0; } s.val[a]++; s.val[b]++; s.val[c]++; s.val[d]++; s.val[e]++; s.val[f]++; vector<int> r(N); for (int j = 0; j < N; j++) { r[j] = s.val[j]; } rev_all_rolls[r] = all_rolls.size(); all_rolls.push_back(s); } } } } } } } int calc_score(vector<vector<int>> &perm, vector<int> &rolls) { int score = 0; for (int i = 0; i < N; i++) { for (int d = 0; d < N; d++) { int cnt = 0; for (int j = 0; j < N; j++) { int rollid = perm[i][j]; int roll_cnt = all_rolls[rolls[rollid]].val[d]; if (!roll_cnt) { cnt = 0; break; } cnt += roll_cnt; } if (!cnt) continue; score += cnt - N + SCORE_BASE; } } for (int j = 0; j < N; j++) { for (int d = 0; d < N; d++) { int cnt = 0; for (int i = 0; i < N; i++) { int rollid = perm[i][j]; int roll_cnt = all_rolls[rolls[rollid]].val[d]; if (!roll_cnt) { cnt = 0; break; } cnt += roll_cnt; } if (!cnt) continue; score += cnt - N + SCORE_BASE; } } return score; } int row_score(vector<vector<int>> &perm, vector<six> &rolls, int xi) { int score = 0; { for (int d = 0; d < N; d++) { int cnt = 0; for (int j = 0; j < N; j++) { int rollid = perm[xi][j]; int roll_cnt = rolls[rollid].val[d]; if (!roll_cnt) { cnt = 0; break; } cnt += roll_cnt; } if (!cnt) continue; score += cnt - N + SCORE_BASE; } } return score; } int random_dice_roll() { return marathon::engine() % all_rolls.size(); } void update_state(monte_carlo_state &st, six roll, int i, int j) { for (int d = 0; d < N; d++) { st.row_cnt[i][d] += roll.val[d]; st.row_exist[i][d] &= (roll.val[d] > 0); st.col_cnt[j][d] += roll.val[d]; st.col_exist[j][d] &= (roll.val[d] > 0); } } int monte_carlo_score1(int s_turn, vector<int> s_rolls, vector<vector<int>> s_perm, int si, int sj) { int MONTE_CARLO_ITER = 800; if (s_turn < 10) MONTE_CARLO_ITER = 560; int score = 0; s_perm[si][sj] = s_turn; for (int iter = 0; iter < MONTE_CARLO_ITER; iter++) { auto rolls = s_rolls; auto perm = s_perm; vector<pii> rests; for (int i = 0; i < N; i++) { for (int j = 0; j < N; j++) { if (perm[i][j] < 0) rests.push_back({i, j}); } } shuffle(rests.begin(), rests.end(), marathon::engine); for (int turn = s_turn + 1; turn < N2; turn++) { pii pt = rests.back(); rests.pop_back(); perm[pt.first][pt.second] = turn; rolls[turn] = random_dice_roll(); } score += calc_score(perm, rolls); } return score; } int monte_carlo_score2(int s_turn, vector<int> s_rolls, vector<vector<int>> s_perm, int si, int sj) { int MONTE_CARLO_ITER = 400; if (s_turn < 10) MONTE_CARLO_ITER = 280; s_perm[si][sj] = s_turn; int score = 0; monte_carlo_state s_st; for (int i = 0; i < N; i++) { for (int d = 0; d < N; d++) { s_st.row_exist[i][d] = true; s_st.row_cnt[i][d] = 0; s_st.col_exist[i][d] = true; s_st.col_cnt[i][d] = 0; } } for (int i = 0; i < N; i++) { for (int j = 0; j < N; j++) { if (s_perm[i][j] >= 0) { int rollid = s_perm[i][j]; six roll = all_rolls[s_rolls[rollid]]; update_state(s_st, roll, i, j); } } } for (int iter = 0; iter < MONTE_CARLO_ITER; iter++) { auto rolls = s_rolls; auto perm = s_perm; monte_carlo_state st = s_st; for (int turn = s_turn + 1; turn < N2; turn++) { int rollid = random_dice_roll(); six roll = all_rolls[rollid]; rolls[turn] = rollid; pii pt; int bestscore = -1; for (int i = 0; i < N; i++) { for (int j = 0; j < N; j++) { if (perm[i][j] >= 0) continue; int score = marathon::randint(1, 99); for (int d = 0; d < N; d++) { if (st.row_exist[i][d] && roll.val[d]) score += (roll.val[d] + st.row_cnt[i][d]) * 100; if (st.col_exist[j][d] && roll.val[d]) score += (roll.val[d] + st.col_cnt[j][d]) * 100; } if (bestscore < score) { bestscore = score; pt = {i, j}; } } } update_state(st, roll, pt.first, pt.second); perm[pt.first][pt.second] = turn; } score += calc_score(perm, rolls); } return score; } pii select_op(int turn, vector<int> &rolls, vector<vector<int>> &perm) { vector<pair<int, pii>> scores; for (int i = 0; i < N; i++) { for (int j = 0; j < N; j++) { if (perm[i][j] >= 0) continue; int score = monte_carlo_score1(turn, rolls, perm, i, j); scores.push_back({score, {i, j}}); } } sort(scores.rbegin(), scores.rend()); if (scores.size() <= 2) { return scores[0].second; } vector<pii> cand; cand.push_back(scores[0].second); cand.push_back(scores[1].second); cand.push_back(scores[2].second); scores.clear(); for (auto pt : cand) { int score = monte_carlo_score2(turn, rolls, perm, pt.first, pt.second); scores.push_back({score, {pt.first, pt.second}}); } sort(scores.rbegin(), scores.rend()); return scores[0].second; } int main() { marathon::marathon_init(); make_all_rolls(); vector<int> rolls(N2); vector<vector<int>> perm(N, vector<int>(N, -1)); for (int turn = 0; turn < N2 - 1; turn++) { vector<int> s(N); for (int j = 0; j < N; j++) { int d; cin >> d; d--; s[d]++; } rolls[turn] = rev_all_rolls[s]; pii op = select_op(turn, rolls, perm); cout << op.first + 1 << " " << op.second + 1 << endl; perm[op.first][op.second] = turn; } { rolls[N2 - 1] = random_dice_roll(); for (int i = 0; i < N; i++) { for (int j = 0; j < N; j++) { if (perm[i][j] < 0) { perm[i][j] = N2 - 1; } } } int score = calc_score(perm, rolls); int now = marathon::now(); debug2(score, now); } return 0; }