易语言遍历数

ye347549299

举个例子  把40分成5份  但是5份只能 在1~10中的取        例如   正确：5+5+10+10+10  =40  [5-5-10-10-10]    1+9+10+10+10=40  [1-9-10-10-10]   5+7+9+9+10=40 [5-7-9-9-10]  

错误：5+7+5+11+12=40 [5-7-5-11-12]   这种不需要的 因为 不在1~10里

把所有正确的例子遍历出来   例如这种[5-7-9-9-10]

最好也可以 把 30分成4份这样的遍历的算法

samll88

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
a	整数型		5
i	整数型

计次循环首 (1000, )
置随机数种子 ()
计次循环首 (5, i)
a [i] ＝ 取随机数 (5, 10)
计次循环尾 ()
a [5] ＝ 40 － a [1] － a [2] － a [3] － a [4]
调试输出 (到文本 (a [1]) ＋ “+” ＋ 到文本 (a [2]) ＋ “+” ＋ 到文本 (a [3]) ＋ “+” ＋ 到文本 (a [4]) ＋ “+” ＋ 到文本 (a [5]) ＋ “=” ＋ 到文本 (40))
延迟 (100)
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 a, 整数型, , "5"<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (1000, )<br />     置随机数种子 ()<br />     .计次循环首 (5, i)<br />         a <i> ＝ 取随机数 (5, 10)<br />     .计次循环尾 ()<br />     a [5] ＝ 40 － a [1] － a [2] － a [3] － a [4]<br />     调试输出 (到文本 (a [1]) ＋ “+” ＋ 到文本 (a [2]) ＋ “+” ＋ 到文本 (a [3]) ＋ “+” ＋ 到文本 (a [4]) ＋ “+” ＋ 到文本 (a [5]) ＋ “=” ＋ 到文本 (40))<br />     延迟 (100)<br /> .计次循环尾 ()

补充内容 (2025-2-25 07:21):
写错了,看下面

samll88

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
a	整数型		5
i	整数型

计次循环首 (1000, )
置随机数种子 ()
计次循环首 (5, i)
a [i] ＝ 取随机数 (5, 10)
计次循环尾 ()
a [5] ＝ 40 － a [1] － a [2] － a [3] － a [4]
如果真 (a [5] ≤ 10)
调试输出 (到文本 (a [1]) ＋ “+” ＋ 到文本 (a [2]) ＋ “+” ＋ 到文本 (a [3]) ＋ “+” ＋ 到文本 (a [4]) ＋ “+” ＋ 到文本 (a [5]) ＋ “=” ＋ 到文本 (40))
延迟 (100)

计次循环尾 ()
刚才也错了,改下

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 a, 整数型, , "5"<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (1000, )<br />     置随机数种子 ()<br />     .计次循环首 (5, i)<br />         a <i> ＝ 取随机数 (5, 10)<br />     .计次循环尾 ()<br />     a [5] ＝ 40 － a [1] － a [2] － a [3] － a [4]<br />     .如果真 (a [5] ≤ 10)<br />         调试输出 (到文本 (a [1]) ＋ “+” ＋ 到文本 (a [2]) ＋ “+” ＋ 到文本 (a [3]) ＋ “+” ＋ 到文本 (a [4]) ＋ “+” ＋ 到文本 (a [5]) ＋ “=” ＋ 到文本 (40))<br />         延迟 (100)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> 刚才也错了,改下

xiguapihenpi

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
组合数组	文本型		0

寻找组合 (5, 40, 组合数组)  ' 查找40分5份的组合
输出调试文本 (“40分5份：”)
调试输出 (组合数组)
清除数组 (组合数组)
寻找组合 (4, 30, 组合数组)  ' 查找30分4份的组合
输出调试文本 (“30分4份：”)
调试输出 (组合数组)

子程序名	返回值类型	公开	备 注
寻找组合	整数型
参数名	类 型	参考	可空	数组	备 注
份数	整数型
目标值	整数型
结果容器	文本型

变量名	类 型	静态	数组	备 注
临时数组	整数型		0

清除数组 (结果容器)  ' 清空结果数组
初始化组合处理 (份数, 目标值, 临时数组, 结果容器)
返回 (取数组成员数 (结果容器))

子程序名	返回值类型	公开	备 注
初始化组合处理
参数名	类 型	参考	可空	数组	备 注
n	整数型
target	整数型
当前组合	整数型
结果容器	文本型

