麻将 (Standard IO)

Description

麻将是中国传统的娱乐工具之一。麻将牌的牌可以分为字牌（共有东、南、西、北、中、发、白七种）和序数牌（分为条子、饼子、万子三种花色，每种花色各有一到九的九种牌），每种牌各四张。在麻将中，通常情况下一组和了的牌（即完成的牌）由十四张牌组成。十四张牌中的两张组成对子（即完全相同的两张牌），剩余的十二张组成三张一组的四组，每一组须为顺子（即同花色且序数相连的序数牌，例如条子的三、四、五）或者是刻子（即完全相同的三张牌）。一组听牌的牌是指一组十三张牌，且再加上某一张牌就可以组成和牌。那一张加上的牌可以称为等待牌。
在这里，我们考虑一种特殊的麻将。在这种特殊的麻将里，没有字牌，花色也只有一种。但是，序数不被限制在一到九的范围内，而是在1到n的范围内。同时，也没有每一种牌四张的限制。一组和了的牌由3m + 2张牌组成，其中两张组成对子，其余3m张组成三张一组的m组，每组须为顺子或刻子。现给出一组3m + 1张的牌，要求判断该组牌是否为听牌（即还差一张就可以和牌）。如果是的话，输出所有可能的等待牌。

Input

【输入】

包含两行。
第一行包含两个由空格隔开整数n, m (9<=n<=400, 4<=m<=1000)。第二行包含3m + 1个由空格隔开整数，每个数均在范围1到n之内。这些数代表要求判断听牌的牌的序数。

Output

输出文件名为mahjong.out。
输出为一行。
如果该组牌为听牌，则输出所有的可能的等待牌的序数，数字之间用一个空格隔开。所有的序数必须按从小到大的顺序输出。如果该组牌不是听牌，则输出”NO”。

题解
暴力啊。O（n的3次方）

代码

varn,m,nm:longint;a,f,num:array [0..401] of longint;boo:boolean;
procedure init;
vari,t:longint;
beginfillchar(a,sizeof(a),0);readln(n,m);for i:=1 to m*3+1 dobeginread(t);inc(a[t]);end;
end;procedure main;
vark,i,j:longint;bo:boolean;
beginnm:=0;boo:=true;for k:=1 to n dobegininc(a[k]);for i:=1 to n doif a[i]>=2 thenbeginbo:=true;dec(a[i],2);for j:=1 to n+2 dof[j]:=a[j];for j:=1 to n+2 dobeginif f[j]<0 thenbeginbo:=false;break;end;f[j]:=f[j] mod 3;f[j+1]:=f[j+1]-f[j];f[j+2]:=f[j+2]-f[j];end;inc(a[i],2);if bo then break;end;if bo thenbeginboo:=false;inc(nm);num[nm]:=k;end;dec(a[k]);end;
end;procedure print;
vari:longint;
beginfor i:=1 to nm dowrite(num[i],' ');if boo then write('NO');
end;begininit;main;print;
end.

转载于:https://www.cnblogs.com/zyx-crying/p/9319589.html

麻将 (Standard IO)相关推荐

4246. 【五校联考6day2】san (Standard IO)
4246. [五校联考6day2]san (Standard IO) Time Limits: 1000 ms Memory Limits: 262144 KB Detailed Limits D ...
2554. 【NOIP2011模拟9.7】帕秋莉·诺蕾姬 (Standard IO)
2554. [NOIP2011模拟9.7]帕秋莉·诺蕾姬 (Standard IO) Description 在幻想乡,帕秋莉·诺蕾姬是以宅在图书馆闻名的魔法使.这一天帕秋莉又在考虑如何加强魔法咒语的 ...
JZOJ 1775. 合并果子2 (Standard IO)
1775. 合并果子2 (Standard IO) Time Limits: 1000 ms Memory Limits: 65536 KB Description 在一个果园里,多多已经将所有的果子 ...
1116. 【HNOI2008】T_OY(踢欧阳^_^) (Standard IO)斜率优化dp
1116. [HNOI2008]T_OY(踢欧阳^_^) (Standard IO) Time Limits: 1000 ms Memory Limits: 65536 KB Detailed L ...
IBM x3850 X6 不开机面板显示 sys voltage fault standard io book
IBM x3850 X6 服务器不开机面板显示 sys voltage fault standard io book 如果有软件绑定主板,要维修主板哦,可加 w:cfx02100313(请备注)## ...
拉力赛 (Standard IO)
题意/Description: 车展结束后,游乐园决定举办一次盛大的山道拉力赛,平平和韵韵自然也要来参加大赛. 赛场上共有n个连通的计时点,n-1条赛道(构成了一棵树).每个计时点的高度都不相同(父结 ...
混合图 (Standard IO)
Description 有一张N个点,M1条有向边,M2条无向边组成的混合图.询问一个给所有无向边定向的方案.使得最终的图中没有环.保证一定有解. Input 第一行,三个数字N,M1,M2. 接下来 ...
帕秋莉·诺蕾姬 (Standard IO)
Description 在幻想乡,帕秋莉·诺蕾姬是以宅在图书馆闻名的魔法使.这一天帕秋莉又在考虑如何加强魔法咒语的威力.帕秋莉的魔法咒语是一个仅有大写字母组成的字符串,我们考虑从'A'到'Z'分别表示 ...
上学路线 (Standard IO)
题意/Description: 你所在城市的街道好像一个棋盘,有a条南北方向的街道,和b条东西方向的街道. 南北方向的a条街道从西到东依次编号为1到a,而东西方向的b条街道从南到北依次编 ...

麻将 (Standard IO)

麻将 (Standard IO)相关推荐

最新文章

热门文章