中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
作者:
标题: 出个小题,消遣一下~ 上一主题 | 下一主题
pusofalse
银牌会员




积分 1604
发帖 646
注册 2008-4-13
状态 离线
『楼 主』:  出个小题,消遣一下~

有点无聊。。

一堆球,红球,黑球,白球,各是7个,8个,5个,要求从中随意取出13个,这13个当中,必须最少有3个红球。输出所有可能的组合方式~



心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
2008-6-7 23:09
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
slore
铂金会员





积分 5212
发帖 2478
注册 2007-2-8
状态 离线
『第 2 楼』:  

3 5 5
3 6 4
3 7 3
3 8 2
4 4 5
4 5 4
4 6 3
4 7 2
4 8 1
5 3 5
5 4 4
5 5 3
5 6 2
5 7 1
6 2 5
6 3 4
6 4 3
6 5 2
6 6 1
7 1 5
7 2 4
7 3 3
7 4 2
7 5 1



S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore
2008-6-7 23:24
查看资料  发短消息 网志   编辑帖子  回复  引用回复
26933062
银牌会员





积分 2268
发帖 879
注册 2006-12-19
状态 离线
『第 3 楼』:  

楼上的好像不全
:
@echo off&setlocal enabledelayedexpansion
for /l %%a in (3 1 7) do (
   for /l %%b in (1 1 8) do (
      for /l %%c in (1 1 5) do (
         set /a n=13-%%a,m=%%b+%%c,k=%%a+%%b,i=%%a+%%c
         if !m! equ !n! (set .%%a %%b %%c=a) else (
            if !k! equ 13 (set .%%a %%b 0=a) else if !i! equ 13 set .%%a 0 %%c=a
))))
for /f "delims=.=" %%a in ('set .') do echo %%a
pause




致精致简!
2008-6-8 00:27
查看资料  发短消息 网志   编辑帖子  回复  引用回复
pusofalse
银牌会员




积分 1604
发帖 646
注册 2008-4-13
状态 离线
『第 4 楼』:  

2楼 貌似没有考虑黑球是0个,或者白球是0个的情况~   题中已经说明了是任意。。。 还有附加条件,红球必须最少3个



心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
2008-6-8 00:32
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
pusofalse
银牌会员




积分 1604
发帖 646
注册 2008-4-13
状态 离线
『第 5 楼』:  抛砖引玉,希望能求得更多的解

@echo off&setlocal enabledelayedexpansion
echo %time%
for /l %%r in (3 1 7) do (
for /l %%b in (0 1 8) do (
for /l %%w in (0 1 5) do (
set/a res=%%r+%%b+%%w
if !res! equ 13 echo %%r  %%b  %%w
)
)
)
echo %time%
pause



心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
2008-6-8 00:35
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
26933062
银牌会员





积分 2268
发帖 879
注册 2006-12-19
状态 离线
『第 6 楼』:  

5楼的简洁多了,
靠居然忘了  把for 从0开始,白搞了那么多if判断。

   此帖被 +4 点积分        点击查看详情   
评分人:【 joyn 分数: +4  时间:2008-6-8 01:02




致精致简!
2008-6-8 00:38
查看资料  发短消息 网志   编辑帖子  回复  引用回复
ness
新手上路





积分 8
发帖 4
注册 2008-6-5
状态 离线
『第 7 楼』:  


@echo off&setlocal enabledelayedexpansion
for /l %%a in (3 1 7) do (
   for /l %%b in (0 1 8) do (
      for /l %%c in (0 1 5) do (
      set/a n=%%a+%%b+%%c
      if !n! equ 13 echo %%a %%b %%c
)))
pause


2008-6-8 00:41
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
ness
新手上路





积分 8
发帖 4
注册 2008-6-5
状态 离线
『第 8 楼』:  

怎么一会工夫有人发了啊

2008-6-8 00:41
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
pusofalse
银牌会员




积分 1604
发帖 646
注册 2008-4-13
状态 离线
『第 9 楼』:  

7楼的朋友,真是同出一辙啊!~ 想到一块去了~^_^



心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
2008-6-8 00:43
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
slore
铂金会员





积分 5212
发帖 2478
注册 2007-2-8
状态 离线
『第 10 楼』:  

@echo off&setlocal enabledelayedexpansion
echo %time%
for /l %%r in (3 1 7) do (
for /l %%w in (0 1 5) do (
set/a res=13-%%r-%%w
if !res! LSS 9 echo %%r !res! %%w  
)
)
echo %time%
pause

   此帖被 +13 点积分       点击查看详情   
评分人:【 pusofalse 分数: +8  时间:2008-6-8 01:29
评分人:【 26933062 分数: +5  时间:2008-6-8 01:34




S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore
2008-6-8 01:27
查看资料  发短消息 网志   编辑帖子  回复  引用回复
pusofalse
银牌会员




积分 1604
发帖 646
注册 2008-4-13
状态 离线
『第 11 楼』:  

真的是太棒了!运行时间,绝对的0.00秒。。。



心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
2008-6-8 01:32
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复

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


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



论坛跳转: