数字排列高手指点下

qq5111059

想写个排列数字的比如只用1和2排列 8位。11111112  11111121 22222221 22222212
意思也就是8个1  8个2
排列成个8位的数字不重复


谁有思路的话提示下。能写下源码最好了。太感谢了

JSDYWZ

1. 空间 排列组合
   
2. //默认空间
   
3. 
   
4. //开始按钮_点击操作
   
5. 功能 开始_点击()
   
6.     变量 组合,位数,全部组合=""
   
7.     组合=数组[256]
   
8.     全部组合="11111111"
   
9.     遍历(i=1;i<256;i++)
   
10.         组合[i]=排列组合.十进制转二进制(i)
    
11.         位数=字符串.长度(组合[i])
    
12.         选择(位数)
    
13.             条件 1:
    
14.             组合[i]="0000000"&组合[i]
    
15.             条件 2:
    
16.             组合[i]="000000"&组合[i]
    
17.             条件 3:
    
18.             组合[i]="00000"&组合[i]
    
19.             条件 4:
    
20.             组合[i]="0000"&组合[i]
    
21.             条件 5:
    
22.             组合[i]="000"&组合[i]
    
23.             条件 6:
    
24.             组合[i]="00"&组合[i]      
    
25.             条件 7:
    
26.             组合[i]="0"&组合[i]      
    
27.             条件 8:
    
28.         选择结束
    
29.         组合[i]= 字符串.替换(组合[i],"1","2")
    
30.         组合[i]=字符串.替换(组合[i],"0","1")
    
31.         全部组合=全部组合&"\r\n"&组合[i]
    
32.     遍历结束
    
33.     编辑框.设置文本("编辑框0",全部组合)
    
34.     调试输出(全部组合)
    
35. 功能结束
    
36. 
    
37. 
    
38. 功能 十进制转二进制(十进制数值)
    
39.     变量 字符串累加值=""
    
40.     循环(十进制数值!=1)
    
41.         如果((十进制数值 % 2)==0)
    
42.             十进制数值=类型.取整((十进制数值/2))
    
43.             字符串累加值="0"&字符串累加值
    
44.         否则
    
45.             十进制数值 = 类型.取整(((十进制数值-1)/2))
    
46.             字符串累加值 = "1" & 字符串累加值
    
47.         如果结束
    
48.     循环结束
    
49.     如果(十进制数值!=0)
    
50.         字符串累加值="1"&字符串累加值
    
51.     如果结束
    
52.     返回 字符串累加值
    
53. 功能结束
    
54. 
    
55. 
    
56. 功能 退出_点击()
    
57.    
    
58.     辅助.退出()
    
59. 功能结束
    
60. 
    
61. 空间结束
    
62. //空间结束语句

复制代码

qq5111059

自己顶个

qq5111059

采纳会员2个月

qq5111059

JSDYWZ 发表于 2014-4-27 23:35
按什么排列   排列大小？

8位不重复排列

a5602395

表示看不明白

qq5111059

a5602395 发表于 2014-4-27 23:42
表示看不明白

意思也就是8个1  8个2
排列成个8位的数字不重复

JSDYWZ

是 生成  所有的 组合吧

qq5111059

JSDYWZ 发表于 2014-4-27 23:52
是 生成  所有的 组合吧

是的

rainshine

这还不简单 随机呗