1028: [JSOI2007]麻将
Time Limit: 1 Sec Memory Limit: 162 MBSubmit: 330 Solved: 141
[ Submit][ Status][ Discuss]
Description
麻将是中国传统的娱乐工具之一。麻将牌的牌可以分为字牌(共有东、南、西、北、中、发、白七种)和序数牌(分为条子、饼子、万子三种花色,每种花色各有一到九的九种牌),每种牌各四张。在麻将中,通常情况下一组和了的牌(即完成的牌)由十四张牌组成。十四张牌中的两张组成对子(即完全相同的两张牌),剩余的十二张组成三张一组的四组,每一组须为顺子(即同花色且序数相连的序数牌,例如条子的三、四、五)或者是刻子(即完全相同的三张牌)。一组听牌的牌是指一组十三张牌,且再加上某一张牌就可以组成和牌。那一张加上的牌可以称为等待牌。 在这里,我们考虑一种特殊的麻将。在这种特殊的麻将里,没有字牌,花色也只有一种。但是,序数不被限制在一到九的范围内,而是在1到n的范围内。同时,也没有每一种牌四张的限制。一组和了的牌由3m + 2张牌组成,其中两张组成对子,其余3m张组成三张一组的m组,每组须为顺子或刻子。现给出一组3m + 1张的牌,要求判断该组牌是否为听牌(即还差一张就可以和牌)。如果是的话,输出所有可能的等待牌。
Input
包含两行。 第一行包含两个由空格隔开整数n, m (9<=n<=400, 4<=m<=1000)。第二行包含3m + 1个由空格隔开整数,每个数均在范围1到n之内。这些数代表要求判断听牌的牌的序数。
Output
输出为一行。 如果该组牌为听牌,则输出所有的可能的等待牌的序数,数字之间用一个空格隔开。所有的序数必须按从小到大的顺序输出。如果该组牌不是听牌,则输出"NO"。
Sample Input
9 4
1 1 2 2 3 3 5 5 5 7 8 8 8
1 1 2 2 3 3 5 5 5 7 8 8 8
Sample Output
6 7 9
HINT
Source
解决方案
先枚举等待牌,再枚举对子,最后计数所有的3个1组
显然如果一个结点开始有3个顺子
--------------X3
那么它等价于
X3 X3 X3
所以只要向后枚举(优先贪前面的),知道有取不尽(即需要多取导致-1的)跳出即可。
Program majiang;
const
maxn=410;
maxm=1010;
var
n,m,i,j,k,p:longint;
a:array[1..maxn] of longint;
a2:array[1..maxn] of longint;
flag:boolean;
function check(x:longint):boolean;
var
i,j:longint;
begin
fillchar(a2,sizeof(a2),0);
for i:=1 to n do a2[i]:=a[i];
for i:=1 to n do
begin
if (a2[i]>=2) then
begin
dec(a2[i],2);
for j:=1 to n+2 do
begin
if a2[j]<0 then break;
if a2[j]=0 then continue;
a2[j]:=a2[j] mod 3;
if a2[j]>0 then
begin
dec(a2[j+1],a2[j]);
dec(a2[j+2],a2[j]);
a2[j]:=0;
end;
end;
if (a2[j]=0) and (j=n+2) then exit(true);
fillchar(a2,sizeof(a2),0);
for j:=1 to n do a2[j]:=a[j];
end;
end;
exit(false);
end;
begin
read(n,m);
fillchar(a,sizeof(a),0);
for i:=1 to 3*m+1 do
begin
read(p);
inc(a[p]);
end;
flag:=false;
for i:=1 to n do
begin
inc(a[i]);
if check(i) then
begin
if flag then write(' ') else flag:=true;
write(i);
end;
dec(a[i]);
end;
if not(flag) then write('NO');
writeln;
end.