第一问答网»论坛 › 中问网 › 问答 › 用VB编写程序，有17个人围成一圈（编号0～16），第0号的 ...

用VB编写程序，有17个人围成一圈（编号0～16），第0号的人开始从1报数，凡是报到3的倍数的人离开

[复制链接]

11 |

2 | 2011-3-4 15:05:31 | 显示全部楼层 |阅读模式

圈子，然后在数下去，直到最后只剩下一个人为止。问此外人原来的位置号是多少？要代码

使用道具举报

千问 | 2011-3-4 15:05:31 | 显示全部楼层

C的 int all=17,need=17,k=3; int x=0,y=0,i=0,j=0; int a[5001]={0}; while(1) { x=x%all+1; if(a[x]==0){ i=(i+1)%k; if(i==0)
{y=y+1;a[x]=1;}} if(y==need)break; }

使用道具举报

千问 | 2011-3-4 15:05:31 | 显示全部楼层

Private Sub Form_Click()Const OUT As Integer = -1Dim n As Integer,m As Integer,i As Integer,num1 As Integer,num2 As IntegerDim a() As Integern = 17m = 3ReDim a(n)For

使用道具举报

返回列表发新帖

千问

主题	0 回帖	4882万积分

论坛元老

Rank: 8 Rank: 8

积分: 48824836

回复楼主返回列表

问答

热门排行