回溯生成组合 (当前组合, 1, 0, n, target, 结果容器)

子程序名	返回值类型	公开	备 注
回溯生成组合
参数名	类 型	参考	可空	数组	备 注
当前组合	整数型
起始值	整数型
当前和	整数型
剩余份数	整数型
总目标	整数型
结果容器	文本型

变量名	类 型	静态	数组	备 注
x	整数型
下限值	整数型
上限值	整数型
需要数值	整数型
临时组合	整数型		0

如果真 (剩余份数 ＝ 0)
如果真 (当前和 ＝ 总目标)
数组转文本 (当前组合, 结果容器)  ' 将有效组合存入结果
返回 ()

需要数值 ＝ 总目标 － 当前和
下限值 ＝ 取最大值A (起始值, 需要数值 － 10 �� (剩余份数 － 1))
上限值 ＝ 取最小值A (10, 需要数值 ÷ 剩余份数)
如果真 (剩余份数 ＝ 1)
如果真 (下限值 ≤ 需要数值 且 需要数值 ≤ 10)
加入成员 (临时组合, 当前组合)
加入成员 (临时组合, 需要数值)
回溯生成组合 (临时组合, 需要数值, 当前和 ＋ 需要数值, 0, 总目标, 结果容器)
返回 ()

变量循环首 (下限值, 上限值, 1, x)
加入成员 (临时组合, 当前组合)
加入成员 (临时组合, x)
回溯生成组合 (临时组合, x, 当前和 ＋ x, 剩余份数 － 1, 总目标, 结果容器)
清除数组 (临时组合)
变量循环尾 ()

子程序名	返回值类型	公开	备 注
数组转文本
参数名	类 型	参考	可空	数组	备 注
数组	整数型
结果	文本型

变量名	类 型	静态	数组	备 注
文本	文本型
i	整数型

文本 ＝ “[”
计次循环首 (取数组成员数 (数组), i)
文本 ＝ 文本 ＋ 到文本 (数组 [i])
如果真 (i ≠ 取数组成员数 (数组))
文本 ＝ 文本 ＋ “-”

计次循环尾 ()
文本 ＝ 文本 ＋ “]”
加入成员 (结果, 文本)

子程序名	返回值类型	公开	备 注
取最大值A	整数型
参数名	类 型	参考	可空	数组	备 注
a	整数型
b	整数型

返回 (选择 (a ＞ b, a, b))

子程序名	返回值类型	公开	备 注
取最小值A	整数型
参数名	类 型	参考	可空	数组	备 注
a	整数型
b	整数型

