vb循环循环章节习题.docVIP

Do循环练习 2.写下列程序运行结果。 (1) s=0 I=1 While i=5 S=s+i Print s; I=i+1 Wend (2) i=10 While 7-i Print I; I=i-1 Wend (3) s=0:n=1 While ns S=s+n N=n+2 If n=5 then n=n-1 Wend Print s;n 3.程序填空 (1)计算：s=20! S=1 K=1 While _________ S=_________ K=k+1 Wend Print “20!=”;s (2)任意输出20个数，求最大值 N=1 Input x Max=x While n=20 If maxx then ________ N=n+1 _________ Wend Print max (3)s=,N为何值时S大于104 S=0:n=0 While s1E4 ________ S=s+___________ Wend Print x 1.下列循环语句能正常结束的是________。 A) i = 5????????????????????????? ?B) i = 1 ?? Do????????????????????????????????? Do ???? i = i + 1??????????????????????????? ??i = i + 2 ?? Loop Until i 0 ???????????Loop Until i = 10?????? C) i = 10???????????????????????? D) i = 6 ?? Do????????????????????????????????? Do ???? i = i - 1?????????????????????????? ???i = i - 2 ?? Loop Until i 0 ????????????Loop Until i = 1?????? 2.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() ? Dim a As Integer,s As Integer ???? a=8 ???? s=1 ???? Do ????? s=s+a ????? a=a-1 ???? Loop While a=0 ???? Print s;a ? End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是______。 A)7?9??????????? B)34 0??????? C)9? 7?????? D)死循环 3.下面程序段的执行结果为______。 I=4 A=5 Do ? I=I+1 ? A=A+3 Loop Until I=9 PrintI=;I PrintA=;A A)I=9 ??? B)I=10 ??? C)I=10?????? D)I=9 A=20 ??????? A=20 ?????? A=23 ?????? A=23 4.以下能够正确计算n!的程序是______。 A)Private Sub Command1_Click() ??? ?N = 5 : X = 1 ???? Do ??????? x = x * i ??????? i = i + 1 ???? Loop While i n ???? Print x End Sub B)Private Sub Command1_Click() 牋牋 N = 5 : x = 1 : i = 1 牋牋 Do 牋牋牋?x = x * i 牋牋牋?i = i + 1 牋牋 Loop While i n 牋牋 Print x End Sub C)Private Sub Command1_Click() 牋牋 N = 5 : x = 1 : i = 1 牋 牋Do 牋牋牋?x = x * i 牋牋牋?i = i + 1 牋牋 Loop While i = n 牋牋 Print x End Sub D)Private Sub Command1_Click() 牋牋 N = 5 : x = 1 : i = 1 牋牋 Do 牋牋牋?x = x * i 牋牋牋?i = i + 1 牋牋 Loop While i n 牋牋 Print x End Sub 5.在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： ????? Private Sub Command1_Click() ?????????