#include #include #include #include #include #include #include // 内部定数 #define D_SIZE_MAX 20 // 最大サイズ // 内部変数 static FILE *szpFpI; // 入力 static int si2Val[D_SIZE_MAX][D_SIZE_MAX]; // 魔法陣 static int si2Work[D_SIZE_MAX][D_SIZE_MAX]; // ワーク用 // 内部変数 - テスト用 #ifdef D_TEST static int siRes; static FILE *szpFpA; static int siTNo; #endif // 出力 int fOut( char *pcpLine // 1行 ) { char lc1Buf[1024]; #ifdef D_TEST fgets(lc1Buf, sizeof(lc1Buf), szpFpA); if (strcmp(lc1Buf, pcpLine)) { siRes = -1; } #else printf("%s", pcpLine); #endif return 0; } // 作成 - 奇数 int fMake1( int piSize // サイズ , int piMCnt // マス数 ) { int i; int liX = piSize / 2; int liY = 0; for (i = 1; i <= piMCnt; i++) { si2Val[liY][liX] = i; int liX2 = (liX + 1) % piSize; int liY2 = (liY - 1 + piSize) % piSize; if (si2Val[liY2][liX2] == 0) { liX = liX2; liY = liY2; } else { liY = (liY + 1) % piSize; } } return 0; } // 作成 - 4の倍数 int fMake2( int piSize // サイズ , int piMCnt // マス数 ) { int i, j; int liNo = 1; for (i = 0; i < piSize; i++) { int liY = i % 4 == 0 || i % 4 == 3; for (j = 0; j < piSize; j++) { int liX = j % 4 == 0 || j % 4 == 3; if (liX ^ liY) { si2Val[i][j] = piMCnt - liNo + 1; } else { si2Val[i][j] = liNo; } liNo++; } } return 0; } // 作成 - その他 int fMake3( int piSize // サイズ , int piMCnt // マス数 ) { int i, j; // 奇数 - 作成 int liHalf = piSize / 2; fMake1(liHalf, liHalf * liHalf); // ワーク用 for (i = 0; i < liHalf; i++) { for (j = 0; j < liHalf; j++) { si2Work[i][j] = (si2Val[i][j] - 1) * 4; } } // 作成 int liQuart = liHalf / 2; for (i = 0; i < liHalf; i++) { for (j = 0; j < liHalf; j++) { int liType; if (i < liQuart) { liType = 0; } else if (i == liQuart) { if (j == liQuart) { liType = 1; } else { liType = 0; } } else if (i == liQuart + 1) { if (j == liQuart) { liType = 0; } else { liType = 1; } } else { liType = 2; } if (liType == 0) { si2Val[i * 2][j * 2] = si2Work[i][j] + 4; si2Val[i * 2][j * 2 + 1] = si2Work[i][j] + 1; si2Val[i * 2 + 1][j * 2] = si2Work[i][j] + 2; si2Val[i * 2 + 1][j * 2 + 1] = si2Work[i][j] + 3; } else if (liType == 1) { si2Val[i * 2][j * 2] = si2Work[i][j] + 1; si2Val[i * 2][j * 2 + 1] = si2Work[i][j] + 4; si2Val[i * 2 + 1][j * 2] = si2Work[i][j] + 2; si2Val[i * 2 + 1][j * 2 + 1] = si2Work[i][j] + 3; } else { si2Val[i * 2][j * 2] = si2Work[i][j] + 1; si2Val[i * 2][j * 2 + 1] = si2Work[i][j] + 4; si2Val[i * 2 + 1][j * 2] = si2Work[i][j] + 3; si2Val[i * 2 + 1][j * 2 + 1] = si2Work[i][j] + 2; } } } return 0; } // 実行メイン int fMain( ) { int i, j; char lc1Buf[1024], lc1Out[1024]; // サイズ・マス数 - 取得 int liSize, liMCnt; fgets(lc1Buf, sizeof(lc1Buf), szpFpI); sscanf(lc1Buf, "%d", &liSize); liMCnt = liSize * liSize; // 作成 if (liSize % 2 == 1) { // 奇数 fMake1(liSize, liMCnt); } else if (liSize % 4 == 0) { // 4の倍数 fMake2(liSize, liMCnt); } else { // その他 fMake3(liSize, liMCnt); } // 出力 for (i = 0; i < liSize; i++) { sprintf(lc1Out, "%d", si2Val[i][0]); for (j = 1; j < liSize; j++) { sprintf(lc1Buf, " %d", si2Val[i][j]); strcat(lc1Out, lc1Buf); } strcat(lc1Out, "\n"); fOut(lc1Out); } return 0; } // 1回実行 int fOne( ) { int liRet; char lc1Buf[1024]; // データ - 初期化 memset(si2Val, 0, sizeof(si2Val)); // 魔法陣 // 入力 - セット #ifdef D_TEST sprintf(lc1Buf, ".\\Test\\T%d.txt", siTNo); szpFpI = fopen(lc1Buf, "r"); sprintf(lc1Buf, ".\\Test\\A%d.txt", siTNo); szpFpA = fopen(lc1Buf, "r"); siRes = 0; #else szpFpI = stdin; #endif // 実行メイン liRet = fMain(); // 残データ有無 #ifdef D_TEST lc1Buf[0] = '\0'; fgets(lc1Buf, sizeof(lc1Buf), szpFpA); if (strcmp(lc1Buf, "")) { siRes = -1; } #endif // テストファイルクローズ #ifdef D_TEST fclose(szpFpI); fclose(szpFpA); #endif // テスト結果 #ifdef D_TEST if (siRes == 0) { printf("OK %d\n", siTNo); } else { printf("NG %d\n", siTNo); } #endif return 0; } // プログラム開始 int main() { #ifdef D_TEST int i; for (i = D_TEST_SNO; i <= D_TEST_ENO; i++) { siTNo = i; fOne(); } #else fOne(); #endif return 0; }