有点无聊。。
一堆球，红球，黑球，白球，各是7个，8个，5个，要求从中随意取出13个，这13个当中，必须最少有3个红球。输出所有可能的组合方式~
一堆球，红球，黑球，白球，各是7个，8个，5个，要求从中随意取出13个，这13个当中，必须最少有3个红球。输出所有可能的组合方式~
心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
中国DOS联盟
联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！
中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 出个小题，消遣一下~
查看 669 回复 10
楼 主
出个小题，消遣一下~
发表于 2008-06-07 23:09 · 中国 山东 淄博 联通
第 2 楼
发表于 2008-06-07 23:24 · 中国 陕西 西安 电信
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
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
第 3 楼
发表于 2008-06-08 00:27 · 中国 湖南 娄底 电信
楼上的好像不全
:
:
@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
致精致简！
第 4 楼
发表于 2008-06-08 00:32 · 中国 山东 淄博 联通
2楼 貌似没有考虑黑球是0个，或者白球是0个的情况~ 题中已经说明了是任意。。。 还有附加条件，红球必须最少3个
心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
第 5 楼
抛砖引玉，希望能求得更多的解
发表于 2008-06-08 00:35 · 中国 山东 淄博 联通
@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
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...^_^
第 6 楼
发表于 2008-06-08 00:38 · 中国 湖南 娄底 电信
第 7 楼
发表于 2008-06-08 00:41 · 中国 江苏 常州 溧阳市 电信
@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
第 8 楼
发表于 2008-06-08 00:41 · 中国 江苏 常州 溧阳市 电信
怎么一会工夫有人发了啊
第 9 楼
发表于 2008-06-08 00:43 · 中国 山东 淄博 联通
7楼的朋友，真是同出一辙啊！~ 想到一块去了~^_^
心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
第 10 楼
发表于 2008-06-08 01:27 · 中国 陕西 西安 电信
@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
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
S smile 微笑,L love 爱,O optimism 乐观,R relax 放松,E enthusiasm 热情...Slore
第 11 楼
发表于 2008-06-08 01:32 · 中国 山东 淄博 联通
真的是太棒了！运行时间，绝对的0.00秒。。。
心绪平和,眼藏静谧,无比安稳的火... Purification of soul...Just a false...^_^
论坛跳转: