组卷题库 > 高中信息技术试卷库
试题详情
有如下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.
知识点
参考答案
采纳过本试题的试卷
教育网站链接