求0至9这十个数字组成的所有三位数的组合,用VB6.0
百位可以是0,如012
求的是组合,不是排列.如012 021 120 102 201 210 这6个数只需输出012就可以了,要像输写012一样```最小的数字在前面,最大的数字在最后
总供的数据个数是120个吧(应当是的),输出到text1
随便用什么方法求,越特别越好,
一楼的我看过了,是可以用,虽说他可能用的是VBnet,但是我想要其它不一样的方法,(特别的方法),呵呵,再等下,没人答就给一楼你分了,
人气:218 ℃ 时间:2019-12-18 19:37:27
解答
是120 个.大体上这样就行:
for a = 0 to 7
for b = a+1 to 8
for c = b+1 to 9
text1.value = text1.value & a & b & c & vbCrlf
next
next
next
其他的什么窗体、按钮、触发什么的自己随便搞下吧.
推荐
- 从0-9十个数字里面任选6个组成不同的六位数,请问有多少种组合
- 由 1 - 9 组成一个 3 位数, 3 位数肯定有数字重复的组合有多少种?
- 用0123456789十个数字组成两个五位数,怎么组合乘积最大?
- 0-9这十个数能组成多少个八位数的组合,其中0-9这十个数可以随意重复.能不能列举一下.
- 由1-9组成一个三位数,3位数肯定有重复数字的组合有多少种?答案是225,
- 表示有丝分裂中各个时期和染色体或DNA数关系的折线图中,那些2C 4C 2N 4N 究竟代表什么?
- 定义在R上的函数f(x)满足f(x+2)=f(x),且f(-x)=-f(x).当x属于(0,1)时,f(x)=2^x/(4^x+1),问,当x取何值时,方程f(x)=γ在[-1,1]上有解.
- Her name is (Lisa).(对括号部分提问)
猜你喜欢