当前位置: 高中信息技术 / 单选题
  • 1. (2020·浙江模拟) 有如下VB程序段:

    Dim n As Integer, L As Integer, R As Integer, sum As Long, i As Integer

    List1. Clear

    n= Int(Rnd*3+11)*2+1

    L=1:sum= 0

    For R=1 To n\2+1

      Sum = sum+ R

      Do While sum > n

        Sum = sum - L

        L=L+1

      Loop

      If sum = n Then

       List1. AddItem Str(L) +””+ Str(R)

        Exit For

      End If

    Next R

    执行该程序段后,列表框List1中的值不可能为(    )

    A . 27 B . 13 14 C . 3 7 D . 11 12.

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