精易论坛

标题: 春碗魔术解密(约瑟夫问题) 含易语言操作步骤 [打印本页]

作者: daduke7902    时间: 2024-2-11 19:17
标题: 春碗魔术解密(约瑟夫问题) 含易语言操作步骤
今年春晚刘谦魔术火了,其实仔细分析就是数学问题,抽时间写了个易语言分析的程序,源码 奉上。




' ’‘揭秘:
' 重要的步骤前 我加了* 表示
' 第一个*号, 就是从顶部拿3张牌 插入中间,结果会怎样,不管原来几张牌如何排列,经过本步骤后一定会出现首张与尾张相同的情况,如果没做到,可以和小尼一桌。
' 这里延伸一下, 如果魔术开始是5张牌,这里就要拿4张牌, 依次类推。。。


' 第二个*号,很神奇,必须的步骤,使底牌排在了准确的位置,具体来说就是:
' 如果 手余 5 张牌,循环一轮后底牌在第 3 位置,如果手余 6 张牌,循环一轮后底牌在 第 5 位置,本操作很重要,使其正好符合 约瑟夫序列

' 第三个*号,约瑟夫问题的实施。过程不能错

' 至于为何是下翻7张,其实也不是巧合,有兴趣去了解下约瑟夫问题, 下面我们来分析 约瑟夫问题的解法,递归法。

' 本程序只从程序算法角度解决问题,还有更好的数学解法,从略。


最后加上 约瑟夫问题的解法 ,完美了


.版本 2

.子程序 子程序报数问题
.局部变量 n, 整数型
.局部变量 m, 整数型
.局部变量 people, , , "0"
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 count, 整数型

' 设有n个人(编号从1到n)围成一圈,从第一个人开始报数,数到m的人出列,然后从出列的下一个人开始重新报数,直到所有人依次出列。问,最后一个出列的人的编号是多少?
n = 到整数 (编辑框3.内容)  ' 总人数)
m = 到整数 (编辑框4.内容)  ' 报数到m的人出列
重定义数组 (people, 假, n)
.计次循环首 (n, i)
    people = 1  ' '初始化每个人的状态为在圈内
.计次循环尾 ()
count = 0  ' 计数器,记录报数到m的人
i = 1  ' 从第1个人开始报数
j = 0  ' 记录出圈的人数
.判断循环首 (j < n - 1)  ' 当出圈人数小于总人数时循环
    .如果 (people = 1)
        count = count + 1  ' 报数加1
        .如果 (count = m)  ' 如果报数到m了
            count = 0  ' 重新开始报数
            people = 0  ' 将这个人标记为出圈
            j = j + 1  ' 出圈人数加1
            输出调试文本 (数组_hebing_整数 (people, “,”))
        .否则

        .如果结束


    .否则

    .如果结束
    i = i + 1  ' 继续报数
    .如果真 (i > n)
        i = 1  ' 如果到了最后一个人,则从第一个人继续报数
    .如果真结束
。。。

源码 下载:


更多源码,点开头像查看

往期源码回顾:


【永久免费】易语言 自动办公RPA 正式上线
https://125.confly.eu.org/forum.php?mod=viewthread&tid=14811066







作者: Lemt    时间: 2024-2-11 19:20
感谢分享666
作者: 447485268    时间: 2024-2-11 19:20
支持开源~!感谢分享
作者: 1752328925    时间: 2024-2-11 19:24
支持开源~!感谢分享
作者: guananyong    时间: 2024-2-11 19:27
学了一下  下载来看看  谢谢分享
作者: 队长是我    时间: 2024-2-11 20:06
666666666666666666666
作者: ccok    时间: 2024-2-11 20:13
#在这里快速回复#久免费】易语言 自动办
作者: xjshuaishuai    时间: 2024-2-11 20:24
谢谢分享!
作者: 小虎来了    时间: 2024-2-11 20:37
谢谢分享!
作者: 亿万    时间: 2024-2-11 20:50
支持开源~!感谢分享
作者: wjswzj0    时间: 2024-2-11 20:52
谢谢分享
作者: 艾玛克138    时间: 2024-2-11 21:02
支持支持,希望发展的更好!
作者: 851375257    时间: 2024-2-11 21:12
666666666666666666
作者: chenyucheng    时间: 2024-2-11 21:19
我回复这句话就是为了下载。
作者: lobid    时间: 2024-2-11 21:22
让 江小白 来看看帖子里藏了啥好东西~~~
作者: chenyucheng    时间: 2024-2-11 21:30
这魔术是怎么玩的?
作者: jysoft2022    时间: 2024-2-11 21:46
新年快乐
作者: 509222191    时间: 2024-2-11 21:55
大杀四方水电费是的
作者: 凉冰粉    时间: 2024-2-11 21:58
感谢分享!
作者: 没事瞎琢磨    时间: 2024-2-11 22:37
好家伙 好家伙
作者: zp0802    时间: 2024-2-11 22:44
毒贩夫妇付付付付付付付付付付付
作者: 易神    时间: 2024-2-11 23:06
支持开源~!感谢分享
作者: 光影魔术    时间: 2024-2-11 23:49
感谢分享
作者: 小小小Baby    时间: 2024-2-12 00:13
这解密过程太牛逼了
作者: 亚伦gg    时间: 2024-2-12 01:24

