提出 #67393646


ソースコード 拡げる

#include "iostream"
#include "climits"
#include "list"
#include "queue"
#include "stack"
#include "set"
#include "functional"
#include "algorithm"
#include "string"
#include "map"
#include "unordered_map"
#include "unordered_set"
#include "iomanip"
#include "cmath"
#include "random"
#include "bitset"
#include "cstdio"
#include "numeric"
#include "cassert"
#include "ctime"

using namespace std;

class XorShift {
	unsigned int x, y, z, w, t;
public:
	XorShift() {
		x = 133553533;
		y = 314867339;
		z = 664298413;
		w = 999999937;
		t = 0;
	}
	unsigned int rand() {
		t = x ^ (x << 11);
		x = y;
		y = z;
		z = w;
		w = (w ^ (w >> 19)) ^ (t ^ (t >> 8));
		return w & 0x7fffffff;
	}
};

XorShift xs;
constexpr int N = 40;
int M;
vector<vector<int>>wall(N + 2, vector<int>(N + 2));

long double best_score = 0;
vector<pair<int, int>>best_ans;

int dir[] = { 1,0,-1,0,1,0,-1 };

pair<int, int>Place(vector<vector<int>>& wall, int y, int x, int dy, int dx) {
	while (wall[y + dy][x + dx] == 0) {
		y += dy;
		x += dx;
	}
	return { y, x };
}

long double current_place_flavor = -2e3;
long double neighbour_flavor = 0.4;
long double far_flavor = -1;

vector<vector<long double>>CalculateNextP(vector<vector<long double>>p, vector<vector<int>>& wall) {
	vector<vector<long double>>np(N + 2, vector<long double>(N + 2));
	for (int i = 1; i <= N; i++) {
		long double add = 0;
		int x = 1;
		for (int j = 1; j <= N + 1; j++) {
			if (wall[i][j]) {
				np[i][j - 1] += add / 4;
				add = 0;
				x = j + 1;
			}
			else {
				np[i][x] += p[i][j] / 4;
				add += p[i][j];
			}
		}
	}
	for (int j = 1; j <= N; j++) {
		long double add = 0;
		int y = 1;
		for (int i = 1; i <= N + 1; i++) {
			if (wall[i][j]) {
				np[i - 1][j] += add / 4;
				add = 0;
				y = i + 1;
			}
			else {
				add += p[i][j];
				np[y][j] += p[i][j] / 4;
			}
		}
	}
	return np;
}

long double CalculateNeighbourFlavor(vector<vector<long double>>& p, vector<vector<int>>& wall, int y, int x) {
	long double ret = 0;
	for (int d = 0; d < 4; d++) {
		ret += p[y + dir[d]][x + dir[d + 1]] * neighbour_flavor;
		auto n = Place(wall, y, x, dir[d], dir[d + 1]);
		if (abs(y - n.first) + abs(x - n.second) > 1) {
			ret += p[n.first][n.second] * far_flavor;
		}
	}
	return ret;
}

vector<vector<long double>>InitP() {
	vector<vector<long double>>p(N + 2, vector<long double>(N + 2));
	for (int i = 1; i <= N; i++) {
		for (int j = 1; j <= N; j++) {
			if (wall[i][j])continue;
			p[i][j] = 1;
			p[i][j] /= N * N - M;
		}
	}
	return p;
}

clock_t st;

pair<vector<pair<int, int>>, long double>Build() {
	auto p = InitP();
	long double add = 1;
	auto current_wall = wall;
	vector<pair<int, int>>ans;
	long double score = 0;
	for (int loop = 0; loop < N * N - M; loop++) {
		auto np = CalculateNextP(p, current_wall);
		long double best_flavor = -1e9;
		pair<int, int> best_place = { 0,0 };
		for (int i = 1; i <= N; i++) {
			for (int j = 1; j <= N; j++) {
				if (current_wall[i][j])continue;
				long double current_flavor = current_place_flavor * np[i][j];
				current_flavor += CalculateNeighbourFlavor(np, current_wall, i, j);
				if (best_flavor < current_flavor) {
					best_flavor = current_flavor;
					best_place = { i,j };
				}
			}
		}
		add -= np[best_place.first][best_place.second];
		score += add;
		np[best_place.first][best_place.second] = 0;
		p = np;
		ans.push_back(best_place);
		current_wall[best_place.first][best_place.second] = 1;
	}
	return { ans,score };
}

