数 排名

woyao2991314

  

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

变量名	类 型	静态	数组	备 注
排名	整数型		0

' 假设内容为“310 110 410 210”
' 对内容排名如何写，不改变内容位置，内容变成排序数
' “3 1 4 2”
' 例如做成数组
排名 ＝ { 3, 1, 4, 2 }
,调试输出 (排名)

.版本 2<br /> <br /> .子程序 _例子_被单击<br /> .局部变量 排名, 整数型, , "0"<br /> <br /> <br /> ' 假设内容为“310 110 410 210”<br /> ' 对内容排名如何写，不改变内容位置，内容变成排序数<br /> ' “3 1 4 2”<br /> ' 例如做成数组<br /> 排名 ＝ { 3, 1, 4, 2 }<br /> ,调试输出 (排名)

花间一壶酒

数组_排序（）

ekO

先排名出一个数组,再匹配 位置对应的数字即可

daye11334

感谢分享，很给力！~

小情缘

试试

新建文本文档 2.txt.e (1.03 MB, 下载次数: 7)

2025-8-1 19:18 上传

点击文件名下载附件

zainex

可以这样写:

  

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

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

变量名	类 型	静态	数组	备 注
文本	文本型
正则	正则表达式
结果	文本型
数组	文本型		0
排名	整数型		0
数	整数型

文本 ＝ “310 110 410 210”
正则.创建 (“([0-9])[0-9]*”, )
结果 ＝ 正则.替换 (文本, “$1 ”, 1, , 假, 真)
调试输出 (结果)
数组 ＝ 分割文本 (结果, “ ”, )
重定义数组 (排名, 假, 取数组成员数 (数组))
计次循环首 (取数组成员数 (数组), 数)
排名 [数] ＝ 到整数 (数组 [数])
计次循环尾 ()
调试输出 (排名)

i支持库列表	支持库注释
RegEx	正则表达式支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 RegEx<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型<br /> .局部变量 正则, 正则表达式<br /> .局部变量 结果, 文本型<br /> .局部变量 数组, 文本型, , "0"<br /> .局部变量 排名, 整数型, , "0"<br /> .局部变量 数, 整数型<br /> <br /> 文本 ＝ “310 110 410 210”<br /> 正则.创建 (“([0-9])[0-9]*”, )<br /> 结果 ＝ 正则.替换 (文本, “$1 ”, 1, , 假, 真)<br /> 调试输出 (结果)<br /> 数组 ＝ 分割文本 (结果, “ ”, )<br /> 重定义数组 (排名, 假, 取数组成员数 (数组))<br /> .计次循环首 (取数组成员数 (数组), 数)<br />     排名 [数] ＝ 到整数 (数组 [数])<br /> .计次循环尾 ()<br /> 调试输出 (排名)

1173847128

数组排序（）

zhtcCC

  

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

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

变量名	类 型	静态	数组	备 注
源	整数型		0
复制	整数型		0
排名	整数型		0
i	整数型
j	整数型

源 ＝ { 310, 110, 410, 210 }
复制 ＝ { 310, 110, 410, 210 }
数组排序 (复制, )
计次循环首 (取数组成员数 (源), i)
计次循环首 (取数组成员数 (复制), j)
如果真 (源 [i] ＝ 复制 [j])
加入成员 (排名, j)

计次循环尾 ()
计次循环尾 ()
调试输出 (排名)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 源, 整数型, , "0"<br /> .局部变量 复制, 整数型, , "0"<br /> .局部变量 排名, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> <br /> 源 ＝ { 310, 110, 410, 210 }<br /> 复制 ＝ { 310, 110, 410, 210 }<br /> 数组排序 (复制, )<br /> .计次循环首 (取数组成员数 (源), i)<br /> <br />     .计次循环首 (取数组成员数 (复制), j)<br /> <br />         .如果真 (源 <i> ＝ 复制 [j])<br /> <br />             加入成员 (排名, j)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> 调试输出 (排名)

zainex

下面的代码会读取文本中的数值, 然后求得排名, 对文本格式没什么要求:

  

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

子程序名	返回值类型	公开	备 注
计算排序数_文本型	逻辑型
参数名	类 型	参考	可空	数组	备 注
文本	文本型
排序数	整数型

变量名	类 型	静态	数组	备 注
正则	正则表达式
结果	文本型
字段	文本型		0
数组	双精度小数型		0
数	整数型
下标	整数型		0
值	整数型
当前	整数型
名次	整数型
排名	整数型		0

