求一算法

[kenways]

例如三粒色子,点数是1--6的,总数最大是18,最少是3,现在想列出3---18之间各个和值的不同组合

[hookee]

<%
For i = 1 To 6 
    For j = 1 To 6
        For k = 1 To 6
            Response.Write i & "-" & j & "-" & k & " : " & (i+j+k) & "<br>"
        Next
    Next
Next
%>

[Dogfish]

<%
For i = 1 To 6 
    For j = i To 6
        For k = j To 6
            Response.Write i & "-" & j & "-" & k & " : " & (i+j+k) & "<br>"
        Next
    Next
Next
%>

[kenways]

那样不是有重复吗???例如 1-2-3 : 6 和 1-3-2 : 6 还有2-1-2 :5和1-2-2:5 等那些虽然排列不同,但用的都是由相同的3个数字组合而来的,现在想不同的组合才列出来,怎么办呢

[hookee]

用dogfish的是不重复的