易语言怎么把3个数分成不同的三位数

比如123 就分成123 132 213 231 312 313

.版本 2


.程序集 窗口程序集1


.子程序 __启动窗口_创建完毕


编辑框1.最大允许长度 = 3

编辑框1.输入方式 = 3

编辑框2.是否允许多行 = 真


.子程序 _按钮1_被单击

.局部变量 次数, 整数型

.局部变量 数组, 文本型, , "3"

.局部变量 计次, 整数型

.局部变量 计数, 整数型


编辑框2.内容 = “”

.如果真 (取文本长度 (编辑框1.内容) ≠ 3)

    信息框 (“原数不足3位”, 0, )

    返回 ()

.如果真结束

.计次循环首 (3, 次数)

    数组 [次数] = 取文本中间 (编辑框1.内容, 次数, 1)

.计次循环尾 ()

.计次循环首 (3, 计次)

    .计次循环首 (3, 计数)

        .如果真 (数组 [计数] = 数组 [计次])

            到循环尾 ()

        .如果真结束

        .计次循环首 (3, 次数)

            .如果真 (数组 [次数] = 数组 [计次] 或 数组 [次数] = 数组 [计数])

                到循环尾 ()

            .如果真结束

            编辑框2.加入文本 (数组 [计次], 数组 [计数], 数组 [次数], “ ”)

        .计次循环尾 ()

    .计次循环尾 ()

.计次循环尾 ()

温馨提示:答案为网友推荐,仅供参考
第1个回答  2016-03-04
比如123 就分成123 132 213 231 312 313

硪们帅的被人砍?2015-7-5

..........局部变量 b., 3.., 1)
b = 取文本中间 (d...., 文本型

d = “123”
a = 取文本中间 (d.....版本 2
..局部变量 d...................
正在预处理现行程序
正在进行名称连接, 1)
c = 取文本中间 (d.......
正在统计需要编译的子程序
正在编译.........支持库 spec

....局部变量 c, 文本型
...., 1................, 文本型
, 1)

调试输出 (a + b + c)
调试输出 (a + c + b)
调试输出 (b + a + c)
调试输出 (b + c + a)
调试输出 (c + a + b)
调试输出 (c + b + a)

.....
正在编译现行程序
正在检查重复名称................局部变量 a., 2., 文本型
............

输入方式 = 3
编辑框2
次数)
数组 [次数] = 取文本中间 (编辑框1.是否允许多行 = 真

.内容) ≠ 3)
信息框 (“原数不足3位”.如果真结束
编辑框2.如果真结束
.如果真 (数组 [次数] = 数组 [计次] 或 数组 [次数] = 数组 [计数])
到循环尾 ()

“ ”)
.子程序 _按钮1_被单击

整数型
.内容.内容 = “”
.计次循环首 (3.加入文本 (数组 [计次]
次数
整数型
.如果真 (取文本长度 (编辑框1
次数)
;

计数)

1)

数组 [次数].计次循环首 (3
0.最大允许长度 = 3
编辑框1
数组 [计数]
"
文本型.计次循环尾 ()
.局部变量 计次
计次)

.计次循环首 (3
整数型

编辑框2.如果真 (数组 [计数] = 数组 [计次])
到循环尾 ()
.程序集 窗口程序集1

.计次循环首 (3.局部变量 计数.如果真结束
第2个回答  2015-07-05
你可以把三个数分别存入三个变量,通过计次循环首根据变化确定位置。
第3个回答  推荐于2016-12-02
.版本 2
.支持库 spec

.局部变量 a, 文本型
.局部变量 b, 文本型
.局部变量 c, 文本型
.局部变量 d, 文本型

d = “123”
a = 取文本中间 (d, 1, 1)
b = 取文本中间 (d, 2, 1)
c = 取文本中间 (d, 3, 1)

调试输出 (a + b + c)
调试输出 (a + c + b)
调试输出 (b + a + c)
调试输出 (b + c + a)
调试输出 (c + a + b)
调试输出 (c + b + a)

.........................................................................................................
正在编译现行程序
正在检查重复名称...
正在预处理现行程序
正在进行名称连接...
正在统计需要编译的子程序
正在编译...
正在生成主程序入口代码
程序代码编译成功
正在封装易格式目的代码
开始运行被调试程序
* “123”
* “132”
* “213”
* “231”
* “312”
* “321”
被调试易程序运行完毕本回答被提问者和网友采纳