void Init() {
	int dummy;
	cin >> dummy;
	st = clock();
	cin >> M;
	for (int i = 0; i < N + 2; i++) {
		wall.front()[i] = wall[i].front() = wall.back()[i] = wall[i].back() = 1;
	}
	for (int i = 0; i < N; i++) {
		string s;
		cin >> s;
		for (int j = 0; j < N; j++) {
			if (s[j] == '#') {
				wall[i + 1][j + 1] = 1;
			}
		}
	}
	// 広場+階段みたいな構造が強そう
	// うそっぽい

	vector<pair<int, int>>ans;
	long double score = 0;
	tie(best_ans, best_score) = Build();
	current_place_flavor = -1e3;
	neighbour_flavor = 0.4;
	far_flavor = -1;
	tie(ans, score) = Build();
	if (best_score < score) {
		best_score = score;
		best_ans = ans;
	}
	current_place_flavor = -2e3;
	neighbour_flavor = 0.3;
	far_flavor = -1;
	tie(ans, score) = Build();
	if (best_score < score) {
		best_score = score;
		best_ans = ans;
	}
	current_place_flavor = -1e3;
	neighbour_flavor = 0.3;
	far_flavor = -1;
	tie(ans, score) = Build();
	if (best_score < score) {
		best_score = score;
		best_ans = ans;
	}
}

long double CalculateScore(vector<pair<int, int>>ans) {
	auto current_wall = wall;
	auto p = InitP();
	long double add = 1;
	long double score = 0;
	for (auto i : ans) {
		auto np = CalculateNextP(p, current_wall);
		add -= np[i.first][i.second];
		score += add;
		np[i.first][i.second] = 0;
		p = np;
		current_wall[i.first][i.second] = 1;
	}
	return score;
}

void Solve() {
	int cnt = 0;
	auto ans = best_ans;
	while (1) {
		cnt++;
		if (cnt % 1 == 0) {
			auto ed = clock();
			if ((ed - st) * 1000 / CLOCKS_PER_SEC > 1900) {
				cerr << cnt << endl;
				break;
			}
		}
		int a = xs.rand() % best_ans.size();
		int b = xs.rand() % (best_ans.size() - 1);
		b += a;
		b %= best_ans.size();
		if (a > b)swap(a, b);
		swap(ans[a], ans[b]);
		auto current_score = CalculateScore(ans);
		//cerr << current_score << endl;
		if (best_score < current_score) {
			best_score = current_score;
			best_ans = ans;
			cerr << best_score << endl;
		}
		else {
			swap(ans[a], ans[b]);
		}
	}
}

void Output() {
	for (auto i : best_ans) {
		cout << i.first - 1 << " " << i.second - 1 << endl;
	}
	cerr << best_score / (N * N - M - 1) << endl;
}

int main() {
	ios::sync_with_stdio(false);
	cin.tie(0);

	Init();
	Solve();
	Output();
}

提出情報

提出日時
問題 A - Gamble on Ice
ユーザ olphe
言語 C++ 23 (gcc 12.2)
得点 148698589
コード長 5940 Byte
結果 AC
実行時間 1924 ms
メモリ 4144 KiB

ジャッジ結果

