【按键6级试题讲解】

题目如下：100个人手拉手围成一圈，逢三退一（1到3的循环数数，被数到3的人退出）求最后一个被剩下人的编号，请写出代码

解题思路：
把这100个人组成100个数组成员，数组成员的值为改人员的编号
再定义一个新的数组准备存放数数后的数据
然后用取余运算判断该数组成员数是不是能被3整除，如果该数组成员数能被整除则不作处理，否则加入到新的数组并存上编号
每次点数前判断一下有没有余数，如果有，则提前空出新数组存放余数成员数
最后一直循环前面的步骤，直到新数组成员数等于三则跳出循环输出新的数组成员数第三个成员，这就是我们要找的编号

![在这里插入图片描述](https://img-blog.csdnimg.cn/322f2b199b0b401aadc0ee7edd04fe3e.jpg?x-oss-process=image/watermark,type_d3F5LXplbmhlaQ,shadow_50,text_Q1NETiBA5oyJ6ZSu57K-54G15bCPUQ==,size_20,color_FFFFFF,t_70,g_se,x_16#pic_center

实现代码如下：
Import “zm.luae”

Dim 编号(),新数组(),余数

For i = 1