子集生成算法

.子程序 子集生成
.参数 arr, 整数型, 数组, 限制最大长度31
.局部变量 len, 整数型
.局部变量 i, 整数型
.局部变量 n, 整数型
.局部变量 结果, 整数型, , "0"
.局部变量 j, 整数型

len ＝ 取数组成员数 (arr)
.计次循环首 (len, i)
n ＝ 位或 (n, 左移 (1, i － 1))
.计次循环尾 ()
.变量循环首 (0, n, 1, i) ' 需要空集填0，不要空集填1
清除数组 (结果)
.计次循环首 (len, j)
.如果真 (位与 (i, 左移 (1, j － 1)) ≠ 0)
加入成员 (结果, arr [j])
.如果真结束

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