数据递增排序如何写

啊基德

有四组数据
1,2,3,4,5       11,12,13,14,15   22,23,24,25    33,34,35,36,37

从每组数中取出一个数,后一个数比前一个数大
1,11,22,33
1,11,22,34
1,11,22,35
1,11,22,37
1,11,23,33
1.11.23.34
1,11,23,35
1,11,23,36
1,11,23,37
1,11,24,33
1,11,24,34
1,11,24,35
排列成这样的一条数据，每组数里数量不同

StarAdmire

demo.e (3.02 KB, 下载次数: 13)

2023-7-3 16:31 上传

点击文件名下载附件

小小小小鸟89

简单写了一个，在数据量不是很大的情况下可以使用，如果数据量很大，就需要考虑优化问题。

  

窗口程序集名	保 留	保 留	备 注
程序集1

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

变量名	类 型	静态	数组	备 注
t1	文本型		0
t2	文本型		0
t3	文本型		0
t4	文本型		0
ret	文本型		0
temp	文本型		0

t1 ＝ { “1”, “2”, “3”, “4”, “5” }
t2 ＝ { “11”, “12”, “1”, “14”, “15” }
t3 ＝ { “22”, “23”, “24”, “25” }
t4 ＝ { “33”, “34”, “35”, “36”, “37” }
抽取合并 (t1, t2, ret)
复制数组 (temp, ret)
抽取合并 (temp, t3, ret)
复制数组 (temp, ret)
抽取合并 (temp, t4, ret)
调试输出 (取数组成员数 (ret), ret)
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
抽取合并
参数名	类 型	参考	可空	数组	备 注
数组1	文本型
数组2	文本型
返回数组	文本型

变量名	类 型	静态	数组	备 注
i	整数型
j	整数型
n	整数型

重定义数组 (返回数组, 假, 取数组成员数 (数组1) × 取数组成员数 (数组2))
n ＝ 1
计次循环首 (取数组成员数 (数组1), i)
计次循环首 (取数组成员数 (数组2), j)
返回数组 [n] ＝ 数组1 [i] ＋ “,” ＋ 数组2 [j]
n ＝ n ＋ 1
计次循环尾 ()
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 程序集1<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> .局部变量 t1, 文本型, , "0"<br /> .局部变量 t2, 文本型, , "0"<br /> .局部变量 t3, 文本型, , "0"<br /> .局部变量 t4, 文本型, , "0"<br /> .局部变量 ret, 文本型, , "0"<br /> .局部变量 temp, 文本型, , "0"<br /> <br /> t1 ＝ { “1”, “2”, “3”, “4”, “5” }<br /> t2 ＝ { “11”, “12”, “1”, “14”, “15” }<br /> t3 ＝ { “22”, “23”, “24”, “25” }<br /> t4 ＝ { “33”, “34”, “35”, “36”, “37” }<br /> 抽取合并 (t1, t2, ret)<br /> 复制数组 (temp, ret)<br /> 抽取合并 (temp, t3, ret)<br /> 复制数组 (temp, ret)<br /> 抽取合并 (temp, t4, ret)<br /> 调试输出 (取数组成员数 (ret), ret)<br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> .子程序 抽取合并<br /> .参数 数组1, 文本型, 数组<br /> .参数 数组2, 文本型, 数组<br /> .参数 返回数组, 文本型, 数组<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 n, 整数型<br /> <br /> 重定义数组 (返回数组, 假, 取数组成员数 (数组1) × 取数组成员数 (数组2))<br /> n ＝ 1<br /> .计次循环首 (取数组成员数 (数组1), i)<br />     .计次循环首 (取数组成员数 (数组2), j)<br />         返回数组 [n] ＝ 数组1 <i> ＋ “,” ＋ 数组2 [j]<br />         n ＝ n ＋ 1<br />     .计次循环尾 ()<br /> .计次循环尾 ()

StarAdmire

demo.e (4.08 KB, 下载次数: 3)

2023-7-3 17:27 上传

点击文件名下载附件
这样？

小小小小鸟89

你把完整数据发出来，然后把  输入数据的格式，输出数据的格式描述清楚，这样才利于编写合适的代码

小小小小鸟89

一共多少组数据？组数是固定的还是不固定的？

b0y

按你的条件 后面的必须比前面的大  那你给的那10组数据根本就不符合条件 无法组合出来

笨来无一悟

文本和整数的处理过程是一样的啊


补充内容 (2023-7-4 10:03):
.版本 2
.支持库 commobj

                .如果真 (文本转整 (一 [A]) ＜ 文本转整 (二 [B]) 且 文本转整 (二 [B]) ＜ 文本转整 (三 [C]) 且 文本转整 (三 [C]) ＜ 文本转整 (四 [D]))
                    文本.添加 (一 [A], “,”, 二 [B], “,”, 三 [C], “,”, 四 [D], #换行符)

笨来无一悟

笨来无一悟 发表于 2023-7-4 03:29
文本和整数的处理过程是一样的啊

加个到整数就可以了

笨来无一悟

转整数就可以了


补充内容 (2023-7-4 10:02):
如果处理的数据比较大 可以先把文本数组转换成整数数组 再组合 速度会快很多