题目描述

牛牛最近迷上了一种叫斗地主的扑克游戏。斗地主是一种使用黑桃、红心、梅花、方片的A到K加上大小王的共54张牌来进行的扑克牌游戏。在斗地主中,牌的大小关系根据牌的数码表示如下:3<4<5<6<7<8<9<10<J<Q<K<A<2<小王<大王,而花色并不对牌的大小产生影响。每一局游戏中,一副手牌由n张牌组成。游戏者每次可以根据规定的牌型进行出牌,首先打光自己的手牌一方取得游戏的胜利。

现在,牛牛只想知道,对于自己的若干组手牌,分别最少需要多少次出牌可以将它们打光。请你帮他解决这个问题。

需要注意的是,本题中游戏者每次可以出手的牌型与一般的斗地主相似而略有不同。

具体规则如下:

输入输出格式

输入格式:

第一行包含用空格隔开的2个正整数Tn,表示手牌的组数以及每组手牌的张数。

接下来T组数据,每组数据n行,每行一个非负整数对aibi表示一张牌,其中ai示牌的数码,bi表示牌的花色,中间用空格隔开。特别的,我们用1来表示数码A,11表示数码J,12表示数码Q,13表示数码K;黑桃、红心、梅花、方片分别用1-4来表示;小王的表示方法为01,大王的表示方法为02。

输出格式:

共T行,每行一个整数,表示打光第i手牌的最少次数。

输入输出样例

输入样例#1:

1 8
7 4
8 4
9 1
10 4
11 1
5 1
1 4
1 1
输出样例#1:

3
输入样例#2:

1 17
12 3
4 3
2 3
5 4
10 2
3 3
12 2
0 1
1 3
10 1
6 2
12 1
11 3
5 2
12 4
2 2
7 2
输出样例#2:

6

说明

样例1说明

共有1组手牌,包含8张牌:方片7,方片8,黑桃9,方片10,黑桃J,黑桃5,方片A以及黑桃A。可以通过打单顺子(方片7,方片8,黑桃9,方片10,黑桃J),单张牌(黑桃5)以及对子牌(黑桃A以及方片A)在3次内打光。

对于不同的测试点, 我们约定手牌组数T与张数n的规模如下:

数据保证:所有的手牌都是随机生成的。

  • 看道题目我只能说出题人真会玩,斗地主都出来了。
  • 这个斗地主的规则与一般的不太一样(虽然是从百度百科上粘的)。
  • 看到随机数据我就松了一口气,因为这样的话不会有出题人给的神坑!!!
  • 仔细分析,其实这道题没有什么完美的算法,基本确定思路:爆搜(深度优先搜索)。
  • 本题花色没什么卵用,只是用来区分大小王。
  • 再分析:出牌顺序不会影响出牌次数。
  • 按照常规的思路,肯定要先打顺子。
  • 所以就先搜顺子;注意:连着的几张牌不一定当做一个顺子一起打出,比如说6 7 8 8 9 9 10 10 J Q这组牌,如果先打出678910JQ,再打3个单牌,就不如打两个顺子678910 8910JQ更优。
  • 然后出带牌,也要按照一定的顺序,比如:四带两对,四带两单,三带。
  • 然后把所有不能连着出的牌统计一下,加到当前的答案中,并更新答案。
  • 注意本题搜索技巧:每次进入下一步是统计一下当前牌号的种类数(因为同一号的牌一定能一下打出),并更新答案;因为A能连成顺子而2不能,所以在将牌编号时可以将3-K编号为1-11,A编号为12,2编号为13,小王为14,大王为15,这样搜的时候就会比较方便;如果有双王先打出双王,因为这样对牌局没有影响(双王不能被同时带出,但单个王可以被带出);注意利用前缀和的思想,这样可以使搜索更方便(尤其是搜顺子的时候)。
  • 然后就是考验代码能力的时候了,本人蒟蒻,调了半天才调出来,代码很丑。
  • 复杂度玄学,不过对于随机数据来说不成问题,期望通过本题,最慢的点300+ms。
 var
