Question

问一个易语言数组成员累加的方法

一个整数数组 1 2 3 4 5 需要的是这个数组成员相加的所有结果,不限制几位相加.从1+2~1+2+3+4+5的所有可能的相加.最好回复代码

Answer 1

.版本 2

.程序集 窗口程序集1
.程序集变量 数组1, , , "0"

.子程序 加1_5的数组, 整数型, 公开
.参数 数组, 整数型, 数组
.局部变量 n, 整数型
.局部变量 x, 整数型

.计次循环首 (5, x)
.计次循环首 (5, n)
.如果 (x ＝ n)

.否则
返回 (数组 [x] ＋ 数组 [n])
数组1 [n] ＝ 数组 [x] ＋ 数组 [n]
.如果结束

.计次循环尾 ()
.计次循环尾 ()
.计次循环首 (5, x)
.计次循环首 (5, n)
.如果 (x ＝ n)

.否则
返回 (数组 [x] ＋ 数组 [n] ＋ 数组 [n])
数组1 [n] ＝ 数组 [x] ＋ 数组 [n] ＋ 数组 [n]
.如果结束

.计次循环尾 ()
.计次循环尾 ()
.计次循环首 (5, x)

.计次循环首 (5, n)
.如果 (x ＝ n)

.否则
返回 (数组 [x] ＋ 数组 [n] ＋ 数组 [n] ＋ 数组 [n])
数组1 [n] ＝ 数组 [x] ＋ 数组 [n] ＋ 数组 [n] ＋ 数组 [n]
.如果结束

.计次循环尾 ()
.计次循环尾 ()
.计次循环首 (5, x)

.计次循环首 (5, n)
.如果 (x ＝ n)

.否则
返回 (数组 [x] ＋ 数组 [n] ＋ 数组 [n] ＋ 数组 [n])
数组1 [n] ＝ 数组 [x] ＋ 数组 [n] ＋ 数组 [n] ＋ 数组 [n]
.如果结束

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

追问

虽然你回复的不是我想要的,但是看在你这么多代码的份上分就给你了

追答

你找到答案了吗？ 能不能告诉我 O(∩_∩)O谢谢

Answer 2

.版本 2
.支持库 Krnlnex

.局部变量 集合文本, 文本型
.局部变量 计次, 整数型
.局部变量 数组索引, 文本型, , "0"
.局部变量 总和, 整数型

集合文本 ＝ “1+2+3+4+5+6+7+8+9+10”

数组索引 ＝ 分割文本 (集合文本, “+”, )

.计次循环首 (取数组成员数 (数组索引), 计次)
总和 ＝ 总和 ＋ 到整数 (数组索引 [计次])
调试输出 (总和)

.计次循环尾 ()
标签1.标题 ＝ “总和” ＋ 到文本 (总和)

追问

谢了.但不是我需要的结果..

1+2=?
1+3=?
1+4=?
1+2+3=?
1+3+4=?
1+4+5=?
1+2+3+4=?
1+2+3+4+5?
整个数组里面的数全部都加一次 几个数相加不限制