棋盘覆盖问题————educoder原题————递归

任务描述

在一个2k×2k个方格组成的棋盘中，恰有一个方格与其他方格不同，称该方格为一特殊方格，且称该棋盘为一特殊棋盘。在棋盘覆盖问题中，要用图示的4种不同形态的L型骨牌覆盖给定的特殊棋盘上除特殊方格以外的所有方格，且任何2个L型骨牌不得重叠覆盖。
易知，覆盖任意一个2k×2k的特殊棋盘，用到的骨牌数恰好为(4K-1)/3。

输入格式

第一行为k(棋盘的尺寸)，第二行为x，y(1<=x,y<=2^k)，分别表示特殊方格所在行与列。

输出格式

共2^k行，分别表示覆盖该格的L型的编号(特殊格用0表示)。

样例

平台会对你编写的代码进行测试：

测试输入：
3 3 2
预期输出：
3 3 4 4 8 8 9 9
3 2 2 4 8 7 7 9
5 2 6 6 10 10 7 11
5 5 0 6 1 10 11 11
13 13 14 1 1 18 19 19
13 12 14 14 18 18 17 19
15 12 12 16 20 17 17 21
15 15 16 16 20 20 21 21

提示

特殊骨牌的牌号为0
正常骨牌号从1开始
覆盖棋盘请严格遵循先覆盖左上角,右上角，左下角，右下脚的循序(具体可以参考算法书P21的代码及注释)

解题代码

#include <stdio.h>
#include <string.h>
#include <math.h>
using namespace std;

int matrix[2048][2048],idx = 0,k;

int diry[4] = {0,0,1,1};
int dirx[4] = {0,1,0,1};
int dirspx[4] = { -1,0,-1,0 };
int dirspy[4] = { -1,-1,0,0 };

int power(int x, int y)
{
	int res = x;
	while (--y)
	{
		res *= x;
	}
	return res;
}

int judge(int Size,int sy,int sx, int y, int x)//checked
{
	Size = (power(2,Size) - 1)/2;
	if (y <= sy + Size && x <= sx + Size) return 0;
	else if (y <= sy + Size && x > sx + Size) return 1;
	else if (y > sy + Size && x <= sx + Size) return 2;
	else return 3;
}

void malco(int Size, int sy, int sx, int spy, int spx)
{
	/*for (int i = 0; i < power(2, k); i++)
	{
		for (int j = 0; j < power(2, k); j++)
		{
			printf("(y:%2d x:%2d)%d\t", i, j, matrix[i][j]);
		}
		printf("\n");
	}*/
	if (Size == 1)
	{
		idx++;
		//printf("spy:%d\tspx:%d\n", spy, spx);
		//printf("sy:%d\tsx:%d\n", sy, sx);
		for (int i = 0; i < 4; i++)
		{
			int dy = sy + diry[i];
			int dx = sx + dirx[i];
			if (dy != spy || dx != spx)
			{
				matrix[dy][dx] = idx;
			}
			//printf("y:%d\tx:%d\tidx:%d\tmatrix:%d\n", dy, dx, idx ,matrix[dy][dx]);
		}
		return;
	}
	//判断方位并且赋值特殊点
	idx++;
	int pos = judge(Size, sy, sx, spy, spx);//0,1，2，3分别对应左上，右上，左下，右下
	for (int i = 0; i < 4; i++)//标注递归特殊点
	{
		if (i != pos)
			matrix[sy + power(2,Size)/2 + dirspy[i]][sx + power(2, Size) / 2 + dirspx[i]] = idx;
		/*printf("y:%d\tx:%d\tidx:%d\t", sy + power(2, Size) / 2 + dirspy[i], sx + power(2, Size) / 2 + dirspx[i],idx);
		if (pos == i) printf("pos\n");
		else printf("\n");*/
	}
	for (int i = 0; i < 4; i++)
	{
		int delsx = sx, delsy = sy;
		delsx += dirx[i] * power(2, Size) / 2;
		delsy += diry[i] * power(2, Size) / 2;
		if (pos == i) malco(Size - 1, delsy, delsx, spy, spx);
		else malco(Size - 1, delsy, delsx, sy + power(2, Size) / 2 + dirspy[i], sx + power(2, Size) / 2 + dirspx[i]);
	}
}

int main()
{
	int spy, spx;
	scanf("%d%d%d", &k, &spy, &spx);
	malco(k, 0, 0, spy, spx);
	for (int i = 0; i < power(2, k); i++)
	{
		for (int j = 0; j < power(2, k); j++)
		{
			if (j < power(2, k) - 1) printf("%-4d", matrix[i][j]);
			else printf("%d", matrix[i][j]);
		}
		printf("\n");
	}
	return 0;
}