t,n,i,j,x,y,anss,tt,now,ans :longint;
sum :Array[..] of longint;
f1,f2,f3,s1,s2,s3 :array[..] of longint;
ff :boolean; function min(x,y:longint):longint;
begin
if x<y then exit(x) else exit(y);
end; function find():longint;
var
i,summ :longint;
begin
summ:=;
for i:= to do if (sum[i]>) then inc(summ);
exit(summ);
end; procedure dfs(x:longint);
var
i,j,k :longint;
l,r,max,t,q,o :longint;
begin
q:=find();
if q+x-<anss then anss:=q+x-;//tongji
{---------------------------------------------------}
fillchar(f1,sizeof(f1),);
fillchar(s1,sizeof(s1),);
for i:= to do if (sum[i]>=) then f1[i]:=;
for i:= to do s1[i]:=s1[i-]+f1[i];
max:=;
for i:= to do
for j:=i+ to do
if j<=l then continue;
if (s1[j]-s1[i-]=j-i+) then
begin
if (j-i+>max) then
begin
max:=j-i+;
l:=i;
r:=j;
end;
end;
if max>= then
begin
for i:=l to r do
for j:=r downto l do
begin
if j-i+< then continue;
for k:=i to j do dec(sum[k],);
dfs(x+);
for k:=i to j do inc(sum[k],);
end;
end;//san shun zi
{----------------------------------------------------------}
fillchar(f2,sizeof(f2),);
fillchar(s2,sizeof(s2),);
for i:= to do if (sum[i]>=) then f2[i]:=;
for i:= to do s2[i]:=s2[i-]+f2[i];
max:=;
for i:= to do
for j:=i+ to do
if (s2[j]-s2[i-]=j-i+) then
begin
if (j-i+>max) then
begin
max:=j-i+;
l:=i;
r:=j;
end;
end;
if max>= then
begin
for i:=l to r do
for j:=r downto l do
begin
if j-i+< then continue;
for k:=i to j do dec(sum[k],);
dfs(x+);
for k:=i to j do inc(sum[k],);
end;
end;//shuang shun zi
{--------------------------------------------------------}
fillchar(f3,sizeof(f3),);
fillchar(s3,sizeof(s3),);
for i:= to do if (sum[i]<>) then f3[i]:=;
for i:= to do s3[i]:=s3[i-]+f3[i];
max:=;
for i:= to do
for j:=i+ to do
if (s3[j]-s3[i-]=j-i+) then
begin
if (j-i+>max) then
begin
max:=j-i+;
l:=i;
r:=j;
end;
end;
if max>= then
begin
for i:=l to r do
for j:=r downto l do
begin
if j-i+< then continue;
for k:=i to j do dec(sum[k]);
dfs(x+);
for k:=i to j do inc(sum[k]);
end;
end;//dan shun zi
{--------------------------------------------------------}
for i:= to do
begin
if (sum[i]=) then
begin
dec(sum[i],);
for j:= to do
begin
if sum[j]< then continue;
for k:=j+ to do
begin
if sum[k]< then continue;
dec(sum[j],);
dec(sum[k],);
dfs(x+);
inc(sum[j],);
inc(sum[k],);
end;
end;
inc(sum[i],);
end;
end; //4 dai 2
{-------------------------------------------------------}
for i:= to do
begin
if (sum[i]=) then
begin
dec(sum[i],);
for j:= to do
begin
if sum[j]<> then continue;
for k:=j+ to do
begin
if sum[k]<> then continue;
dec(sum[j]);
dec(sum[k]);
dfs(x+);
inc(sum[j]);
inc(sum[k]);
end;
end;
inc(sum[i],);
end;
end; //4 dai 1
{---------------------------------------------------------}
for i:= to do
begin
if (sum[i]=) then
begin
dec(sum[i],);
for j:= to do
begin
if (sum[j]>) or (sum[j]<) then continue;
t:=sum[j];
sum[j]:=;
dfs(x+);
sum[j]:=t;
end;
inc(sum[i],);
end;
end;//san dai 1/2
end; begin
read(t,n);
while (t>) do
begin
dec(t);
fillchar(sum,sizeof(sum),);
for i:= to n do
begin
read(x,y);
if (x>=) then inc(sum[x-]) else
if (x=) then inc(sum[]) else
if (x=) then inc(sum[]) else
if (x=) and (y=) then inc(sum[]) else
if (x=) and (y=) then inc(sum[]);
end;
ans:=;
if (sum[]>) and (sum[]>) then
begin
tt:=min(sum[],sum[]);
dec(sum[],tt);
dec(sum[],tt);
inc(ans,tt);
end;//double jokers
anss:=maxlongint;
dfs(ans+);
writeln(anss);
continue;
end;
end.

