分组相加的问题

林立翔

假如我有一个数组a={1，2，3，4，5，6，7，8，9，10}，我在编辑框里输入2的话。
我会把a数组每2个值相加。就可以分成5组来相加。

小爬虫

分组加.rar (1.17 KB, 下载次数: 4)

2013-12-23 20:13 上传

点击文件名下载附件

完全满足楼主要求

有一个要求,就是如果10个数组,分成3组,那么第10个值将不相加了




补充内容 (2013-12-23 20:15):
当然了,如果你数值取超过整个成员数的一半,就没办法了,我没有加判断,楼主可自行增加判断

无言士

.局部变量 a, 整数型, , "0"
.局部变量 合, 整数型
.局部变量 循环数, 整数型

a ＝ { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 }
.计次循环首 (取数组成员数 (a) ÷ 到整数 (编辑框1.内容), )
    合 ＝ 0
    .计次循环首 (到整数 (编辑框1.内容), 循环数)
        合 ＝ 合 ＋ a [循环数]
    .计次循环尾 ()
    输出(合)
.计次循环尾 ()

983847264

[e]
.版本 2

.局部变量 数组, 整数型, , "0"
.局部变量 局_计数, 整数型
.局部变量 成员数目, 整数型
.局部变量 n, 整数型
.局部变量 i, 整数型

数组 ＝ { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 }
.如果真 (取数组成员数 (数组) ＜ 到数值 (编辑框1.内容))
    信息框 (“错误！”, 16, )
    返回 ()
.如果真结束
成员数目 ＝ 取数组成员数 (数组) ÷ 到数值 (编辑框1.内容)
.计次循环首 (成员数目, n)
    .计次循环首 (到数值 (编辑框1.内容), i)
        局_计数 ＝ 局_计数 ＋ 数组 [n ＋ i]

    .计次循环尾 ()
.计次循环尾 ()
编辑框2.内容 ＝ 到文本 (局_计数)
[/e]

林立翔

无言士 发表于 2013-12-23 18:03
.局部变量 a, 整数型, , "0"
.局部变量 合, 整数型
.局部变量 循环数, 整数型

值输出不对。如果是输入2的话是1+2输出3，3+4输出7，5+6输出11，7+8输出15，9+10输出19，才对吧。

983847264

林立翔 发表于 2013-12-23 18:27
值输出不对。如果是输入2的话是1+2输出3，3+4输出7，5+6输出11，7+8输出15，9+10输出19，才对吧。

最终结果不是45吗？

林立翔

983847264 发表于 2013-12-23 18:25
[e]
.版本 2

计次循环首 (到数值 (编辑框1.内容), i)
不应该是编辑框1.内容吧。如果是这样的话，那不是一直加前面的？

蕃茄炒饭

.版本 2
.支持库 spec

.子程序 _按钮1_被单击
.局部变量 a, 整数型, , "0"
.局部变量 i, 整数型

a ＝ { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10 }
.计次循环首 (取数组成员数 (a), i)
    调试输出 (a [i] ＋ 到整数 (编辑框1.内容))
.计次循环尾 ()

蕃茄炒饭

3
* 4
* 5
* 6
* 7
* 8
* 9
* 10
* 11
* 12
结果

林立翔

983847264 发表于 2013-12-23 18:30
最终结果不是45吗？

我不需要总合。我弄了一天了。就是不对。前面用过的就不能再加了。例如我输入3的话，那就是3个数想加，1+2+3=6，再次循环就不能再把前面的6再加4+5+6了。