st=i&"^2="&i^2&","&fm&"^2="&fm^2
List1.AddItemst
EndIf
EndIf
Nexti
IfList1.ListCount=0ThenList1.AddItem"无镜反平方数对"
EndSub
PrivateFunctionfx(jAsInteger)AsInteger
DimsAsString
DoWhilej<>0
(2)
j=j\10
Loop
fx=Val(s)
EndFunction
PrivateFunctionvalidate(pAsInteger,qAsInteger)AsBoolean
Iffx(p^2)=q^2Then
validate=True
EndIf
EndFunction
17.使用VB编程统计某歌厅最近一个月最受欢迎的热门歌曲情况,界面如图所示,统计方法为:
1个月中顾客点单数前10的歌曲被列入“热门歌曲”,请完善代码。
实现上述功能的VB程序如下,请在划线处填入合适的代码。
Dima(1To100000)AsString'存储该歌厅所有歌曲编号
Dimb(1To100000)AsString'存储该歌厅所有歌曲曲名
Dimc(1To100000)AsString'存储本月顾客点歌记录中的歌曲编号
DimnAsLong'存储本月顾客点歌记录中的歌曲总记录条数
DimmAsLong'存储歌厅歌曲总数
PrivateSubCommand1_Click()
Dimtimes(1To100000)AsLong
DimiAsLong,jAsLong,kAsLong
DimtAsLong,pAsString
List2.Clear
'times(i)为统计本月顾客点歌记录中歌曲编号为a(i)的总次数
List2.AddItem"序号"&"--次数"&"--歌曲编号"&"-歌曲名"
Fori=1Tom
times(i)=
(1)
Nexti
Fori=1Tom-1
k=i
Forj=i+1Tom
If
(2)Thenk=j
Nextj
Ifk<>iThen
t=times(k):
times(k)=times(i):
times(i)=t
p=a(k):
a(k)=a(i):
a(i)=p
p=b(k):
b(k)=b(i):
b(i)=p
EndIf
Nexti
Fori=1To10
List2.AddItemStr(i)&""&Str(times(i))&""&a(i)&""&b(i)
Nexti
EndSub
PrivateSubForm_Load()
’从数据库读取相关数据,存储在数组中
’数组a中存放该歌厅所有歌曲编号,数组b中存放该歌厅所有歌曲曲名,共m条记录
’数组c中存放本月顾客点歌记录中的歌曲编号,共有n条记录
EndSub
Functioncounta(keyAsString)AsInteger
DimiAsLong
counta=0
Fori=1Ton
If(3)Thencounta=counta+1
Nexti
EndFunction
第二部分通用技术(共50分)
一、选择题(本大题共13小题,每小题2分,共26分。
每小题给出的四个选项中只有一个是符合题目要求的,不选、多选、错选均不得分)
1.如图所示为一款可以自动绑鞋带的运动鞋——NIKEHyperAdapt1.0。
当使用者穿上它开始走动时,HyperAdapt1.0就会依照脚的大小绑好鞋带,让脚处于最舒适的状态。
鞋底藏有马达、电池以及有芯片负责运算和驱动。
鞋子可充电,鞋底上LED灯颜色能够反映出剩余电量,蓝色代表电量充足,红色则代表快要没电。
下列关于这款鞋子说法不正确的是
A.鞋子可以自动系鞋带,解放人的双手,体现了技术的目的性
B.在运动过程中,鞋子会根据使用者脚掌的变化来调整鞋带松紧,体现了技术的创新性
C.鞋子的研发需要涉及多门学科知识,体现了技术的综合性
D.鞋子售价高达720美元,体现了技术的两面性
2.如图所示为费雪公司设计生产的儿童音乐马桶。
它包含冲厕把手、伸缩自如的厕纸卷筒和马桶盖。
当儿童如厕成功时,会得到歌曲和句子的奖励。
便盆可以取出,方便清洗。
从人机关系的角度分析,以下说法不正确的是
A.坐便器上有能抓牢的扶手和帮助坐稳的特殊设计,实现了安全目标
B.18cm的高度主要是从儿童的静态尺寸考虑
C.儿童如厕成功时,会得到歌曲和句子的奖励,实现了高效目标
D.可爱的设计风格,满足了儿童的心理需求
3.如图所示为一款简便瓜果挖瓢器,下列关于该产品的说法不正确的是
A.大手柄握感舒适,主要考虑了“物”的因素
B.食品级PP材质,主要考虑了“人”的因素
C.不用刀具就能将瓜果皮肉分离,符合设计的创新原则
D.利用头部圆弧形,即可将瓜肉去除干净,符合实用原则
4.如图所示为户外阳台伸缩晾衣架,其支架和底板均采用铝合金材料制作。
底板用于支架和墙体的连接,下列选项中,底板结构设计合理的是
A.B.C.D.
5.要完成上一题零件的加工,不需要的工具设备是
A.划针和钢直尺B.平锉和台虎钳
C.丝锥和板牙D.钻床和划规
6.如图所示的尺寸标注中,错标和漏标的共有
A.3处B.4处
C.5处D.6处
第6题图
7.如下图所示为一模型的轴测图,已知该模型的主视图和俯视图,其正确的左视图是
8.主要用于研究产品的人机关系和各种功能的是哪种模型
A.草模B.结构模型C.概念模型D.功能模型
9.如图所示为电机减速器,它的作用是降低转速,增加转矩。
在工作时,轴的受力形式为
A.受压、受扭转B.受弯曲、受扭转
C.受剪切、受扭转D.受弯曲、受剪切
10.如图所示为一款孕妇、老人和病人使用的坐便器,现发现其强度不够,以下措施不能提高坐便器强度的是
A.椅腿换用直径较粗的材料B.构件间采用焊接
C.增加椅脚之间的距离D.在底座增加呈三角形的支撑杆
如图所示是用于农林植物保护作业的无人驾驶飞机——植保无人机。
它由飞行平台、GPS飞控、喷洒机构三部分组成,通过地面遥控或GPS飞控,来实现喷洒药剂、种子、粉剂等工作。
植保无人机的喷雾控制子模块包括继
电器、电动隔膜泵和喷头组。
继电器与电动隔膜泵连接。
电动隔膜泵通过药液管与喷头组连接,用于将药液从药液箱中泵出。
喷头组用于将药液雾化喷洒到空中,再由无人机的下洗气流夹带雾滴到作物表面。
当无人机运行到指定高度和指定位置时,继电器和电动隔膜泵开始工作,喷头开始喷药,如果不符合喷药位置则停止作业,直至无人机调整到作业位置再进行作业。
请完成第11~13题。
11.下列不属于植保无人机是否构成系统的条件的是
A.它由飞行平台、GPS飞控、喷洒机构三部分组成
B.电动隔膜泵通过药液管与喷头组连接,用于将药液从药液箱中泵出
C.植保无人机易保养,使用、维护成本低
D.植保无人机通过地面遥控或GPS飞控,来实现喷洒药剂、种子、粉剂等工作
12.以下关于植保无人机的说法中不正确的是
A.地形要求低,作业不受海拔限制,体现了系统的环境适应性
B.使用一段时间后,要及时给无人机进行润滑保养,体现了系统的动态性
C.植保无人机的设计需要涉及多门学科知识,体现了系统分析的综合性原则
D.植保无人机采用喷雾喷洒方式,至少可节约50%的农药使用量、90%的用水量,而且比传统作业提高效率30倍以上,体现了系统的目的性
13.关于植保无人机喷雾控制系统的说法中正确的是
A.输入量是无人机距离农作物的位置
B.被控对象是电动隔膜泵
C.执行器是喷头
D.该无人机需要人遥控,属于人工控制
二、非选择题(本大题共4小题,第14小题6分,第15小题9分,第16小题3分,第17小题6分,共24分)
14.如图所示为汽车后倒车雷达。
后倒车雷达探头装在后保险杠上,以大约45度角辐射,上下左右搜寻目标。
挡位杆挂入倒挡时,倒车雷达自动开始工作,当探头侦测到后方物体时蜂鸣器发出警示,当车辆继续倒车时,警报声音的频率会逐渐加快,最后变为长鸣音。
请根据示意图和描述,完成以下任务:
(1)该系统的控制手段和控制方式分别属于和(在①手动控制;②自动控制;③开环控制;④闭环控制中选择合适的选项,将序号填写在“”处);
(2)该系统中的传感器可选用(在①红外传感器;②位移传感器;③超声波传感器中选择合适的选项,将序号填写在“”处);
(3)该系统的被控对象是(在①汽车;②蜂鸣器;③驾驶员中选择合适的选项,将序号填写在“”处);
(4)为了提高该系统的提示效果,有效的优化措施是和(在①提高传感器的灵敏度;②增加传感器数量,以防留有测量死角;③降低距离设定值;④提高蜂鸣器报警音量中选择合适的选项,将序号填写在“”处)。
15.如图所示是一款电动车并配有儿童前置座椅。
现座椅与电动车支撑杆的连接件坏了,请你重新设计一个连接件,提供的材料为铁板,厚度3mm。
已知条件:
座椅底部的伸出杆是一个长方体金属管,宽和高皆为50mm。
电动车支撑杆为圆柱体结构,直径为45mm。
设计的连接件应满足以下几个要求:
A.儿童座椅与支撑杆之间连接牢固可靠;
B.不破坏电动车支撑杆原有结构;
C.安装和拆卸方便。
请根据描述和设计要求完成以下任务:
(1)画出连接件的设计草图,必要时可用文字说明;
(2)在设计草图上标注主要尺寸;
(3)以下几种类型的连接件,其中适合用于连接件和支撑杆安装和调节的是(在以下连接件中选择合适的类型,将序号填写在“”处);
(4)座椅安装到电动车上后,为了检验其是否达到设计要求,进行了以下试验,其中不合理的试验有(选出合适的选项,将序号填写在“”处)。
①用铁锤击打儿童座椅,测试连接件的强度;②儿童坐到座椅上左右晃动,检验其稳定性;
③拆装几次,检测连接件强度;④在座椅上施加一定压力,检测连接件是否松动。
16.请补全三视图中所缺的三条图线。
17.小明买回一款如图a所示的家用立式落地扇,拆开包装后各个零件如图b所示。
现要将其组装起来,下列9个装配步骤:
①将立柱插入底座;②安装前网罩并扣紧;③安装扇叶,旋转到位;④拧紧底座稳固帽;⑤拧紧网束;⑥旋转螺母调整立柱长度;⑦插入主机头并拧紧螺母;⑧拧紧扇叶帽;⑨对准相应孔安装后网罩。
请分析落地扇装配步骤,完成装配流程:
①———⑦————⑧—。
第17题图a第17题图b