[NOIP2015] 斗地主(搜索)的更多相关文章

  1. 【BZOJ4325】NOIP2015 斗地主 搜索+剪枝

    [BZOJ4325]NOIP2015 斗地主 Description 牛牛最近迷上了一种叫斗地主的扑克游戏.斗地主是一种使用黑桃.红心.梅花.方片的A到K加上大小王的共54张牌来进行的扑克牌游戏.在斗 ...

  2. 【BZOJ4325】NOIP2015 斗地主 搜索+贪心

    这个东西考试的时候一眼以为状压就压炸了考试又了一下午.....最后我打出来发现后几个点10min都过不去,我大概算了一下,可能是吧.......最后一脸懵逼的我去怂了正解,我们发现只要确定了顺子就可以 ...

  3. NOIP2015 斗地主(搜索+剪枝)

    4325: NOIP2015 斗地主 Time Limit: 30 Sec  Memory Limit: 1024 MBSubmit: 270  Solved: 192[Submit][Status] ...

  4. LOJ2422 NOIP2015 斗地主 【搜索+贪心】*

    LOJ2422 NOIP2015 斗地主 LINK 题目大意很简单,就是问你斗地主的一分手牌最少多少次出完 然后我们发现对于一种手牌状态,不考虑顺子的情况是可以贪心做掉的 然后我们直接枚举一下顺子出牌 ...

  5. NOIP2015斗地主[DFS 贪心]

    题目描述 牛牛最近迷上了一种叫斗地主的扑克游戏.斗地主是一种使用黑桃.红心.梅花.方片的A到K加上大小王的共54张牌来进行的扑克牌游戏.在斗地主中,牌的大小关系根据牌的数码表示如下:3<4< ...

  6. BZOJ 4325: NOIP2015 斗地主

    4325: NOIP2015 斗地主 Time Limit: 30 Sec  Memory Limit: 1024 MBSubmit: 684  Solved: 456[Submit][Status] ...

  7. 2106. [NOIP2015] 斗地主

        2106. [NOIP2015] 斗地主 ★★★☆   输入文件:landlords.in   输出文件:landlords.out   简单对比 时间限制:2 s   内存限制:1025 M ...

  8. NOIP2015斗地主题解 7.30考试

    问题 B: NOIP2015 斗地主 时间限制: 3 Sec  内存限制: 1024 MB 题目描述 牛牛最近迷上了一种叫斗地主的扑克游戏.斗地主是一种使用黑桃.红心.梅花.方片的A到K加上大小王的共 ...

  9. [补档][NOIP2015] 斗地主

    [NOIP2015] 斗地主 题目 传送门:http://cogs.pro/cogs/problem/problem.php?pid=2106 INPUT 第一行包含用空格隔开的2个正整数Tn,表示手 ...

随机推荐

  1. 跨域资源共享(CORS)问题解决方案

    CORS:Cross-Origin Resource Sharing(跨域资源共享) CORS被浏览器支持的版本情况如下:Chrome 3+.IE 8+.Firefox 3.5+.Opera 12+. ...

  2. 【转】图像灰度化方法总结及其VC实现

    转载自:  http://blog.csdn.net/likezhaobin/article/details/6915754 最近一段时间作者开始进行运动目标识别定位系统设计,本文以及后续的几篇文章都 ...

  3. STL 内存释放

    C++ STL 中的map,vector等内存释放问题是一个很令开发者头痛的问题,关于 stl内部的内存是自己内部实现的allocator,关于其内部的内存管理本文不做介绍,只是 介绍一下STL内存释 ...

  4. asp.net初识

    请求=========处理=============响应 不是服务器读网页.表单,而是我们向服务器提交数据 1.asp.net 服务器端控件是ASP.NET对HTML的封装,ASP.NET会将服务器端 ...

  5. sac 文档使用

    目前我遇到的问题是我想要得到BHE,BHN 方向的数据,但发现IRIS下载的数据都是BH1,BH2 方向的,很困惑,请教大神后发现,原来IRIS之所以提供BH1,BH2方向是因为很多时候台站的水平方向 ...

  6. get方式提交中文乱码解决

    get方式提交中文时会乱码,过滤器只过滤post请求,此时可修改tomcat配置文件server.xml,为Connector添加属性URIEncoding="utf-8". ec ...

  7. Java学习2 - JDK和JRE和JVM的区别_JDK的下载安装_环境变量配置

    一 JDK和JRE和JVM的区别 Jdk: Java Development kit - Java 开发工具 JRE: Java Runtime Environment - java运行环境 JVM: ...

  8. HTML DOM对象之createElement()方法

    今天在学习DOM节点操作时,发现了创建DOM节点的createElement()方法的一个有意思的现象. 代码如下: var box=document.getElementById("box ...

  9. node.js实用小模块

    1.浮点数操作 npm install float 2.MD5加密类 npm install MD5 3.xml解析类 1 npm install elementtree 4.转换字符串大小写 1 n ...

  10. 探究toString()和valueOf()

    1.用法如下:toString()方法:返回对象的字符串表示. 对象 操作 Array 将 Array 的元素转换为字符串.结果字符串由逗号分隔,且连接起来. Boolean 如果 Boolean 值 ...