易语言 有没有数字组合 格式 求教下

若相守卟离

比如一组数 1234  用易语言拆开计算出 组合  1234----234---134--12----13--14--23-24-1-2-3-4等等

神女软件定制

  

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

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

变量名	类 型	静态	数组	备 注
str	文本型
len	整数型
i	整数型
n	整数型
j	整数型
结果	文本型

str ＝ “12345”  ' 限制最长31
len ＝ 取文本长度 (str)
计次循环首 (len, i)
n ＝ 位或 (n, 左移 (1, i － 1))
计次循环尾 ()
计次循环首 (n, i)
结果 ＝ “”
计次循环首 (len, j)
如果真 (位与 (i, 左移 (1, j － 1)) ≠ 0)
结果 ＝ 结果 ＋ 取文本中间 (str, j, 1)

计次循环尾 ()
调试输出 (结果)
计次循环尾 ()

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 str, 文本型<br /> .局部变量 len, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 n, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 结果, 文本型<br /> <br /> str ＝ “12345”  ' 限制最长31<br /> len ＝ 取文本长度 (str)<br /> .计次循环首 (len, i)<br />     n ＝ 位或 (n, 左移 (1, i － 1))<br /> .计次循环尾 ()<br /> .计次循环首 (n, i)<br />     结果 ＝ “”<br />     .计次循环首 (len, j)<br />         .如果真 (位与 (i, 左移 (1, j － 1)) ≠ 0)<br />             结果 ＝ 结果 ＋ 取文本中间 (str, j, 1)<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     调试输出 (结果)<br /> .计次循环尾 ()

zuoshoudidi

有点没看懂啥意思

Jacke

研究了一会   用逐字分割的形式写了点判断 ~

如果说数字是固定位数的情况下  还可以实现  如果不固定的话还是得好多命令

掉了好多头发

若相守卟离

zuoshoudidi 发表于 2021-12-8 21:07
有点没看懂啥意思

拆开1234组合  12 13   14  23  24   123 234 124 134 1234   1 2 3 4

目分

以前写过，先逐字分割到数组，再取数组成员数，计次循环，根据要求去组合，有些组合需要循环内再循环，代码量不会很大，主要是费思路。

神女软件定制

计次循环吗

神女软件定制

[url]https://bbs.125.la/forum.php?mod=viewthread&tid=14709737&extra=[/url]在审核