#include #include #include #include #include #include #include // 内部定数 #define D_PACK_MAX 30000 // 最大パック数 #define D_PACK_SIZE 3 // パックサイズ #define D_W_MAX 10005 // 最大幅 // 内部構造体 - パック情報 typedef struct Pack { int miNo; // 投下順 0~ int miX; // 投下位置 0~ int mi1BCnt[D_PACK_SIZE]; // ブロック数[位置] } Pack; // 内部変数 static FILE *szpFpI; // 入力 static int siW, siH; // 幅・高さ static Pack sz1Pack[D_PACK_MAX]; // パック static int siPCnt; // パック数 static int si1BCnt[D_W_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 fSortFncXu( const void *pzpVal1 // 値1 , const void *pzpVal2 // 値2 ) { Pack *lzpVal1 = (Pack *)pzpVal1; Pack *lzpVal2 = (Pack *)pzpVal2; // 投下位置昇順 if (lzpVal1->miX > lzpVal2->miX) { return 1; } else if (lzpVal1->miX < lzpVal2->miX) { return -1; } // 投下順昇順 if (lzpVal1->miNo > lzpVal2->miNo) { return 1; } else if (lzpVal1->miNo < lzpVal2->miNo) { return -1; } return 0; } // ソート関数 - 投下順昇順 int fSortFncNu( const void *pzpVal1 // 値1 , const void *pzpVal2 // 値2 ) { Pack *lzpVal1 = (Pack *)pzpVal1; Pack *lzpVal2 = (Pack *)pzpVal2; // 投下順昇順 if (lzpVal1->miNo > lzpVal2->miNo) { return 1; } else if (lzpVal1->miNo < lzpVal2->miNo) { return -1; } return 0; } // 実行メイン int fMain( ) { int i, j, k; char lc1Buf[D_W_MAX]; // 幅・高さ・パック数 - 取得 fgets(lc1Buf, sizeof(lc1Buf), szpFpI); sscanf(lc1Buf, "%d%d%d", &siH, &siW, &siPCnt); // ブロック数 - 取得 for (i = 0; i < siH; i++) { fgets(lc1Buf, sizeof(lc1Buf), szpFpI); for (j = 0; j < siW; j++) { if (lc1Buf[j] == '#') { si1BCnt[j]++; } } } // パック - 取得 for (i = 0; i < siPCnt; i++) { sz1Pack[i].miNo = i; fgets(lc1Buf, sizeof(lc1Buf), szpFpI); sscanf(lc1Buf, "%d", &sz1Pack[i].miX); } // パック - ソート qsort(sz1Pack, siPCnt, sizeof(Pack), fSortFncXu); // ブロック - セット - 1つ for (i = 0; i < siPCnt; i++) { for (j = 0; j < D_PACK_SIZE; j++) { int liNo = sz1Pack[i].miX + j; if (si1BCnt[liNo] > 0) { sz1Pack[i].mi1BCnt[j]++; si1BCnt[liNo]--; break; } } } // ブロック - セット - 余り for (i = 0; i < siPCnt; i++) { for (j = 0; j < D_PACK_SIZE; j++) { int liNo = sz1Pack[i].miX + j; int liCnt = D_PACK_SIZE - sz1Pack[i].mi1BCnt[j]; if (liCnt > si1BCnt[liNo]) { liCnt = si1BCnt[liNo]; } sz1Pack[i].mi1BCnt[j] += liCnt; si1BCnt[liNo] -= liCnt; } } // パック - ソート qsort(sz1Pack, siPCnt, sizeof(Pack), fSortFncNu); // 出力 for (i = 0; i < siPCnt; i++) { // 内容 - セット char lc2Pack[D_PACK_SIZE][8]; memset(lc2Pack, '.', sizeof(lc2Pack)); for (j = 0; j < D_PACK_SIZE; j++) { for (k = 0; k < sz1Pack[i].mi1BCnt[j]; k++) { lc2Pack[k][j] = '#'; } lc2Pack[j][D_PACK_SIZE] = '\n'; lc2Pack[j][D_PACK_SIZE + 1] = '\0'; } // 出力 for (j = 0; j < D_PACK_SIZE; j++) { fOut(lc2Pack[j]); } } return 0; } // 1回実行 int fOne( ) { int liRet; char lc1Buf[1024]; // データ - 初期化 memset(sz1Pack, 0, sizeof(sz1Pack)); // パック memset(si1BCnt, 0, sizeof(si1BCnt)); // ブロック数 // 入力 - セット #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; }