中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 搜索 | 上传 | 帮助 »
作者:
标题: [原创]批处理算24点 上一主题 | 下一主题
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 16 楼』:  

同学们,我寒窗苦读去了 这一个寒假谁见着我发帖,随便扣分。 留下一东西 压缩文件里有一些没发表的东西。 文章 [讨论]Batch Rename's Bug www.cn-dos.net/forum/viewthrea ... [讨论]TalkAboutString www.cn-dos.net/forum/viewthrea ... [分享][讨论]段落重定向方式改进 www.cn-dos.net/forum/viewthrea ... [讨论]2次ping1 不等于 1次ping2 www.cn-dos.net/forum/viewthrea ... [分享]%var%代替语句执行 www.cn-dos.net/forum/viewthrea ... 贪吃蛇思路解析 (23楼) www.cn-dos.net/forum/viewthrea ... 建立永久的畸形盘符 www.cn-dos.net/forum/viewthrea ... 数学相关: [原创]不限制位数,10进制内同进制的两个数之间相乘 www.cn-dos.net/forum/viewthrea ... [原创]批处理算24点 www.cn-dos.net/forum/viewthrea ... [数值计算]1-99内整数开根 www.cn-dos.net/forum/viewthrea ... 应用: [已解决]能否更改批处理脚本的进程名称? (已找到解答,在24楼链接。) www.cn-dos.net/forum/viewthrea ... [求助]如何用脚本实现待机?打开屏保? www.cn-dos.net/forum/viewthrea ... [原创]批处理脚本打包工具 www.cn-dos.net/forum/viewthrea ... [vbs]满1小时就关机 www.cn-dos.net/forum/viewthrea ... [分享]生成待编写的测试脚本 www.cn-dos.net/forum/viewthrea ... [原创]举出当前最小和最大的bat文件 www.cn-dos.net/forum/viewthrea ... [原创]001,002,003式的批量重命名 www.cn-dos.net/forum/viewthrea ... 娱乐,特效: [特效]数字阵逐点显现,随机 www.cn-dos.net/forum/viewthrea ... [原创]批处理写大字效果--新年贺卡 www.cn-dos.net/forum/viewthrea ... 动画特效:画圆、弹球、进度条、起落等 www.cn-dos.net/forum/viewthrea ... [原创]纯批处理版贪吃蛇 www.cn-dos.net/forum/viewthrea ... [原创]中间渐渐变大的圆 www.cn-dos.net/forum/viewthrea ... 空间随机游动粒子+贪吃蛇初版 www.cn-dos.net/forum/viewthrea ... 【视觉类】前进中的道路+飞机大炮 www.cn-dos.net/forum/viewthrea ... 【视觉类】从中间逐渐扩大再变小的方形框框+变色 www.cn-dos.net/forum/viewthrea ... 时钟--斜体+毫秒(更新,减少cpu和闪烁) www.cn-dos.net/forum/viewthrea ... [原创]潜水数天,完成了自己满意的数码雨 www.cn-dos.net/forum/viewthrea ... 【算是月贴】我尽量减少闪烁的批处理大时钟 www.cn-dos.net/forum/viewthrea ... [动画]一路小跑,第一集,跳! www.cn-dos.net/forum/viewthrea ... 做了一个自己满意的滚动字幕 www.cn-dos.net/forum/viewthrea ... 回帖: 【挑战】用批处理画出正方形和抛物线 14楼 15楼 18楼 bbs.bathome.cn/thread-3537-2-1.html [出题]批处理趣味数学之n阶蛇形方阵 28楼 www.cn-dos.net/forum/viewthrea ... [已结]怎样生成一个纯数字的密码字典 6楼 www.cn-dos.net/forum/viewthrea ... [已结]排列组合 27楼 www.cn-dos.net/forum/viewthrea ... 水区: [分享]徒手编数独阵 www.cn-dos.net/forum/viewthrea ... 以歧视之道还治歧视之身 www.cn-dos.net/forum/viewthrea ... 523066680语录 www.cn-dos.net/forum/viewthrea ... [分享][转载]半截故事 www.cn-dos.net/forum/viewthrea ... 光速矛盾 www.cn-dos.net/forum/viewthrea ... 1=0.9999999……? www.cn-dos.net/forum/viewthrea ... [ Last edited by 523066680 on 2009-5-1 at 23:05 ]


   此帖被 +25 点积分         点击查看详情   
评分人:【 yishanju 分数: +8  时间:2009-1-22 17:45
评分人:【 pusofalse 分数: +15  时间:2009-3-7 13:49
评分人:【 LoggerVick 分数: +2  时间:2018-3-18 20:06


附件 1: 523066680作品.rar (2009-1-10 14:51, 85.04 KiB, 下载附件所需积分 1 点 ,下载次数: 31)


2009-1-10 14:36
查看资料  发送邮件  访问主页  发短消息  网志  OICQ (523066680)  编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 17 楼』:  

我被菜了~ 请看 tieba.baidu.com/f?kz=522864657 10楼




2009-1-22 17:25
查看资料  发送邮件  访问主页  发短消息  网志  OICQ (523066680)  编辑帖子  回复  引用回复
yishanju
银牌会员

[b]看你妹啊[/b]


积分 1488
发帖 1357
注册 2006-5-20
状态 离线
『第 18 楼』:  

我终于忍扣你分冲动 还是加分吧




有问题请发论坛或者自行搜索,再短消息问我的统统是SB
2009-1-22 17:45
查看资料  发短消息  网志   编辑帖子  回复  引用回复
yishanju
银牌会员

