Question

如何实现，在1-33之间取6个数为一组，6个数从小到大排列，且不能重复，然后把所有可能列表。

如何实现，在1-33之间取6个数为一组，6个数从小到大排列，且不能重复，然后把所有可能列表。
1-33之间取6个随机数字一组，然后列出若干组
这6个数字不能重复，而且一个比一个大
把所有可能均列出来
类似
1，2，3，4，5，6
2，3，4，5，6，7
3，4，5，6，7，8

请给出代码，语言不限，最好是ASP

Answer 1

<%
Dim a,i,lp
lp = True
a = Array(1,2,3,4,5,6)
Do While lp
print a
If a(5) < 33 Then
a(5) = a(5) + 1
Else
If a(4) < 32 Then
a(4) = a(4) + 1
a(5) = a(4) + 1
Else
If a(3) < 31 Then
a(3) = a(3) + 1
a(4) = a(3) + 1
Else
If a(2) < 30 Then
a(2) = a(2) + 1
a(3) = a(2) + 1
Else
If a(1) < 29 Then
a(1) = a(1) + 1
a(2) = a(1) + 1
Else
If a(0) < 28 Then
a(0) = a(0) + 1
a(1) = a(0) + 1
Else
lp = False
End If
End If
End If
End If
End If
End If
Loop

Sub print(a)
For i = 0 To 5
response.write a(i) & ","
Next
response.write "<br>"
End Sub
%>

输出结果很长，

Answer 2

ASP能吗??应该用vbscript或javascript才行吧!!

Answer 3

比较难！！！