删除数组成员 速度更快的新写法

renjianhong48we

感谢分享

396384183

感谢发布原创作品，精易因你更精彩

396384183

感谢发布原创作品，精易因你更精彩

z899505cqz

  

子程序名	返回值类型	公开	备 注
剔除数组中比某值大的成员_汇编	整数型		稳定,返回剔除后的数组成员数
参数名	类 型	参考	可空	数组	备 注
数组	整数型
某值	整数型

置入代码 ({ 139, 69, 8, 139, 0, 141, 120, 8, 139, 247, 139, 72, 4, 141, 20, 136, 141, 82, 4, 139, 93, 12, 57, 214, 127, 16, 139, 14, 57, 217, 127, 5, 137, 15, 141, 127, 4, 141, 118, 4, 235, 236, 41, 199, 131, 239, 8, 193, 239, 2, 199, 0, 1, 0, 0, 0, 137, 120, 4, 139, 199, 139, 229, 93, 194, 8, 0 })
返回 (1)

.版本 2<br /> <br /> .子程序 剔除数组中比某值大的成员_汇编, 整数型, , 稳定,返回剔除后的数组成员数<br /> .参数 数组, 整数型, 数组<br /> .参数 某值, 整数型<br /> <br /> 置入代码 ({ 139, 69, 8, 139, 0, 141, 120, 8, 139, 247, 139, 72, 4, 141, 20, 136, 141, 82, 4, 139, 93, 12, 57, 214, 127, 16, 139, 14, 57, 217, 127, 5, 137, 15, 141, 127, 4, 141, 118, 4, 235, 236, 41, 199, 131, 239, 8, 193, 239, 2, 199, 0, 1, 0, 0, 0, 137, 120, 4, 139, 199, 139, 229, 93, 194, 8, 0 })<br /> 返回 (1)

赢麻了，不信试试看
快10倍还是有的
你把你测试的代码发上来看看，肯定有问题的

深圳梦

支持开源~！感谢分享

z899505cqz

我有个办法不会打乱原本顺序，且速度比优化版的快40倍，比倒序版的快300倍

君九

下来看看

风清云游

笨来无一悟 发表于 2023-8-1 11:09
不能打乱顺序这一点没有解决 路过的爷爷奶奶叔叔阿姨哥哥姐姐 看看有没有什么好办法恢复现场
[e=4 ...

你需要理解 内存 没有删除 这个概念

笨来无一悟

不能打乱顺序这一点没有解决 路过的爷爷奶奶叔叔阿姨哥哥姐姐 看看有没有什么好办法恢复现场

  

子程序名	返回值类型	公开	备 注
删除成员_正序优化

变量名	类 型	静态	数组	备 注
数组	整数型		0
起点	整数型
终点	整数型
已删	整数型

数组 ＝ { 1, 2, 3, 4, 5, 6, 7, 8, 9, 8, 7, 6, 5, 4, 3, 2, 1, 7, 0, 3, 78, 2, 0, 45, 13, 2, 8, 1, 4 }
终点 ＝ 取数组成员数 (数组)
判断循环首 (起点 ＜ 终点)
起点 ＝ 起点 ＋ 1
如果真 (数组 [起点] ＞ 5)
' 引用数组成员代码
交换变量 (数组 [起点], 数组 [已删 ＋ 1])
已删 ＝ 已删 ＋ 1  ' 用完假装删除了 挪动到最前面 循环之内都不会再用到
' 必须从前往后√ 必须速度更快√ 不能另外用多余的数组√ 最关键【不打乱原本的顺序】...×
判断循环尾 ()
删除成员 (数组, 1, 已删)

.版本 2<br /> <br /> .子程序 删除成员_正序优化<br /> .局部变量 数组, 整数型, , "0"<br /> .局部变量 起点, 整数型<br /> .局部变量 终点, 整数型<br /> .局部变量 已删, 整数型<br /> <br /> 数组 ＝ { 1, 2, 3, 4, 5, 6, 7, 8, 9, 8, 7, 6, 5, 4, 3, 2, 1, 7, 0, 3, 78, 2, 0, 45, 13, 2, 8, 1, 4 }<br /> 终点 ＝ 取数组成员数 (数组)<br /> .判断循环首 (起点 ＜ 终点)<br />     起点 ＝ 起点 ＋ 1<br />     .如果真 (数组 [起点] ＞ 5)<br />         ' 引用数组成员代码<br />         交换变量 (数组 [起点], 数组 [已删 ＋ 1])<br />         已删 ＝ 已删 ＋ 1  ' 用完假装删除了 挪动到最前面 循环之内都不会再用到<br />     .如果真结束<br />     ' 必须从前往后√ 必须速度更快√ 不能另外用多余的数组√ 最关键【不打乱原本的顺序】...×<br /> .判断循环尾 ()<br /> 删除成员 (数组, 1, 已删)

风清云游

Suky 发表于 2023-8-1 10:08

  

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

[/quote][e=4].版本 2

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
数组			0
数组2			0
n
记录下标
记录数量

置随机数种子 ()
计次循环首 (20, )
加入成员 (数组, 取随机数 (1, 20))
计次循环尾 ()
数组2 ＝ 数组
调试输出 (数组)
计次循环首 (取数组成员数 (数组), )
n ＝ n ＋ 1
如果真 (数组 [n] ≥ 10)  ' 数组元素符合条件  引用
' 引用数组成员代码
删除成员 (数组, n, 1)  ' 用完删除
n ＝ n － 1

计次循环尾 ()
调试输出 (数组)
计次循环首 (取数组成员数 (数组2), n)
如果真 (数组2 [n] ＜ 10)
记录下标 ＝ 记录下标 ＋ 1
记录数量 ＝ 记录数量 ＋ 1
数组2 [记录下标] ＝ 数组2 [n]

计次循环尾 ()
重定义数组 (数组2, 真, 记录数量)
调试输出 (数组2)

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

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口</blockquote></div>[e=4].版本 2<br /> .支持库 spec<br /> <br /> .子程序 子程序1<br /> .局部变量 数组, , , "0"<br /> .局部变量 数组2, , , "0"<br /> .局部变量 n<br /> .局部变量 记录下标<br /> .局部变量 记录数量<br /> <br /> 置随机数种子 ()<br /> .计次循环首 (20, )<br />     加入成员 (数组, 取随机数 (1, 20))<br /> .计次循环尾 ()<br /> 数组2 ＝ 数组<br /> 调试输出 (数组)<br /> <br /> .计次循环首 (取数组成员数 (数组), )<br />     n ＝ n ＋ 1<br />     .如果真 (数组 [n] ≥ 10)  ' 数组元素符合条件  引用<br />         ' 引用数组成员代码<br />         删除成员 (数组, n, 1)  ' 用完删除<br />         n ＝ n － 1<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (数组)<br /> <br /> <br /> .计次循环首 (取数组成员数 (数组2), n)<br />     .如果真 (数组2 [n] ＜ 10)<br />         记录下标 ＝ 记录下标 ＋ 1<br />         记录数量 ＝ 记录数量 ＋ 1<br />         数组2 [记录下标] ＝ 数组2 [n]<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 重定义数组 (数组2, 真, 记录数量)<br /> 调试输出 (数组2)