- 二一组卷

题型：单选题题类：常考题难易度：普通

浙江省高中信息技术算法及VB语言表达基础同步练习

有以下VB程序段：

n = 6

d(1) = 23: d(2) = 31: d(3) = 19: d(4) = 33: d(5) =58: d(6) = 28

k = Abs(d(2) - d(1))

For i = 3 To n

If Abs(d(i) - d(i - 1)) > k Then k = Abs(d(i) - d(i - 1))

Next i

Text1.Text = Str(k)

上述程序段执行后，文本框Text1显示的内容是（）

A、8 B、12 C、14 D、30

举一反三

a = i \ 100

b = i \ 10 Mod 10

c = i Mod 10

If i = a * a * a + b * b * b + c * c * c Then

Label1.Caption = Str(i)

End If

Next i

n = Val(Text1.Text)

k = a(1)

For i = 2 To n

If a(i) < k Then k = a(i)

Next i

Text2.Text = Str(k)

假设在文本框Text1中输入“8”，则文本框Text2中输出的值是（）

小明依据上述描述设计了如下VB程序，在Text1中输入矩阵的行数n (n≤10)，单击“生成”按钮Command1，在List1中显示n×n的螺旋矩阵。请回答下列问题：

相关试卷