セット名 test_ALL
得点 / 配点 148698589 / 150000000
結果
AC × 150
セット名 テストケース
test_ALL test_0000.txt, test_0001.txt, test_0002.txt, test_0003.txt, test_0004.txt, test_0005.txt, test_0006.txt, test_0007.txt, test_0008.txt, test_0009.txt, test_0010.txt, test_0011.txt, test_0012.txt, test_0013.txt, test_0014.txt, test_0015.txt, test_0016.txt, test_0017.txt, test_0018.txt, test_0019.txt, test_0020.txt, test_0021.txt, test_0022.txt, test_0023.txt, test_0024.txt, test_0025.txt, test_0026.txt, test_0027.txt, test_0028.txt, test_0029.txt, test_0030.txt, test_0031.txt, test_0032.txt, test_0033.txt, test_0034.txt, test_0035.txt, test_0036.txt, test_0037.txt, test_0038.txt, test_0039.txt, test_0040.txt, test_0041.txt, test_0042.txt, test_0043.txt, test_0044.txt, test_0045.txt, test_0046.txt, test_0047.txt, test_0048.txt, test_0049.txt, test_0050.txt, test_0051.txt, test_0052.txt, test_0053.txt, test_0054.txt, test_0055.txt, test_0056.txt, test_0057.txt, test_0058.txt, test_0059.txt, test_0060.txt, test_0061.txt, test_0062.txt, test_0063.txt, test_0064.txt, test_0065.txt, test_0066.txt, test_0067.txt, test_0068.txt, test_0069.txt, test_0070.txt, test_0071.txt, test_0072.txt, test_0073.txt, test_0074.txt, test_0075.txt, test_0076.txt, test_0077.txt, test_0078.txt, test_0079.txt, test_0080.txt, test_0081.txt, test_0082.txt, test_0083.txt, test_0084.txt, test_0085.txt, test_0086.txt, test_0087.txt, test_0088.txt, test_0089.txt, test_0090.txt, test_0091.txt, test_0092.txt, test_0093.txt, test_0094.txt, test_0095.txt, test_0096.txt, test_0097.txt, test_0098.txt, test_0099.txt, test_0100.txt, test_0101.txt, test_0102.txt, test_0103.txt, test_0104.txt, test_0105.txt, test_0106.txt, test_0107.txt, test_0108.txt, test_0109.txt, test_0110.txt, test_0111.txt, test_0112.txt, test_0113.txt, test_0114.txt, test_0115.txt, test_0116.txt, test_0117.txt, test_0118.txt, test_0119.txt, test_0120.txt, test_0121.txt, test_0122.txt, test_0123.txt, test_0124.txt, test_0125.txt, test_0126.txt, test_0127.txt, test_0128.txt, test_0129.txt, test_0130.txt, test_0131.txt, test_0132.txt, test_0133.txt, test_0134.txt, test_0135.txt, test_0136.txt, test_0137.txt, test_0138.txt, test_0139.txt, test_0140.txt, test_0141.txt, test_0142.txt, test_0143.txt, test_0144.txt, test_0145.txt, test_0146.txt, test_0147.txt, test_0148.txt, test_0149.txt
ケース名 結果 実行時間 メモリ
test_0000.txt AC 1924 ms 4080 KiB
test_0001.txt AC 1909 ms 3984 KiB
test_0002.txt AC 1918 ms 3852 KiB
test_0003.txt AC 1912 ms 3928 KiB
test_0004.txt AC 1921 ms 4024 KiB
test_0005.txt AC 1915 ms 3992 KiB
test_0006.txt AC 1913 ms 4040 KiB
test_0007.txt AC 1915 ms 3980 KiB
test_0008.txt AC 1921 ms 4044 KiB
test_0009.txt AC 1910 ms 4036 KiB
test_0010.txt AC 1910 ms 4072 KiB
test_0011.txt AC 1919 ms 3988 KiB
test_0012.txt AC 1906 ms 3988 KiB
test_0013.txt AC 1922 ms 4044 KiB
test_0014.txt AC 1914 ms 4060 KiB
test_0015.txt AC 1904 ms 4048 KiB
test_0016.txt AC 1919 ms 3936 KiB
test_0017.txt AC 1917 ms 3936 KiB
test_0018.txt AC 1908 ms 3848 KiB
test_0019.txt AC 1906 ms 3980 KiB
test_0020.txt AC 1916 ms 3892 KiB
test_0021.txt AC 1918 ms 3888 KiB
test_0022.txt AC 1913 ms 4036 KiB
test_0023.txt AC 1908 ms 3860 KiB
test_0024.txt AC 1922 ms 3892 KiB
test_0025.txt AC 1904 ms 4140 KiB
test_0026.txt AC 1914 ms 3936 KiB
test_0027.txt AC 1918 ms 3936 KiB
test_0028.txt AC 1907 ms 4040 KiB
test_0029.txt AC 1924 ms 3924 KiB
test_0030.txt AC 1917 ms 3928 KiB
test_0031.txt AC 1918 ms 4036 KiB
test_0032.txt AC 1921 ms 3988 KiB
test_0033.txt AC 1909 ms 4136 KiB
test_0034.txt AC 1916 ms 3852 KiB
test_0035.txt AC 1917 ms 3912 KiB
test_0036.txt AC 1909 ms 4040 KiB
test_0037.txt AC 1920 ms 4040 KiB
test_0038.txt AC 1916 ms 3852 KiB
test_0039.txt AC 1912 ms 3984 KiB
test_0040.txt AC 1921 ms 3920 KiB
test_0041.txt AC 1911 ms 4056 KiB
test_0042.txt AC 1921 ms 4028 KiB
test_0043.txt AC 1914 ms 3888 KiB
test_0044.txt AC 1908 ms 3988 KiB
test_0045.txt AC 1908 ms 3984 KiB
test_0046.txt AC 1907 ms 4072 KiB
test_0047.txt AC 1913 ms 4032 KiB
test_0048.txt AC 1914 ms 3936 KiB
test_0049.txt AC 1907 ms 4036 KiB
test_0050.txt AC 1912 ms 3928 KiB
test_0051.txt AC 1917 ms 4024 KiB
test_0052.txt AC 1917 ms 4080 KiB
test_0053.txt AC 1921 ms 3852 KiB
test_0054.txt AC 1904 ms 4044 KiB
test_0055.txt AC 1913 ms 3928 KiB
test_0056.txt AC 1917 ms 3924 KiB
test_0057.txt AC 1918 ms 3976 KiB
test_0058.txt AC 1915 ms 4144 KiB
test_0059.txt AC 1910 ms 3928 KiB
test_0060.txt AC 1909 ms 3936 KiB
test_0061.txt AC 1919 ms 3920 KiB
test_0062.txt AC 1910 ms 3988 KiB
test_0063.txt AC 1905 ms 3936 KiB
test_0064.txt AC 1915 ms 3988 KiB
test_0065.txt AC 1912 ms 4048 KiB
test_0066.txt AC 1912 ms 3980 KiB
test_0067.txt AC 1908 ms 3896 KiB
test_0068.txt AC 1913 ms 4076 KiB
test_0069.txt AC 1910 ms 4032 KiB
test_0070.txt AC 1917 ms 3992 KiB
test_0071.txt AC 1920 ms 4136 KiB
test_0072.txt AC 1913 ms 4076 KiB
test_0073.txt AC 1920 ms 3932 KiB
test_0074.txt AC 1905 ms 4144 KiB
test_0075.txt AC 1909 ms 4056 KiB
test_0076.txt AC 1923 ms 4076 KiB
test_0077.txt AC 1911 ms 3980 KiB
test_0078.txt AC 1918 ms 3988 KiB
test_0079.txt AC 1921 ms 4044 KiB
test_0080.txt AC 1906 ms 4080 KiB
test_0081.txt AC 1913 ms 4028 KiB
test_0082.txt AC 1918 ms 3984 KiB
test_0083.txt AC 1906 ms 3972 KiB
test_0084.txt AC 1912 ms 4056 KiB
test_0085.txt AC 1921 ms 4044 KiB
test_0086.txt AC 1914 ms 3848 KiB
test_0087.txt AC 1907 ms 4076 KiB
test_0088.txt AC 1917 ms 4032 KiB
test_0089.txt AC 1909 ms 4080 KiB
test_0090.txt AC 1907 ms 4044 KiB
test_0091.txt AC 1908 ms 3888 KiB
test_0092.txt AC 1908 ms 3888 KiB
test_0093.txt AC 1907 ms 3940 KiB
test_0094.txt AC 1921 ms 4036 KiB
test_0095.txt AC 1912 ms 4024 KiB
test_0096.txt AC 1924 ms 3980 KiB
test_0097.txt AC 1918 ms 4048 KiB
test_0098.txt AC 1911 ms 4064 KiB
test_0099.txt AC 1920 ms 3988 KiB
test_0100.txt AC 1910 ms 4036 KiB
test_0101.txt AC 1913 ms 3856 KiB
test_0102.txt AC 1913 ms 3856 KiB
test_0103.txt AC 1905 ms 4072 KiB
test_0104.txt AC 1918 ms 4016 KiB
test_0105.txt AC 1912 ms 4060 KiB
test_0106.txt AC 1907 ms 3900 KiB
test_0107.txt AC 1914 ms 4040 KiB
test_0108.txt AC 1919 ms 4040 KiB
test_0109.txt AC 1917 ms 3980 KiB
test_0110.txt AC 1909 ms 3932 KiB
test_0111.txt AC 1920 ms 3988 KiB
test_0112.txt AC 1912 ms 4052 KiB
test_0113.txt AC 1912 ms 4036 KiB
test_0114.txt AC 1917 ms 4044 KiB
test_0115.txt AC 1912 ms 3936 KiB
test_0116.txt AC 1916 ms 4048 KiB
test_0117.txt AC 1912 ms 4060 KiB
test_0118.txt AC 1913 ms 3896 KiB
test_0119.txt AC 1905 ms 4144 KiB
test_0120.txt AC 1920 ms 4040 KiB
test_0121.txt AC 1919 ms 4144 KiB
test_0122.txt AC 1922 ms 4076 KiB
test_0123.txt AC 1914 ms 3984 KiB
test_0124.txt AC 1915 ms 4136 KiB
test_0125.txt AC 1910 ms 3988 KiB
test_0126.txt AC 1917 ms 3984 KiB
test_0127.txt AC 1917 ms 3852 KiB
test_0128.txt AC 1913 ms 3896 KiB
test_0129.txt AC 1916 ms 3920 KiB
test_0130.txt AC 1919 ms 3988 KiB
test_0131.txt AC 1917 ms 4032 KiB
test_0132.txt AC 1909 ms 4020 KiB
test_0133.txt AC 1907 ms 3984 KiB
test_0134.txt AC 1922 ms 3984 KiB
test_0135.txt AC 1912 ms 4060 KiB
test_0136.txt AC 1906 ms 3848 KiB
test_0137.txt AC 1918 ms 4020 KiB
test_0138.txt AC 1918 ms 3988 KiB
test_0139.txt AC 1917 ms 4144 KiB
test_0140.txt AC 1911 ms 3848 KiB
test_0141.txt AC 1910 ms 4016 KiB
test_0142.txt AC 1917 ms 4076 KiB
test_0143.txt AC 1910 ms 3852 KiB
test_0144.txt AC 1908 ms 3924 KiB
test_0145.txt AC 1921 ms 4048 KiB
test_0146.txt AC 1919 ms 4080 KiB
test_0147.txt AC 1908 ms 4056 KiB
test_0148.txt AC 1919 ms 4032 KiB
test_0149.txt AC 1921 ms 3928 KiB