high=m-1
Else
If①Then
If②Thenhigh=m-1Elseflag=True
Else
flag=True
EndIf
EndIf
Loop
Ifflag=TrueThen
Print("元素的下标是:
"+Str(m))
Else
Print("元素未找到.")
EndIf
若数组元素a(0)~a(9)的值依次为“2,2,6,8,10,10,13,15,17,26”,在文本框Text1中输入10,运行上述程序后,程序输出“元素的下标是:
4”。
程序中划线处代码为()
A.①m>0②key=a(m-1)B.①m>-1②key=a(m-1)
C.①m>0②key=a(m+1)D.①m>-1②key=a(m+1)
二、非选择题(本大题共5小题,其中第13小题4分,第14小题8分,第15小题7分,第16小题7分,共26分)
13.小林收集了2015、2016年浙江省各地区生产总值数据,并使用EXCEL软件进行数据处理,如图a所示。
请回答下列问题:
(1)要在表格第2行输入标题,格式如图b所示,下列操作正确的是______。
(单选,A.在B2单元格输入标题,选择B2:
F2区域后居中/B.在D2单元格输入标题后居中/C.在B2单元格输入标题,合并B2:
F2区域后居中)。
(2)图a所示,区域B4:
F14数据已进行了排序,则排序的主要关键字是_________。
(3)根据图a中数据制作的图表如图c所示,创建图表的数据区域是________。
(4)在F15单元格中使用COUNTIF函数统计区域F4:
F14中“增幅%”大于10
地区个数,则F15单元格中的公式是_______________。
(提示:
COUNTIF函数用于统计某个区域满足条件的单元格个数。
例如:
=COUNTIF(B4:
B20,"<100")表示在数据区域B4:
B20中统计数值小于100的单元格个数。
)
14.小张使用Flash软件创作题材为“勤则不匮”的多媒体作品,如图所示。
(1)在制作作品前,小王进行了相应的分析和规划。
下列属于创作需求分析的是________(多选,填字母:
A.该作品要求使用Flash软件制作/B.交互设计友好快速/C.该作品的主题思想为“人贵于勤劳,勤劳就不会穷匮”/D.音乐悦耳,色彩和谐)。
(2)制作“播放”按钮元件,使“指针经过”帧上有“鸣鸡起舞”的动画效果,实现该特效的对象类型是________(选填:
位图/影片剪辑/声音)。
(3)为了使“朝阳”图层中的动画补间提前至第55帧处结束,在不改变其他动画效果的前提下可进行的操作是________________________________________________________。
(4)测试影片,点击“播放”按钮,跳转到“主交互界面”场景并停止,则“播放”按钮上的动作脚本为________________________。
(5)“背景音乐”图层中的音频文件时长为10秒,测试场景时,动画播放到第35帧时音乐停止播放,其同步属性为________________。
15.若参与运算的数范围大大超出了标准数据类型能表示的范围的运算,就要用到高精度算法。
小明编写了如下的高精度乘法程序,在文本框Text1和Text2中分别输入两个乘数(保证输入的乘数为正整数),单击命令按钮Command1,在文本框Text3中输出两个数的乘积,运行界面如图所示。
(1)请在划线处填入合适的代码。
①_________________
②_________________
③_________________
(2)程序中加框处
(2)的语句有误,请改正。
改正:
___________________
(3)若将加框处(3)的代码改为Mid(Str(c(i)),2,1)+output,则在Text1中输入14,在Text2中输入19,运行程序后在Text3中显示的结果为________
PrivateSubCommand1_C1ick()
Dima(1To100)AsInteger,b(1To100)AsInteger,c(1To1000)AsInteger
DimlencAsInteger,iAsInteger,jAsInteger
DimslAsString,s2AsString,outputAsString
s1=Text1.Text:
s2=Text2.Text:
Text3.Text=""
Fori=1ToLen(s1)
a(i)=①'将文本框Text1中的自然数按从低位到高位的顺序依次存放在数组a
(1),a2......a(len(s1))中
Nexti
'将文本框Text2中的自然数按从低位到高位的顺序依次存放在数组b
(1),b
(2)......
b(1en(s2))中,代码略
1enc=
'
(2)
Fori=1ToLen(s1)
Forj=1ToLen(s2)
c(i+j-1)=c(i+j-1)+a(i)*b(j)
c(i+j)=②
c(i+j-1)=c(i+j-1)Mod10
Nextj
Nexti
Ifc(lenc+1)>0Then③
output=""
Fori=1encTo1Step-1
output=
'(3)
Nexti
Text3.Text=output
EndSub
16.某日期加密授权码生成方法描述如下:
(1)授权码由1