返回 (选择 (a ＜ b, a, b))

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 组合数组, 文本型, , "0"<br /> <br /> 寻找组合 (5, 40, 组合数组)  ' 查找40分5份的组合<br /> 输出调试文本 (“40分5份：”)<br /> 调试输出 (组合数组)<br /> <br /> 清除数组 (组合数组)<br /> 寻找组合 (4, 30, 组合数组)  ' 查找30分4份的组合<br /> 输出调试文本 (“30分4份：”)<br /> 调试输出 (组合数组)<br /> <br /> <br /> .子程序 寻找组合, 整数型, 公开<br /> .参数 份数, 整数型<br /> .参数 目标值, 整数型<br /> .参数 结果容器, 文本型, 数组<br /> .局部变量 临时数组, 整数型, , "0"<br /> <br /> 清除数组 (结果容器)  ' 清空结果数组<br /> 初始化组合处理 (份数, 目标值, 临时数组, 结果容器)<br /> 返回 (取数组成员数 (结果容器))<br /> <br /> .子程序 初始化组合处理<br /> .参数 n, 整数型<br /> .参数 target, 整数型<br /> .参数 当前组合, 整数型, 数组<br /> .参数 结果容器, 文本型, 数组<br /> <br /> 回溯生成组合 (当前组合, 1, 0, n, target, 结果容器)<br /> <br /> .子程序 回溯生成组合<br /> .参数 当前组合, 整数型, 数组<br /> .参数 起始值, 整数型<br /> .参数 当前和, 整数型<br /> .参数 剩余份数, 整数型<br /> .参数 总目标, 整数型<br /> .参数 结果容器, 文本型, 数组<br /> .局部变量 x, 整数型<br /> .局部变量 下限值, 整数型<br /> .局部变量 上限值, 整数型<br /> .局部变量 需要数值, 整数型<br /> .局部变量 临时组合, 整数型, , "0"<br /> <br /> .如果真 (剩余份数 ＝ 0)<br />     .如果真 (当前和 ＝ 总目标)<br />         数组转文本 (当前组合, 结果容器)  ' 将有效组合存入结果<br />     .如果真结束<br />     返回 ()<br /> .如果真结束<br /> <br /> 需要数值 ＝ 总目标 － 当前和<br /> 下限值 ＝ 取最大值A (起始值, 需要数值 － 10 × (剩余份数 － 1))<br /> 上限值 ＝ 取最小值A (10, 需要数值 ÷ 剩余份数)<br /> <br /> .如果真 (剩余份数 ＝ 1)<br />     .如果真 (下限值 ≤ 需要数值 且 需要数值 ≤ 10)<br />         加入成员 (临时组合, 当前组合)<br />         加入成员 (临时组合, 需要数值)<br />         回溯生成组合 (临时组合, 需要数值, 当前和 ＋ 需要数值, 0, 总目标, 结果容器)<br />     .如果真结束<br />     返回 ()<br /> .如果真结束<br /> <br /> .变量循环首 (下限值, 上限值, 1, x)<br />     加入成员 (临时组合, 当前组合)<br />     加入成员 (临时组合, x)<br />     回溯生成组合 (临时组合, x, 当前和 ＋ x, 剩余份数 － 1, 总目标, 结果容器)<br />     清除数组 (临时组合)<br /> .变量循环尾 ()<br /> <br /> .子程序 数组转文本<br /> .参数 数组, 整数型, 数组<br /> .参数 结果, 文本型, 数组<br /> .局部变量 文本, 文本型<br /> .局部变量 i, 整数型<br /> <br /> 文本 ＝ “[”<br /> .计次循环首 (取数组成员数 (数组), i)<br />     文本 ＝ 文本 ＋ 到文本 (数组 <i>)<br />     .如果真 (i ≠ 取数组成员数 (数组))<br />         文本 ＝ 文本 ＋ “-”<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 文本 ＝ 文本 ＋ “]”<br /> 加入成员 (结果, 文本)<br /> <br /> .子程序 取最大值A, 整数型<br /> .参数 a, 整数型<br /> .参数 b, 整数型<br /> <br /> 返回 (选择 (a ＞ b, a, b))<br /> <br /> .子程序 取最小值A, 整数型<br /> .参数 a, 整数型<br /> .参数 b, 整数型<br /> <br /> 返回 (选择 (a ＜ b, a, b))

可以任意份数和目标值

awuming

可以参考 棋P 牛牛计算

xiguapihenpi

xiguapihenpi 发表于 2025-2-25 07:35
[e=0].版本 2
.支持库 spec

下限值 ＝ 取最大值A (起始值, 需要数值 － 10 × (剩余份数 － 1))

萧楚楠

samll88 发表于 2025-2-25 07:13
[e=0].版本 2
.支持库 spec

这样还是不太完善，起码你第一组都取到15了，而且可能会漏

function getAllPossibleSplits(total, parts, min, max) {
const results = [];

// 边界条件校验
if (parts <= 0 || total <= 0 || min > max) return [];
if (parts * min > total || parts * max < total) return [];

// 回溯算法核心
function backtrack(current, remainingTotal, remainingParts) {
    if (remainingParts === 1) {
        if (remainingTotal >= min && remainingTotal <= max) {
            results.push([...current, remainingTotal]);
        }
        return;
    }

    // 计算当前数字的取值范围
    const start = Math.max(
        min,
        remainingTotal - (remainingParts - 1) * max
    );
    const end = Math.min(
        max,
        remainingTotal - (remainingParts - 1) * min
    );

    // 遍历所有可能值
    for (let value = start; value <= end; value++) {
        current.push(value);
        backtrack(current, remainingTotal - value, remainingParts - 1);
        current.pop();
    }
}

backtrack([], total, parts);
return results;

}

// 示例用法
console.log(getAllPossibleSplits(10, 2, 3, 10));
/ 输出：
[
[3,7], [4,6], [5,5],
[6,4], [7,3]
]
/

console.log(getAllPossibleSplits(10, 3, 3, 10));
/ 输出：
[
[3,3,4], [3,4,3],
[4,3,3]
]
/

