|
发表于 2015-3-17 18:00:38
|
显示全部楼层
重庆市重庆市
.版本 2
.支持库 spec
.子程序 ok
.局部变量 数组, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 k, 整数型
.局部变量 flag, 逻辑型, , , 标记数组中的元素是否有重复
.局部变量 次数, 整数型
数组 = { “to”, “ts”, “bs”, “tl”, “bl”, “ts”, “bs”, “tl”, “bl”, “bl”, “tl”, “ts”, “bs” }
次数 = 取数组成员数 (数组)
.计次循环首 (次数, i)
k = 2 ' 每次都要初始化一下3个变量
j = i + 1
flag = 假 ' 标记数组中的元素是否有重复
.计次循环首 (次数 - i, )
.如果 (数组 = 数组 [j])
数组 [j] = 到文本 (k) + 数组 [j]
k = k + 1
flag = 真
.否则
.如果结束
j = j + 1
.计次循环尾 ()
.如果 (flag)
数组 = “1” + 数组
.否则
.如果结束
.计次循环尾 ()
调试输出 (数组)
变量名 | 类 型 | 静态 | 数组 | 备 注 | 数组 | 文本型 | | 0 | i | 整数型 | | | j | 整数型 | | | k | 整数型 | | | flag | 逻辑型 | | | 次数 | 整数型 | | |
数组 = { “to”, “ts”, “bs”, “tl”, “bl”, “ts”, “bs”, “tl”, “bl”, “bl”, “tl”, “ts”, “bs” }次数 = 取数组成员数 (数组 )计次循环首 (次数, i )k = 2 j = i + 1 flag = 假 计次循环首 (次数 - i, )如果 (数组 [i ] = 数组 [j ])数组 [j ] = 到文本 (k ) + 数组 [j ]k = k + 1 flag = 真 j = j + 1计次循环尾 ()如果 (flag )数组 [i ] = “1” + 数组 [i ]计次循环尾 ()调试输出 (数组 )
补充内容 (2015-3-17 18:01):
看错了,不好意思啊,别人的写到你这里来了 |
|