从1到33每6个数相加等于101有几组要全部列出来

2024-12-21 07:59:01
推荐回答(2个)
回答1:

全部列出来。LZ是在糊弄人吧。。。还是用程序列吧。。。
一共有20068组,把"--"内的代码复制到记事本中,另存为bat格式,比如1.bat
双击会跳出个黑色窗口,别管它,可以最小化,穷举完了会自动关闭。
然后在与bat相同的目录下会出现个1.txt的文件,就是所有数组了,由于bat一直在运行,txt内容是不断再更新的,期间打开看的话注意不要修改数据。我机子比较破,花了半个小时。
代码比较长,for的用法忘记了,用的印象中的汇编的思路,见笑了。
:------------------------------------------------------------------------------------
echo off
set /a i=0
set /a a=1
set /a b=2
set /a c=3
set /a d=4
set /a e=5
set /a f=6
goto com

:abg
set /a a+=1
set /a b=%a%+1
set /a c=%b%+1
set /a d=%c%+1
set /a e=%d%+1
set /a f=%e%+1
if %a% equ 15 goto end
goto com

:bbg
set /a b+=1
set /a c=%b%+1
set /a d=%c%+1
set /a e=%d%+1
set /a f=%e%+1
if %b% equ 30 goto abg
goto com

:cbg
set /a c+=1
set /a d=%c%+1
set /a e=%d%+1
set /a f=%e%+1
if %c% equ 31 goto bbg
goto com

:dbg
set /a d+=1
set /a e=%d%+1
set /a f=%e%+1
if %d% equ 32 goto cbg
goto com

:ebg
set /a e+=1
set /a f=%e%+1
if %e% equ 33 goto dbg

:com
if %f% equ 34 goto ebg
set /a n=%a%+%b%+%c%+%d%+%e%+%f%
if %n% equ 101 goto pri
set /a f+=1
goto com
:pri
set /a i+=1
echo %i%、%a% %b% %c% %d% %e% %f% >> 1.txt
set /a f+=1
goto com
:end
:------------------------------------------------------------------------------------

回答2:

你有数据吗 可以发给我吧