写出算法执行结果_刷题宝

题干

写出算法执行结果

上一题下一题 0.99难度填空题更新时间:2019-03-22 12:00:41

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

同类题1

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
Private Sub Command1_Click()
Dim n As Integer
Dim m As Integer
m = 0
For n =" 1" To 20
If n Mod 3 <> 0 Then m =" m" + n \ 3
Next n
Text1.text = Str(m)
End Sub
程序运行后，如果单击命令按钮，则文本框Text1中显示的内容是 ( )

同类题2

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

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

同类题3

有如下VB程序段：
For i = 1 To 8
a(i) = Int(Rnd * 2)
Next i
sum = 0
For i = 1 To 8 Step 3
For j = i To 8
a(j) = 1 - a(j)
Next j
sum = sum + a(i)
Next i
Text1.Text = Str(sum)
执行程序段后，文本框Text1中显示的内容不可能是

同类题4

某VB程序段代码如下：
Private Sub Command1_Click()
a = Text1
For i = 1 To Len(a)
b = Mid(a, i, 1)
c = Chr(Asc(b) )
d = d + c
Next i
Text2 = d
End Sub
如果在文本框text1中输入字符"316100"，则文本框text2中显示的值是：

同类题5

有流程图如图所示。

执行该算法，输出变量i的值为（）。

相关知识点