请教:13张扑克牌怎么从A翻到K每翻一次隔一张c#做的源代码

chenbing01 2012-05-03 08:53:09
请教:13张扑克牌怎么从A翻到K每翻一次隔一张c#做的源代码
...全文
2560 16 打赏 收藏 转发到动态 举报
写回复
用AI写文章
16 条回复
切换为时间正序
请发表友善的回复…
发表回复
wangyang9012 2012-05-13
  • 打赏
  • 举报
回复
用C#编写的那个7AQ283j495K610隔一张取一张最后变成1,2,3,4,5,6,7,8,9,10,11,12,13的源代码
再次请教!
chenbing01 2012-05-03
  • 打赏
  • 举报
回复
嘿嘿,就是
zyhjavascript 2012-05-03
  • 打赏
  • 举报
回复
这的用冒泡排序把
铜臂阿铁木 2012-05-03
  • 打赏
  • 举报
回复
我这帖子白回了。
原来你在求作业题答案。



今天天气不错,我放个屁污染下空气也是合情合理的。
chenbing01 2012-05-03
  • 打赏
  • 举报
回复
写出来啊,看一下吗
E次奥 2012-05-03
  • 打赏
  • 举报
回复
简单的递归算法。
baishaoge 2012-05-03
  • 打赏
  • 举报
回复
就是隔开一个位置 取一张牌 用个数组装牌 统计下长度 像你怎么说你这个规律是死的,i+1 数组的下标就取出来了 很难嘛 我是怎么理解的额
chenbing01 2012-05-03
  • 打赏
  • 举报
回复
没理解,代码写出来看一下
铜臂阿铁木 2012-05-03
  • 打赏
  • 举报
回复
如果数据是巧合的话,那就按照上边的样子继续下去。

使用递归

递归的检测方法是: 分解后的一列数是否符合升序规则,如果符合将这列数存入一个散列S,尾牌作为key,该列数作为value,尾信息作为value,如果不符合,继续分解这列数。
出口是,所有结果已经无法分解。

散列组成结果的方法是:S[key].value 合并 S[key + 1].value
铜臂阿铁木 2012-05-03
  • 打赏
  • 举报
回复
如果数据是巧合的话,那就按照上边的样子继续下去。

使用递归

递归的检测方法是: 分解后的一列数是否符合升序规则,如果符合将这列数存入一个散列S,尾牌作为key,该列数作为value,尾信息作为value,如果不符合,继续分解这列数。
出口是,所有结果已经无法分解。

散列组成结果的方法是:S[key].value 合并 S[key + 1].value

铜臂阿铁木 2012-05-03
  • 打赏
  • 举报
回复
擦。。。难道你没发现规律么,这题都给你答案了。。。

7 A Q 2 8 3 j 4 9 5 k 6 10

A 2 3 4 5 6
7 Q 8 j 9 k 10
----------------------------------
7 q 8 j 9 10

q j k
7 8 9 10
----------------------------------
7 8 9 10


这数据是巧合么。
chenbing01 2012-05-03
  • 打赏
  • 举报
回复
就是那个7AQ283j495K610隔一张取一张最后变成1,2,3,4,5,6,7,8,9,10,11,12,13的源代码
naonaoye 2012-05-03
  • 打赏
  • 举报
回复
我也没看懂...






----------------------------------签----------名----------栏----------------------------------
努力备考中...
铜臂阿铁木 2012-05-03
  • 打赏
  • 举报
回复
好像连题都没看懂……我太白痴了。
苏二 2012-05-03
  • 打赏
  • 举报
回复
你今天不努力思考,你毕业的时候会对你失望的.
chenbing01 2012-05-03
  • 打赏
  • 举报
回复
Private Sub Command1_Click()

Dim i As Integer, j As Integer, k As Integer
Dim r(13) As Integer

i = 0
j = 1
k = 0

Do

i = i + 1
If i > 13 Then i = 1


If r(i) = 0 Then
If k = 1 Then
r(i) = j
k = 0

j = j + 1
If j > 13 Then Exit Do

Else
k = 1
End If
End If
Loop


For i = 1 To 13
Print r(i)
Next

End Sub
请改成c#

62,268

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术交流专区
javascript云原生 企业社区
社区管理员
  • ASP.NET
  • .Net开发者社区
  • R小R
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

.NET 社区是一个围绕开源 .NET 的开放、热情、创新、包容的技术社区。社区致力于为广大 .NET 爱好者提供一个良好的知识共享、协同互助的 .NET 技术交流环境。我们尊重不同意见,支持健康理性的辩论和互动,反对歧视和攻击。

希望和大家一起共同营造一个活跃、友好的社区氛围。

试试用AI创作助手写篇文章吧