#include #include #include #include #include #include #include // 内部定数 #define D_MOD 1000000007 // 除数(10の9乗+7) #define D_CRS_MAX 5 // 最大クリスタル種類数 #define D_FACT_MAX 100 // 最大階乗数 // 内部構造体 - クリスタル情報 typedef struct Crs { int miX, miY; // 移動距離 int miCnt; // 個数 } Crs; // 内部変数 static FILE *szpFpI; // 入力 static int siGx, siGy; // 目的地 static Crs sz1Crs[D_CRS_MAX]; // クリスタル static int siCCnt; // クリスタル種類数 static int si1ModFact[D_FACT_MAX]; // 階乗リスト static int si1ModFactR[D_FACT_MAX]; // 階乗リスト(逆元) static int siPCnt; // パターン数 // 内部変数 - テスト用 #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 fMakeModFact( int piMax // 最大値 ) { int i; si1ModFact[0] = 1; si1ModFact[1] = 1; for (i = 2; i <= piMax; i++) { si1ModFact[i] = (int)((long long)si1ModFact[i - 1] * (long long)i % (long long)D_MOD); } return 0; } // べき乗 - 取得 int fGetModPower( int piBase // 基数 , int piIdx // 指数 ) { // 平方リスト - 作成 int li1Val[100]; li1Val[0] = piBase; int liCnt = 1; int liIdx = 1; while (piIdx > liIdx) { li1Val[liCnt] = (int)((long long)li1Val[liCnt - 1] * (long long)li1Val[liCnt - 1] % (long long)D_MOD); liCnt++; liIdx += liIdx; } // べき乗 - 取得 int liVal = 1; while (piIdx > 0) { if (piIdx >= liIdx) { piIdx -= liIdx; liVal = (int)((long long)liVal * (long long)li1Val[liCnt - 1] % (long long)D_MOD); } liCnt--; liIdx /= 2; } return liVal; } // 階乗リスト(逆元) - 作成 int fMakeModFactR( int piMax // 最大値 ) { int i; for (i = 0; i <= piMax; i++) { si1ModFactR[i] = fGetModPower(si1ModFact[i], D_MOD - 2); } return 0; } // クリスタル - 選択 int fSelCrs( int piCNo // クリスタル 0~ , int *pipCCnt // クリスタル数 , int piSum // クリスタル数合計 , int piX // 位置X , int piY // 位置Y ) { int i; // 選択中 if (piCNo < siCCnt) { for (i = 0; i <= sz1Crs[piCNo].miCnt; i++) { pipCCnt[piCNo] = i; fSelCrs(piCNo + 1, pipCCnt, piSum + i, piX + sz1Crs[piCNo].miX * i, piY + sz1Crs[piCNo].miY * i); } return 0; } // 目的地 if (piX != siGx) { return 0; } if (piY != siGy) { return 0; } // パターン数 int liPCnt = si1ModFact[piSum]; for (i = 0; i < siCCnt; i++) { liPCnt = (int)((long long)liPCnt * (long long)si1ModFactR[pipCCnt[i]] % (long long)D_MOD); } // パターン数 - 加算 siPCnt += liPCnt; siPCnt %= D_MOD; return 0; } // 実行メイン int fMain( ) { int i; char lc1Buf[1024]; // 目的地・クリスタル種類数 - 取得 fgets(lc1Buf, sizeof(lc1Buf), szpFpI); sscanf(lc1Buf, "%d%d%d", &siGx, &siGy, &siCCnt); // クリスタル - 取得 int liSum = 0; for (i = 0; i < siCCnt; i++) { fgets(lc1Buf, sizeof(lc1Buf), szpFpI); sscanf(lc1Buf, "%d%d%d", &sz1Crs[i].miX, &sz1Crs[i].miY, &sz1Crs[i].miCnt); liSum += sz1Crs[i].miCnt; } // 階乗リスト - 作成 fMakeModFact(liSum); // 階乗リスト(逆元) - 作成 fMakeModFactR(liSum); // クリスタル - 選択 int li1Cnt[D_CRS_MAX]; fSelCrs(0, li1Cnt, 0, 0, 0); return 0; } // 1回実行 int fOne( ) { int liRet; char lc1Buf[1024]; // データ - 初期化 siPCnt = 0; // パターン数 // 入力 - セット #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(); // 出力 sprintf(lc1Buf, "%d\n", siPCnt); fOut(lc1Buf); // 残データ有無 #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; }