当前位置: 高中信息技术 / 单选题
  • 1. (2022高三下·浙江开学考) 有N个人围成一个圈,从1到k报数,报到k的人出列,剩下的同学继续围成一个圈,由出列位置的下一个同学再从1开始报数,输出出列的顺序,则①②划下线处填空选项为(    )

    Private Sub Command1 Click)

        Const n=9 '总人数

        Dim b(1 Ton) As Integer

        Dim k As Integer, i As Integer, p As Integer, cnt As Integer, pre. p As Integer

        k =Val(Text1. Text)

        For i= 1 Ton

            b(i)=iModn+1

        Next i

        p = n:i = 0:cnt=0

        Do While i<n

            pre_p = p

            p=   ①   

        cnt=cnt+1

        If cnt=k Then

           List1. AddItem Str(p)

           b(pre_p)    ②    

           cnt=0

           i= i+1

        End If

      Loop

    End Sub

    A . ①b(p)   ②b(p) B . ①p mod n+1   ②b(p+1) C . ①b(p)   ②b(p+1) D . ①(p-2+n) mod n    ②b(p)

微信扫码预览、分享更方便