2.8循环结构——for循环一课一练-2021_2022学年初中信息技术浙教版（2020）八年级上册.docx

…………○…………外…………○…………装…………○…………订…………○…………线…………○…………※※请※※不※※要※※在※※装※※订※※线※※内※※答※※题※※…………○…………内…………○…………装…………○…………订…………○…………线…………○…………

…………○…………外…………○…………装…………○…………订…………○…………线…………○…………

※※请※※不※※要※※在※※装※※订※※线※※内※※答※※题※※

…………○…………内…………○…………装…………○…………订…………○…………线…………○…………

2.8循环结构——for循环一课一练

一、填空题

1.程序填空，求8=1+2+3+…+100的和。

PrivateSubForm_Click()

n=1

s=0

Dowhile??????

s=??????

n=n+1

Loop

Prints

Endsub

2.程序填空，鸡兔同笼问题：若干只鸡和兔在一个笼里，共有腿100条，头40个，问鸡有几只，兔有几只?

程序代码如下：

PrivateSubFormClick()

DimjiAsInteger???‘鸡

DimtuAsInteger???‘兔

DimtuiAsInteger???‘腿数

DimtouAsInteger???‘头数

??Forji=??????

????Fortu=1to25

??????tui=???????????‘计算腿的数量

??????tou=ji+tu???‘计算头的数量

??????IF??????Them

????????Printji,tu

??????EndIf

????Nexttu

??Nextji

Endsub

3.利用for循环遍历列表中每个元素然后输出，请补充完整程序。

list1=[1，2，5，6，9]

foriteminlist1：

????print(??????)

二、单选题

4.阅读下图，回答下面小题。

PrivateSubTimer1_Time()

???Fori=0To10Step1

???????Shapel(0)BackColor=RGB(Int(Rnd*256),Int(Rnd*256),In(Rnd*256)

???Nexti

EndSub

（1）.小明在编写逐帧动画的程序时，运行时如果出现下边错误说明（???）

A.?工程没有保存?????????????????B.?Timer1没有定义??????????????????C.?i没有定义?????????????????D.?Shape没有定义

（2）.小明只需要在代码的第一行输入（???）语句就能改正错误。

A.?Dimiasinteger????????????????????B.?DimShapeasinteger?????????????????????C.?i=0????????????????????D.?Dimi

5.下面程序的执行结果是（?）

PrivateSubCommand1_Click()

a=10

fork=1to5Step-1

a=a-k

Nextk

Printa，k

Endsub

A.?-56?????????????????????????????????????B.?-5-5?????????????????????????????????????C.?100?????????????????????????????????????D.?101

6.在VB中，循环结构可以让我们的代码变得短小精悍，减少我们编写重复性代码工作。如图12所示，认真阅读程序并观察运行结果，完成以下题目。

VB中，For循环语句的格式如下：

For循环变量=初值To终值Step步长值语句组

Next

（1）在图12中，椭圆形区域内的“输出按钮”对应的是(???)控件。

A.标签

B.按钮

C.单选框

D.图像框

（2）在图12中的代码窗口中循环语句Fori=1To10step1中，该循环语句的步长值是(???)。

A.1

B.2

C.3

D