VB程序:用1、2、3这3个数组成三位数.编写程序,打印出所有的可能(3位数可以相同),每行输出5个,并统计组成的3位数的个数
来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/18 19:38:18
VB程序:用1、2、3这3个数组成三位数.编写程序,打印出所有的可能(3位数可以相同),每行输出5个,并统计组成的3位数的个数
VB程序:用1、2、3这3个数组成三位数.编写程序,打印出所有的可能(3位数可以相同),每行输出5个,并统计组成的3位数的个数
VB程序:用1、2、3这3个数组成三位数.编写程序,打印出所有的可能(3位数可以相同),每行输出5个,并统计组成的3位数的个数
对不起,今天太忙,上的有点晚了,希望没有让你等太久.
Private Sub Form_Click()
Cls
Dim i As Integer,j As Integer,k As Integer
Dim n As Integer
For i = 1 To 3
For j = 1 To 3
For k = 1 To 3
n = n + 1
Print 100 * i + 10 * j + k;
If n Mod 5 = 0 Then Print
Next
Next
Next
Print
Print "共有"; n; "个"
Print "点击窗口重新开始..."
Print "双击窗口关闭"
End Sub
Private Sub Form_DblClick()
End
End Sub
Private Sub Form_Load()
Form1.AutoRedraw = True
Print "点击窗口开始..."
Print "双击窗口关闭"
End Sub
已经运行过.
临时用C写的,没经过调试,看看吧~~
记得采纳啊喂~~
#include
void main()
{
int a[]={1,2,3};
int i1,i2,i3,mark=0;
for(i1=0;i1<3;i1++)
for(i2=0;i2<3;i2++)
for(i3=0;i3<3;i3++)
{...
全部展开
临时用C写的,没经过调试,看看吧~~
记得采纳啊喂~~
#include
void main()
{
int a[]={1,2,3};
int i1,i2,i3,mark=0;
for(i1=0;i1<3;i1++)
for(i2=0;i2<3;i2++)
for(i3=0;i3<3;i3++)
{
printf("%d%d%d ",a[i1],a[i2],a[i3]);//注意这里有空格
mark++;
if(!(mark%5)) printf("\n");
}
printf("\nThe sum of the number is %d", mark);
}
收起