某算法的流程图如下图所示。执行这个流程图时依次输入5、4、6、-8、4、0，下列说法正确的是（ ）
| A．a <> 0执行了4次 |
| B．s=s*x+a语句执行了5次 |
| C．输出的s值是表达式4*54+6*53-8*52+4*5的值 |
| D．输出的s值是表达式4*53+6*52-8*5+4的值 |
更新时间：2020-03-25 10:36:27
|
【知识点】 VB程序的调试
相似题推荐
选择题
|
适中
(0.65)
【推荐1】有如下 VB 程序段：
s1 = "Shui"
For i = 1 To Len(s1)
ch = Mid(s1, i, 1)
If ch >= "a" And ch <= "z" Then
ch = Chr((Asc(ch) - Asc("a") + 23) Mod 26 + Asc("A"))
End If
s2 = ch + s2
Next i
Label1.Caption = s2
执行该程序段后，标签 Label1 中显示的内容是（ ）
s1 = "Shui"
For i = 1 To Len(s1)
ch = Mid(s1, i, 1)
If ch >= "a" And ch <= "z" Then
ch = Chr((Asc(ch) - Asc("a") + 23) Mod 26 + Asc("A"))
End If
s2 = ch + s2
Next i
Label1.Caption = s2
执行该程序段后，标签 Label1 中显示的内容是（ ）
| A．FRES | B．Serf | C．freS | D．SERF |
您最近一年使用：0次
选择题
|
适中
(0.65)
名校
【推荐2】有如下程序段
a(1)=False
For i=2 To 20
For i=2 To 20
t = 0
For i=1 To 20
经过该程序段运行后，变量t的值为（ ）
a(1)=False
For i=2 To 20
a(i)=True
Next iFor i=2 To 20
If a(i)=True Then
For j=2 To 20\i
a(i*j)=False
Next j
End If
Next it = 0
For i=1 To 20
If a(i)=True Then
t=t+1
End If
Next i经过该程序段运行后，变量t的值为（ ）
| A．5 | B．6 | C．7 | D．8 |
您最近一年使用：0次
选择题
|
适中
(0.65)
【推荐3】有如下 VB 程序段：
Key = Val(Text1.Text) i = 1: j = 10
Do While i <= j
m = (i + j) \ 2
If Key < a(m) Then
j = m - 1
Else
i = m + 1
End If
Loop
Text2.Text = Str(i-1)
数组a(1)~a(10)的值分别是 2，2，3，5，5，5，7，7，7，9，若从 Text1 中输入 5，则 Text2 显示的内容是（ ）
Key = Val(Text1.Text) i = 1: j = 10
Do While i <= j
m = (i + j) \ 2
If Key < a(m) Then
j = m - 1
Else
i = m + 1
End If
Loop
Text2.Text = Str(i-1)
数组a(1)~a(10)的值分别是 2，2，3，5，5，5，7，7，7，9，若从 Text1 中输入 5，则 Text2 显示的内容是（ ）
| A．4 | B．6 | C．7 | D．10 |
您最近一年使用：0次
