看你们比较闲蛋疼，给你们布置一个作业....

gzbid

题目：文本数组 按长度排序 ，长的排前面，短的在后面，也可以给参数切换
比如：
人物 = {“张三叔叔”,“大叔叔”,“李网吧阿斯顿”}

排序后：
{“李网吧阿斯顿”,“张三叔叔”,“大叔叔”}

同学麻烦让让

第一次见把提问说的这么清新脱俗的

1051130978

快速回复

gzbid

精易模块缺这个功能，可以考虑收录

灰太狼爱兔子

这用的人也不多,而且实现起来不是有手就行吗

gzbid

我想到一个笨办法：就是循环取他们的长度，把长度数字加在文本前面，然后通过模块功能排序，排完后再删除前面的文字，还有没有能打的

gzbid

灰太狼爱兔子 发表于 2023-7-15 16:39
这用的人也不多,而且实现起来不是有手就行吗

我有手，但是不会。。貌似要套好几个循环

冬夏

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

变量名	类 型	静态	数组	备 注
人物	文本型		3

人物 ＝ { “张三叔叔”, “大叔叔”, “小叔叔”, “李网吧阿斯顿” }
数组_长度排序 (人物)
调试输出 (人物)
输出调试文本（“只要思想不滑坡，办法总比困难多”）
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
数组_长度排序
参数名	类 型	参考	可空	数组	备 注
欲排序的数组	文本型

变量名	类 型	静态	数组	备 注
局部数组	双精度小数型		0
i	整数型
局部结果	文本型		0
局部索引	整数型
局部文本	文本型

计次循环首 (取数组成员数 (欲排序的数组), i)
加入成员 (局部数组, 取文本长度 (欲排序的数组 [i]) ＋ 到数值 (“0.” ＋ 到文本 (i)))
计次循环尾 ()
数组排序 (局部数组, 假)
计次循环首 (取数组成员数 (局部数组), i)
局部文本 ＝ 到文本 (局部数组 [i])
局部索引 ＝ 到整数 (取文本右边 (局部文本, 取文本长度 (局部文本) － 寻找文本 (局部文本, “.”, , 假)))
加入成员 (局部结果, 欲排序的数组 [局部索引])
计次循环尾 ()
复制数组 (欲排序的数组, 局部结果)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 人物, 文本型, , "3"<br /> <br /> 人物 ＝ { “张三叔叔”, “大叔叔”, “小叔叔”, “李网吧阿斯顿” }<br /> 数组_长度排序 (人物)<br /> 调试输出 (人物)<br /> 输出调试文本（“只要思想不滑坡，办法总比困难多”）<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 数组_长度排序, , 公开<br /> .参数 欲排序的数组, 文本型, 数组<br /> .局部变量 局部数组, 双精度小数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 局部结果, 文本型, , "0"<br /> .局部变量 局部索引, 整数型<br /> .局部变量 局部文本, 文本型<br /> <br /> .计次循环首 (取数组成员数 (欲排序的数组), i)<br />     加入成员 (局部数组, 取文本长度 (欲排序的数组 <i>) ＋ 到数值 (“0.” ＋ 到文本 (i)))<br /> .计次循环尾 ()<br /> 数组排序 (局部数组, 假)<br /> .计次循环首 (取数组成员数 (局部数组), i)<br />     局部文本 ＝ 到文本 (局部数组 <i>)<br />     局部索引 ＝ 到整数 (取文本右边 (局部文本, 取文本长度 (局部文本) － 寻找文本 (局部文本, “.”, , 假)))<br />     加入成员 (局部结果, 欲排序的数组 [局部索引])<br /> .计次循环尾 ()<br /> 复制数组 (欲排序的数组, 局部结果)

花开ヽ若相依

  

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

变量名	类 型	静态	数组	备 注
人物	文本型
人物数组	文本型		0
阈值	整数型
i	整数型
Temp	文本型
排序后数组	文本型		0
长度	整数型

人物 ＝ “张三叔叔,大叔叔,李网吧阿斯顿”
人物数组 ＝ 分割文本 (人物, “,”, )
阈值 ＝ 0
重定义数组 (排序后数组, 假, 0)
Temp ＝ “”
计次循环首 (取数组成员数 (人物数组), i)
长度 ＝ 取文本长度 (人物数组 [i])
如果真 (长度 ＞ 阈值)
阈值 ＝ 长度
如果真 (Temp ＝ “”)
Temp ＝ 人物数组 [i]
到循环尾 ()

Temp ＝ 人物数组 [i] ＋ “,” ＋ Temp
到循环尾 ()

Temp ＝ Temp ＋ “,” ＋ 人物数组 [i]
计次循环尾 ()
排序后数组 ＝ 分割文本 (Temp, “,”, )
调试输出 (排序后数组)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 人物, 文本型<br /> .局部变量 人物数组, 文本型, , "0"<br /> .局部变量 阈值, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 Temp, 文本型<br /> .局部变量 排序后数组, 文本型, , "0"<br /> .局部变量 长度, 整数型<br /> <br /> 人物 ＝ “张三叔叔,大叔叔,李网吧阿斯顿”<br /> <br /> 人物数组 ＝ 分割文本 (人物, “,”, )<br /> <br /> 阈值 ＝ 0<br /> <br /> 重定义数组 (排序后数组, 假, 0)<br /> <br /> Temp ＝ “”<br /> <br /> .计次循环首 (取数组成员数 (人物数组), i)<br /> <br />     长度 ＝ 取文本长度 (人物数组 <i>)<br /> <br />     .如果真 (长度 ＞ 阈值)<br /> <br />         阈值 ＝ 长度<br /> <br />         .如果真 (Temp ＝ “”)<br /> <br />             Temp ＝ 人物数组 <i><br /> <br />             到循环尾 ()<br /> <br />         .如果真结束<br /> <br />         Temp ＝ 人物数组 <i> ＋ “,” ＋ Temp<br /> <br />         到循环尾 ()<br /> <br />     .如果真结束<br /> <br />     Temp ＝ Temp ＋ “,” ＋ 人物数组 <i><br /> <br /> .计次循环尾 ()<br /> <br /> 排序后数组 ＝ 分割文本 (Temp, “,”, )<br /> <br /> 调试输出 (排序后数组)

简单粗暴  分隔符建议换一下 不然字符串带有分隔符的话就出bug了

FanLi

两个循环就搞定了