你好,3个for 就可以的。
Private Sub Form_Load()
Show
Dim i&, x&, t&, a&
For i = 5 To 8
For x = 5 To 8
If x <> i Then
For t = 5 To 8
If t <> x And t <> i Then
a = a + 1
Print & i & x & t
End If
Next
End If
Next
Next
MsgBox "共" & a & "个"
End Sub
共24个。
567,568,576,578,586,587,657,658,675,678,685,687,756,758,765,768,785,786,856,857,865,867,875,876
c 语言程序。
#include
int main(){
int a[4]={5,6,7,8};
int i,j,k,m,n=0;
for (i=0;i<4;i++){for (j=0;j<4;j++){for (k=0;k<4;k++){
if (i != j && j != k && k != i){
printf("%d%d%d\n",a[i],a[j],a[k]); n++;
}
}}};
printf("n=%d\n",n);
return 0;
}
567 568 576 578 586 587
657 658 675 678 685 687
756 758 765 768 785 786
856 857 865 867 875 876
共24 个
这个是组合问题,4*3*2 = 24个