作者: hhf4977    时间: 2024-2-12 04:05
感谢分享,很给力!~
作者: 查过    时间: 2024-2-12 07:09
感谢分享,很给力!~
作者: 豆豆灰常开心    时间: 2024-2-12 07:14
感谢您对论坛的支持!
作者: qqmqqg    时间: 2024-2-12 08:00
66666666666666666666
作者: 外星来客24k    时间: 2024-2-12 08:16
6666666666666666666
作者: 番茄吧    时间: 2024-2-12 08:24
回帖支持一下~~
作者: zerolist    时间: 2024-2-12 08:32
学习一下
作者: zzzzzzzz88    时间: 2024-2-12 08:39
看看方法,学习了!!!
作者: 深圳梦    时间: 2024-2-12 10:17
支持开源~!感谢分享
作者: 1347379245    时间: 2024-2-12 10:27
感谢分享
作者: cqcc    时间: 2024-2-12 10:44
春节快乐!
作者: abpyu    时间: 2024-2-12 11:53
虽然看不懂,也没看春晚,但是还是点个赞再走
作者: xuwu001    时间: 2024-2-12 12:22
看看看看看看看看
作者: 临安    时间: 2024-2-12 12:56
楼主辛苦了,谢谢楼主,感谢楼主分享,楼主好人一生平安!!!
作者: lity2310    时间: 2024-2-12 13:53
下载下来学习学习
作者: xf702    时间: 2024-2-12 14:47
这个,我真的服。。。
作者: 1050110749    时间: 2024-2-12 15:25
看看方法,学习了!!!
作者: zaozi    时间: 2024-2-12 18:26
学习了,谢谢楼主
作者: d大大大大大表哥    时间: 2024-2-12 19:13

看看方法,学习了!!!
作者: fusiyon    时间: 2024-2-12 20:04
感谢分享,很给力!~
作者: cwccjh    时间: 2024-2-12 21:39
6666666666666666666666666
作者: 1752328925    时间: 2024-2-12 23:34
感谢开源  谢谢分享!
作者: shaokui123    时间: 2024-2-13 00:21
感谢分享,很给力!~
作者: SMTHU    时间: 2024-2-13 01:25
牛皮克拉斯
作者: 查过    时间: 2024-2-13 07:19
已经顶贴,感谢您对论坛的支持!
作者: 豆豆灰常开心    时间: 2024-2-13 07:24
感谢分享,很给力!~
作者: 龍貓    时间: 2024-2-13 07:50
已经顶贴,感谢您对论坛的支持!

作者: 想学易语言    时间: 2024-2-13 09:45
感谢分享,很给力!~
作者: zlzwjx    时间: 2024-2-13 10:49
感谢感谢,下来看看



作者: 是大哥吖    时间: 2024-2-13 11:20
666666666666666666666666666
作者: 晴天哥哥    时间: 2024-2-13 13:02

666666666666666666666666666
作者: bianyuan456    时间: 2024-2-13 13:35
已经顶贴,感谢您对论坛的支持!
作者: shuya1    时间: 2024-2-13 14:15
感谢分享,很给力!~
作者: w521521    时间: 2024-2-13 17:30
感谢分享,很给力!~
作者: an1994114    时间: 2024-2-13 20:01
66666666666666
作者: 396384183    时间: 2024-2-13 20:30

支持开源~!感谢分享
作者: Rui3128    时间: 2024-2-13 21:23
厉害,学习学习
作者: hanwenlou    时间: 2024-2-14 03:48
??????怎么玩的

作者: zaozi    时间: 2024-2-14 07:01
支持开源~!感谢分享
作者: 查过    时间: 2024-2-14 07:30
全都是大佬~
作者: 豆豆灰常开心    时间: 2024-2-14 07:35
已经顶贴,感谢您对论坛的支持!
作者: year1970    时间: 2024-2-14 15:29
感谢分享
作者: linzeyanzuishua    时间: 2024-2-14 17:01
666666666666666666666666666666666666666
作者: xihui1534    时间: 2024-2-14 20:24
感谢分享,很给力!~
作者: ctry78985    时间: 2024-2-14 21:05
感谢分享

作者: 53770zhang    时间: 2024-2-14 21:29
大神厉害
作者: 香草?Triste°    时间: 2024-2-14 21:30
感谢分享

作者: lcxszz    时间: 2024-2-15 12:07
震天fgsfdgsdfgsdfg
作者: lm88818    时间: 2024-2-15 15:30
        感谢分享,很给力!~
作者: 小羊要吃狼    时间: 2024-2-15 15:43
感谢分享
作者: qingwanfuzhu    时间: 2024-2-15 19:46
春碗魔术解密(约瑟夫问题) 含易语言操作步骤
作者: zspokzy    时间: 2024-2-15 20:03
好家伙,下午在隔壁看到PY版本的,现在易的版本也来了
作者: shaokui123    时间: 2024-2-16 01:04
感谢分享,很给力!~
作者: FUYUEPC    时间: 2024-2-16 09:29
楼主辛苦了,谢谢楼主,感谢楼主分享,楼主好人一生平安!!!
作者: 我很低调    时间: 2024-2-16 13:16
看看           
作者: teachuser    时间: 2024-2-16 18:36
感谢分享,很给力!~
作者: 韦贝贝    时间: 2024-2-17 12:46
春碗魔术解密(约瑟夫问题)
作者: clocks    时间: 2024-2-17 21:43
网上人才多,分分钟就扒光了
作者: ZHT2    时间: 2024-2-18 00:20
666666666666666666
作者: 陌尛熙    时间: 2024-2-18 10:12
感谢分享
作者: 四叔    时间: 2024-2-18 13:36
6666666666666666666
作者: hmyroot    时间: 2024-2-19 15:24
楼主好犀利,这么快就解开了春晚的魔术小把戏
作者: pipicool    时间: 2024-2-20 03:17
学习一下
作者: 胖子葛格    时间: 2024-2-22 19:14
感谢大神分享~!
作者: 1025806597    时间: 2024-3-1 22:33
永无烦恼,好运常留!

作者: 玫瑰很扎手    时间: 2024-5-16 13:23
123




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4