正则.创建 (“[0-9\.]+”, )
结果 ＝ 正则.替换 (文本, “$0 ”, 1, , 假, 真)
字段 ＝ 分割文本 (结果, “ ”, )
如果真 (取数组成员数 (字段) ＜ 1)
返回 (假)
重定义数组 (排序数, 假, 取数组成员数 (字段))
重定义数组 (下标, 假, 取数组成员数 (字段))
重定义数组 (数组, 假, 取数组成员数 (字段))
计次循环首 (取数组成员数 (数组), 数)
数组 [数] ＝ 到数值 (字段 [数])
下标 [数] ＝ 数
计次循环尾 ()
计次循环首 (取数组成员数 (数组), 数)
计次循环首 (取数组成员数 (数组) － 数, 值)
如果真 (数组 [值] ＞ 数组 [值 ＋ 1])
交换变量 (数组 [值], 数组 [值 ＋ 1])
交换变量 (下标 [值], 下标 [值 ＋ 1])

计次循环尾 ()
计次循环尾 ()
当前 ＝ 数组 [1]
名次 ＝ 1
计次循环首 (取数组成员数 (数组), 数)
如果真 (数组 [数] ≠ 当前)
当前 ＝ 数组 [数]
名次 ＝ 名次 ＋ 1
排序数 [下标 [数]] ＝ 名次
计次循环尾 ()
返回 (真)

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

变量名	类 型	静态	数组	备 注
文本	文本型
排序数	整数型		0

文本 ＝ “310 110 410 210”
计算排序数_文本型 (文本, 排序数)
调试输出 (文本, 排序数)
文本 ＝ “[33][33][44][11]”
计算排序数_文本型 (文本, 排序数)
调试输出 (文本, 排序数)
文本 ＝ “33-33-33-11”
计算排序数_文本型 (文本, 排序数)
调试输出 (文本, 排序数)

i支持库列表	支持库注释
RegEx	正则表达式支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 RegEx<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 计算排序数_文本型, 逻辑型<br /> .参数 文本, 文本型<br /> .参数 排序数, 整数型, 数组<br /> .局部变量 正则, 正则表达式<br /> .局部变量 结果, 文本型<br /> .局部变量 字段, 文本型, , "0"<br /> .局部变量 数组, 双精度小数型, , "0"<br /> .局部变量 数, 整数型<br /> .局部变量 下标, 整数型, , "0"<br /> .局部变量 值, 整数型<br /> .局部变量 当前, 整数型<br /> .局部变量 名次, 整数型<br /> .局部变量 排名, 整数型, , "0"<br /> <br /> 正则.创建 (“[0-9\.]+”, )<br /> 结果 ＝ 正则.替换 (文本, “$0 ”, 1, , 假, 真)<br /> 字段 ＝ 分割文本 (结果, “ ”, )<br /> .如果真 (取数组成员数 (字段) ＜ 1)<br />     返回 (假)<br /> .如果真结束<br /> 重定义数组 (排序数, 假, 取数组成员数 (字段))<br /> 重定义数组 (下标, 假, 取数组成员数 (字段))<br /> 重定义数组 (数组, 假, 取数组成员数 (字段))<br /> .计次循环首 (取数组成员数 (数组), 数)<br />     数组 [数] ＝ 到数值 (字段 [数])<br />     下标 [数] ＝ 数<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (数组), 数)<br />     .计次循环首 (取数组成员数 (数组) － 数, 值)<br />         .如果真 (数组 [值] ＞ 数组 [值 ＋ 1])<br />             交换变量 (数组 [值], 数组 [值 ＋ 1])<br />             交换变量 (下标 [值], 下标 [值 ＋ 1])<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> 当前 ＝ 数组 [1]<br /> 名次 ＝ 1<br /> .计次循环首 (取数组成员数 (数组), 数)<br />     .如果真 (数组 [数] ≠ 当前)<br />         当前 ＝ 数组 [数]<br />         名次 ＝ 名次 ＋ 1<br />     .如果真结束<br />     排序数 [下标 [数]] ＝ 名次<br /> .计次循环尾 ()<br /> 返回 (真)<br /> <br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 文本, 文本型<br /> .局部变量 排序数, 整数型, , "0"<br /> <br /> 文本 ＝ “310 110 410 210”<br /> 计算排序数_文本型 (文本, 排序数)<br /> 调试输出 (文本, 排序数)<br /> 文本 ＝ “[33][33][44][11]”<br /> 计算排序数_文本型 (文本, 排序数)<br /> 调试输出 (文本, 排序数)<br /> 文本 ＝ “33-33-33-11”<br /> 计算排序数_文本型 (文本, 排序数)<br /> 调试输出 (文本, 排序数)

如果是以整数数组作为参数, 参考:
数据转排名_精易论坛