顺序、选择和循环控制结构

顺序、选择和循环控制结构一一循环结构一、选择题1.下列说法不正确的是()For...Next语句适合于循环次数容易确定的情况。在Forn=1to20step2中，n是循环控制变量，setp表示步长为2.S=1+2+3+…+100可以用For语句来实现。Forn=20to1step-1是错误的。答案：D执行以下程序段dimxasinteger,iasintegerx=0fori=5to1step-2x=x+inexti后，x的值为()7TOC\o"1-5"\h\z8910答案：C算法流程图如下图所示，其输出结果是()126127128129答案：B解析：考察for语句循语句以下程序代码运行后,s的结果是()s=0fori=1to10s=s+inexti555010D.无法确定答案：A阅读程序PrivateSubform_click()Forj=1To15a=a+jMod3NextjPrintaEndSub程序运行后，单击窗体，则输出结果是()105112015答案：D解析：变量j从1到15进行循环对3求余，并将所有余数累加，由于余数只有三种可能：0、1、2,三个数循环相加5次，最后可算出总和为15。顺序、选择和循环控制结构一一循环结构一、选择题For...Next循环结构中step用来控制()循环变量循环变量初值循环变量终值循环变量增量答案：DFor...Next循环结构中循环变量初值大于终值时,步长为()负数非负数正整数正数答案：A下面程序的循环次数是()forj=8to35step3printjnextj1092728答案：A解析：考察for语句循环次数的判断For...Next中循环变量初值与终值间使用的关键字是()TOC\o"1-5"\h\zInTogotoprivate答案：B李明同学想通过编程求“1+3+5+..+999”的和，他应选择程序基本结构中的( )顺序结构分支结构选择结构D■循环结构答案：D顺序、选择和循环控制结构一一循环结构一、选择题下列说法不正确的是( )For...Next语句适合于循环次数容易确定的情况。在Forn=1to20step2中，n是循环控制变量，setp表示步长为2.S=1+2+3+…+100可以用For语句来实现。Forn=20to1step-1是错误的。答案：D假定有以下程序段fori=3to1print"VB"nexti则语句print"VB"的执行次数是()次012D.3答案：A3.下面程序的循环次数是()forj=8to35step3printjnextj1092728答案：A解析：考察for语句循环次数的判断小金编写了一个统计随即数分布的VB程序，部分程序如下所示，在调试程序的时候出现如下图所示的错误信息，n=0:m=0Fori=1To100IfRnd>0.5Thenn=n+1Elsem=m+1NextiForNextEndIfIf答案：C5.李明同学想通过编程求“1+3+5+……+999”的和，他应选择程序基本结构中的（ ）顺序结构分支结构选择结构D■循环结构答案：D顺序、选择和循环控制结构一一循环结构一、选择题有如下程序：PrivateSubform_click()DimiAsInteger,sumAsIntegersum=0Fori=2To10IfiMod2<>0AndiMod3=0Thensum=sum+iEndIfNextiPrintsumEndSub程序运行后，单击窗体，输出结果是()12302418答案：A算法流程图如下图所示，其输出结果是()126127128129答案：B解析：考察for语句循语句在窗口上画一个名称为textl的文本框和一个名为command1的命令按钮，然后编写如下事件过程privatesubcommand1_click()dimiasinteger,nasintegerfori=0to50i=i+3n=n+1ifi>10thenexitfornexttext1.text=str(n)endsub程序运行后，单击命令按钮，在文本框中显示的值是()2345答案：B解析：变量i从0到50进行循环，每循环一次i增长4,n增长1当i>10时退出循环，循环三次后i>10阅读程序PrivateSubform_click()a=0Forj=1To15a=a+jMod3NextjPrintaEndSub程序运行后，单击窗体，则输出结果是()TOC\o"1-5"\h\z105112015答案：D解析：变量j从1到15进行循环对3求余，并将所有余数累加，由于余数只有三种可能：0、1、2,三个数循环相加5次，最后可算出总和为15。设窗体上有一个文本框textl和一个命令按钮commandl,并有以下事件过程privatesubcommand1_click()dimsasstring,chasstrings=""fork=1tolen(Text1)ch=mid(Text1,k,1)s=ch+snextktext1.text=sendsub程序运行时，在文本框中输入“Basic”然后单击命令按钮，则textl中显示的是()BasiccisaBBASICC