统计结果

大众puls

文本：第一<br>数量：1
第一<br>数量：2
第一<br>数量：3
第二<br>数量：4
第二<br>数量：5
第二<br>数量：6
第三<br>数量：4
第三<br>数量：5
第三<br>数量：6

第四<br>数量：7


求统计该文本内，第一到第四他们每个的数量各是多少

这样的统计在E如果写，求例子谢谢

走一回

这个一定行

  

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

变量名	类 型	静态	数组	备 注
节点_	节点
temp	文本型
数组	文本型		0
i	整数型
数组2	文本型		0	全部属性名数组
num	整数型

temp ＝ 子文本替换 ( #常量1, #换行符, “：”, , , 真)
数组 ＝ 分割文本 (temp, “：”, )
重定义数组 (数组, 真, 取数组成员数 (数组) ÷ 2, 2)
计次循环首 (取数组下标 (数组, ), i)
节点_.加入属性 (数组 [i] [1], 0)
计次循环尾 ()
节点_.取全部属性名 (数组2)
计次循环首 (取数组下标 (数组, ), i)
节点_.取数值 (数组 [i] [1], num)
num ＝ 到整数 (数组 [i] [2]) ＋ num
节点_.修改属性 (数组 [i] [1], num)
计次循环尾 ()
计次循环首 (取数组成员数 (数组2), i)
节点_.取数值 (数组2 [i], num)
调试输出 (num)
计次循环尾 ()

i支持库列表	支持库注释
EDataStructure	数据结构支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 EDataStructure<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 节点_, 节点<br /> .局部变量 temp, 文本型<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 数组2, 文本型, , "0", 全部属性名数组<br /> .局部变量 num, 整数型<br /> <br /> temp ＝ 子文本替换 (#常量1, #换行符, “：”, , , 真)<br /> 数组 ＝ 分割文本 (temp, “：”, )<br /> 重定义数组 (数组, 真, 取数组成员数 (数组) ÷ 2, 2)<br /> .计次循环首 (取数组下标 (数组, ), i)<br />     节点_.加入属性 (数组 <i> [1], 0)<br /> .计次循环尾 ()<br /> 节点_.取全部属性名 (数组2)<br /> .计次循环首 (取数组下标 (数组, ), i)<br />     节点_.取数值 (数组 <i> [1], num)<br />     num ＝ 到整数 (数组 <i> [2]) ＋ num<br />     节点_.修改属性 (数组 <i> [1], num)<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (数组2), i)<br />     节点_.取数值 (数组2 <i>, num)<br />     调试输出 (num)<br /> .计次循环尾 ()

* 6
* 15
* 15
* 7
被调试易程序运行完毕

lmx

你这个看不懂，统计结果是什么？
第一:6
第二:15
第三:15
第四:7
???

大众puls

lmx 发表于 2019-9-30 13:53
你这个看不懂，统计结果是什么？
第一:6
第二:15

是的 就是要这样的结果，

atglkm123

.版本 2
.支持库 spec

.子程序 __启动窗口_创建完毕
.局部变量 分割后文本, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 第一, 整数型
.局部变量 第二, 整数型
.局部变量 第三, 整数型
.局部变量 第四, 整数型

分割后文本 ＝ 分割文本 (#常量1, #换行符, )
.计次循环首 (取数组成员数 (分割后文本), i)
    .如果真 (取文本左边 (分割后文本 [i], 4) ＝ “第一”)
        第一 ＝ 第一 ＋ 到整数 (取文本右边 (分割后文本 [i], 1))
    .如果真结束
    .如果真 (取文本左边 (分割后文本 [i], 4) ＝ “第二”)
        第二 ＝ 第二 ＋ 到整数 (取文本右边 (分割后文本 [i], 1))
    .如果真结束
    .如果真 (取文本左边 (分割后文本 [i], 4) ＝ “第三”)
        第三 ＝ 第三 ＋ 到整数 (取文本右边 (分割后文本 [i], 1))
    .如果真结束
    .如果真 (取文本左边 (分割后文本 [i], 4) ＝ “第四”)
        第四 ＝ 第四 ＋ 到整数 (取文本右边 (分割后文本 [i], 1))
    .如果真结束

.计次循环尾 ()
调试输出 (第一, 第二, 第三, 第四)

列明

走一回 发表于 2019-9-30 16:15
这个一定行
[e=0].版本 2
.支持库 EDataStructure

我就知道有人要用節點！所有關於重複項的所有（求和、清空、排序等）操作，都可以優先試一試節點類！