console.log(getAllPossibleSplits(20, 5, 3, 9));
/ 输出（部分示例）：
[
[3,3,3,3,8], [3,3,3,4,7],
[3,3,3,5,6], ..., [9,9,1,1,0]（无效项会被自动过滤）
]
/

aipca

见你上一贴：易语言计算问题_精易论坛

samll88

萧楚楠 发表于 2025-2-25 09:10
这样还是不太完善，起码你第一组都取到15了，而且可能会漏

[md]function getAllPossibleSplits(total, p ...

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
数字5	整数型
a	整数型
b	整数型
c	整数型
d	整数型
计次	整数型

计次循环首 (10, a)
计次循环首 (10, b)
计次循环首 (10, c)
计次循环首 (10, d)
数字5 ＝ 40 － a － b － c － d
如果真 (数字5 ≤ 10)
调试输出 (到文本 (a) ＋ “+” ＋ 到文本 (b) ＋ “+” ＋ 到文本 (c) ＋ “+” ＋ 到文本 (d) ＋ “+” ＋ 到文本 (数字5) ＋ “=” ＋ 到文本 (40))
计次 ＝ 计次 ＋ 1
调试输出 (“总数:”, 计次)

计次循环尾 ()
计次循环尾 ()
计次循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 数字5, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 b, 整数型<br /> .局部变量 c, 整数型<br /> .局部变量 d, 整数型<br /> .局部变量 计次, 整数型<br /> <br /> .计次循环首 (10, a)<br />     .计次循环首 (10, b)<br />         .计次循环首 (10, c)<br />             .计次循环首 (10, d)<br />                 数字5 ＝ 40 － a － b － c － d<br />                 .如果真 (数字5 ≤ 10)<br />                     调试输出 (到文本 (a) ＋ “+” ＋ 到文本 (b) ＋ “+” ＋ 到文本 (c) ＋ “+” ＋ 到文本 (d) ＋ “+” ＋ 到文本 (数字5) ＋ “=” ＋ 到文本 (40))<br />                     计次 ＝ 计次 ＋ 1<br />                     调试输出 (“总数:”, 计次)<br />                 .如果真结束<br /> <br />             .计次循环尾 ()<br />         .计次循环尾 ()<br />     .计次循环尾 ()<br /> .计次循环尾 ()

刚才随便写的,其实容易

samll88

  

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
数字5	整数型
a	整数型
b	整数型
c	整数型
d	整数型
计次	整数型

计次循环首 (10, a)
计次循环首 (10, b)
计次循环首 (10, c)
计次循环首 (10, d)
数字5 ＝ 40 － a － b － c － d
如果真 (数字5 ≤ 10 且 数字5 ≠ 0)
调试输出 (到文本 (a) ＋ “+” ＋ 到文本 (b) ＋ “+” ＋ 到文本 (c) ＋ “+” ＋ 到文本 (d) ＋ “+” ＋ 到文本 (数字5) ＋ “=” ＋ 到文本 (40))
计次 ＝ 计次 ＋ 1

计次循环尾 ()
计次循环尾 ()
计次循环尾 ()
计次循环尾 ()
调试输出 (“总数:”, 计次)
修正一下0

.子程序 _按钮1_被单击<br /> .局部变量 数字5, 整数型<br /> .局部变量 a, 整数型<br /> .局部变量 b, 整数型<br /> .局部变量 c, 整数型<br /> .局部变量 d, 整数型<br /> .局部变量 计次, 整数型<br /> <br /> .计次循环首 (10, a)<br />     .计次循环首 (10, b)<br />         .计次循环首 (10, c)<br />             .计次循环首 (10, d)<br />                 数字5 ＝ 40 － a － b － c － d<br />                 .如果真 (数字5 ≤ 10 且 数字5 ≠ 0)<br />                     调试输出 (到文本 (a) ＋ “+” ＋ 到文本 (b) ＋ “+” ＋ 到文本 (c) ＋ “+” ＋ 到文本 (d) ＋ “+” ＋ 到文本 (数字5) ＋ “=” ＋ 到文本 (40))<br />                     计次 ＝ 计次 ＋ 1<br /> <br />                 .如果真结束<br /> <br />             .计次循环尾 ()<br />         .计次循环尾 ()<br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> 调试输出 (“总数:”, 计次)<br /> 修正一下0