#include #include #include #include #include #include #include // 内部定数 #define D_MOD 1000000007 // 除数(10の9乗+7) #define D_FACT_MAX 1000005 // 最大階乗数 // 内部変数 static FILE *szpFpI; // 入力 static int si1ModFact[D_FACT_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 fMakeModFact( int piMax // 最大値 ) { int i; 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 fMain( ) { int i, liRet; char lc1Buf[1024]; i = fGetModPower(2, 5); // マス数 - 取得 int liMCnt; fgets(lc1Buf, sizeof(lc1Buf), szpFpI); sscanf(lc1Buf, "%d", &liMCnt); // マス - 取得 int liWhite = -1; int liBlack = 0; for (i = 0; ; i++) { int liVal; liRet = fscanf(szpFpI, "%d", &liVal); if (liRet != 1) { break; } liBlack += liVal; liWhite++; } if (liBlack == 0) { return 1; } // 白追加数 int liAdd = liMCnt - liBlack - liWhite; if (liAdd < 0) { return -1; } if (liAdd == 0) { return 1; } // 仕切り数 liWhite++; // 総数 int liSum = liAdd + liWhite; // 階乗リストの作成 fMakeModFact(liSum); // パターン数 = liSum! / liAdd! / liWhite! int liDiv = (int)((long long)si1ModFact[liAdd] * (long long)si1ModFact[liWhite] % (long long)D_MOD); // 分母部分 int liDivR = fGetModPower(liDiv, D_MOD - 2); // 分母部分の逆元 int liPtn = (int)((long long)si1ModFact[liSum] * (long long)liDivR % (long long)D_MOD); return liPtn; } // 1回実行 int fOne( ) { int liRet; char lc1Buf[1024]; // 入力 - セット #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(); // 結果 - セット if (liRet > 0) { sprintf(lc1Buf, "%d\n", liRet); } else { sprintf(lc1Buf, "NA\n"); } // 結果 - 出力 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; }