以下程序段中循环体执行的次数是（）s=0i=0DoWhiles<10 i=i+1 s=s+i*iLoopA．3B．2C．1D．4_刷题宝

题干

以下程序段中循环体执行的次数是（）

s = 0

i = 0

Do While s < 10

i = i + 1

s = s + i * i

Loop

A．3

B．2

C．1

D．4

上一题下一题 0.99难度选择题更新时间:2019-06-15 09:42:15

答案(点此获取答案解析）

同类题1

编写VB程序，实现如下功能：单击按钮“确定”，在列表框中输出1-100里所有的完全平方数。程序界面如下图所示：

为实现上述功能，请将以下程序补充完整。
Private Sub Command1_Click()
Dim j As Integer, k As Integer
List1.Clear
For k = 1 To 100

j = Int(Sqr(k))

If __________Then List1.AddItem _______________

同类题2

某算法的部分流程图如图所示，执行这部分流程后，输出a,b的值分别是（）

同类题3

某算法的部分流程图如图所示。

执行这部分流程，s的初值为0，输入n为5，则输出s的值为

同类题4

有一个单击按纽过程，其作用是产生50个60～100的随机数，统计其中被6整除余2的个数，并将这些数输出。请补充下面的程序：

Private Sub command1_click( )

Dim X, N As Integer
Dim count As Integer ' count用来保存能被6整除余2的数据的个数
Randomize Timer ' 随机数初始化，以时钟为随机数种子

For N = 1 To 50

X = ___________ + int(Rnd * 40) ' 随机产生50个60～100的随机数

If X Mod 6 = 2 Then

List1.AddItem Str(X)

_______________

Next N

Label1.Caption = str (count)

End Sub

同类题5

有如下程序：

Dim a(3,3) As Integer

For m = 1 To 3

For n = 1 To 3
a(m,n)=(m-1)*3+n
Next n

Next m

 For m = 2 To 3
For n = 1 To 2
Print a(n,m);
Next n
Next m
运行后输出结果是： ( ）

相关知识点