[b]看你妹啊[/b]


积分 1488
发帖 1357
注册 2006-5-20
状态 离线
『第 19 楼』:  

好孩子,有前途的 我看好你,努力吧




有问题请发论坛或者自行搜索,再短消息问我的统统是SB
2009-1-22 17:54
查看资料  发短消息  网志   编辑帖子  回复  引用回复
BaseCoder
初级用户





积分 20
发帖 13
注册 2009-1-5
状态 离线
『第 20 楼』:  

10 10 4 4 ((10*10)-4)/4


2009-1-22 18:10
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 21 楼』:  

楼上的可以啊




2009-1-23 12:11
查看资料  发送邮件  访问主页  发短消息  网志  OICQ (523066680)  编辑帖子  回复  引用回复
zch1366
中级用户





积分 326
发帖 148
注册 2005-12-16
状态 离线
『第 22 楼』:  

要是加上其他运算符,可要累死人了.


2009-1-25 13:54
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 23 楼』:  

那我可不干 我还要 happy 牛 year !




2009-1-25 15:52
查看资料  发送邮件  访问主页  发短消息  网志  OICQ (523066680)  编辑帖子  回复  引用回复
pzwren
新手上路





积分 1
发帖 1
注册 2009-1-21
状态 离线
『第 24 楼』:  

谢谢学习了


2009-1-25 17:23
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
solid
新手上路





积分 18
发帖 10
注册 2009-1-23
状态 离线
『第 25 楼』:  

进来膜拜楼主


2009-1-25 21:40
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
yishanju
银牌会员

[b]看你妹啊[/b]


积分 1488
发帖 1357
注册 2006-5-20
状态 离线
『第 26 楼』:  

Originally posted by 523066680 at 2009-1-25 18:12: 真受不了呢…… 这样的水贴……
所以说呢,哈哈,我扣你分




有问题请发论坛或者自行搜索,再短消息问我的统统是SB
2009-1-26 00:37
查看资料  发短消息  网志   编辑帖子  回复  引用回复
54cml
新手上路





积分 16
发帖 7
注册 2008-4-29
状态 离线
『第 27 楼』:  

(3+3/7)*7=24 3377


2009-5-27 03:28
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
dnntgmfd
初级用户





积分 85
发帖 52
注册 2009-1-10
来自 湘乡
状态 离线
『第 28 楼』:  

楼主好狂啊!


2009-5-27 04:44
查看资料  发送邮件  发短消息  网志  OICQ (527385656)  编辑帖子  回复  引用回复
54cml
新手上路





积分 16
发帖 7
注册 2008-4-29
状态 离线
『第 29 楼』:  

(4-4/7)*7


   此帖被 +5 点积分      点击查看详情   
评分人:【 523066680 分数: +5  时间:2009-5-27 21:59


2009-5-27 11:13
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
523066680
银牌会员

SuperCleaner


积分 2362
发帖 1133
注册 2008-2-2
状态 离线
『第 30 楼』:  

呜呜…… 就那个式子类型都…… 哎,别人那个代码比我的短很多,我也就没改了
回复:【精品】我也来写批处理 ... @echo off setlocal enableextensions enabledelayedexpansion title 作者:liuzhaonan11 echo 批处理算24点&echo. :loop set /p "n=输入四个数用空格分开: " set /a "lzn=0" for %%i in (!n!) do set /a "lzn+=1"&set /a "lz!lzn!z=%%i,lz!lzn!m=1,lz!lzn!s=%%i" call:liuzhaonan11 lz if not errorlevel 1 echo 结果: 没有答案 goto loop 原理说明:使用有理数进行计算,选择算式中最先结合的两数和它们之间的运算,并递归. :liuzhaonan11 setlocal set "f1=+"&set "f2=-"&set "f3=*"&set "f4=/" for /l %%i in (1,1,!%1n!) do for /l %%j in (1,1,!%1n!) do if %%i neq %%j ( for /l %%k in (1,1,4) do ( setlocal if %%k leq 2 set /a "z=%1%%jz*%1%%im!f%%k!%1%%jm*%1%%iz,m=%1%%jm*%1%%im" if %%k equ 3 set /a "z=%1%%jz*%1%%iz,m=%1%%jm*%1%%im" if %%k equ 4 set /a "z=%1%%jz*%1%%im,m=%1%%jm*%1%%iz" if !%1n! equ 2 ( set /a "t=!z!-24*!m!" if !t! equ 0 if !m! neq 0 echo 结果: !%1%%js! !f%%k! !%1%%is! = 24&exit /b 1 ) else ( set "s=(!%1%%js! !f%%k! !%1%%is!)"&set /a "n=0" for /l %%l in (1,1,!%1n!) do if %%l neq %%i if %%l neq %%j ( set /a "n+=1"&set "%1!n!z=!%1%%lz!"&set "%1!n!m=!%1%%lm!"&set "%1!n!s=!%1%%ls!" ) set /a "n+=1"&set "%1!n!z=!z!"&set "%1!n!m=!m!"&set "%1!n!s=!s!" set "%1n=!n!"&call%0 %1 if errorlevel 1 exit /b 1 ) endlocal ) ) exit /b 0 作者:liuzhaonan11 2009-1-11 17:17   回复此发言 --------------------------------------------------------------------------------




2009-5-27 21:41
查看资料  发送邮件  访问主页  发短消息  网志  OICQ (523066680)  编辑帖子  回复  引用回复

请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: