- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
PAGE
PAGE 7
《算法与程序设计》练习
(满分:100分)
???
说明:本卷分为第一卷和第二卷两部分。第一卷为客观题,含单选题和判断题,其中单选题30小题,共45分;判断题20小题,共20分。第二卷为操作题,共3题,第1题15分,第2题10分,第3题10分,共35分。
一、单选题
1、(1.5分)下面是4位同学为解决问题编写的程序,完全正确的是( )。
同学1:某同学从17岁开始栽了1棵树,以后每年都比前一年多栽1棵,他要栽够100棵树,最小得多少岁?程序如下:Private Sub Command1_Click( )??????Dim Age As Integer,Tree As Integer???????Do??????????Age=17??????????Age=Age+1??????????Tree=Tree+Age(Tree应该是树的累加数,这样合适吗?)????????Loop Until Tree=100????????Print Age “岁”End Sub
同学2:计算S=1×2×3×4×5×6×7×8×9的值。程序如下:Private Sub Command1_Click( )?????Dim S As Integer??????(S没有初始值,默认为0)
For a = 1 To 10(终值设置错误)??????????S = S * a??????Next a??????Print “S=” SEnd Sub
同学3:求解方程ax+b=0。程序如下:Private Sub Command1_Click( )?????Dim A As Single,B As Single?????InputBox(A=)(从键盘得到的数据赋给谁了?)?????InputBox(B=)?????X=-B/A?????Print XEnd Sub
同学4:计算S=1+(1+2)+(1+2+3)+…+(1+2+3+…+100)的值。程序如下:Private Sub Command1_Click()?????Dim i As Integer,T As Long,S As Long?????S=0:T=0??????For i=1 to 100?????????????T=T+i(T的值为:1+2+3+……n)??????????????S=S+T??????Next I???????Print S=; SEnd Sub
????A、同学1 ???B、同学2 ????C、同学3 ????D、同学4
??
2、(1.5分)
下面的4个VB程序段能使变量a、b、c的值全部相同的是( )。
程序一:a=1:b=2:c=3a=bb=cc=a
程序二:a=1:b=2:c=3c=ac=bc=c
程序三:a=1:b=2:c=3c=ab=c
程序四:a=1:b=2:c=3c=a=b
???? A、程序一 ????B、程序二 ????C、程序三 ????D、程序四??
3、(1.5分)
如果要改变窗体的标题,则需要设置的属性是( )??? ?A、Caption ????B、名称 ????C、Font ????D、Visible ???
4、(1.5分)
已知数组D的1到N号元素已经赋入常数值,下面4个程序段都把这N个常数值输出,其中不能保证输出的数据是由小到大的程序段是哪个?( )。
程序一:for i=1 to n-1? Min=D(i):M=i ? for j=i+1 to n??? if D(j)<Min then Min=D(j):M=j? Next j? k=D(i):D(i)=Min:D(M)=kNext Ifor i=1 to N? print D(i);Next i
程序二:For i = 1 To n - 1? For j = n To i + 1 Step -1??? If d(j) < d(j - 1) Then M = d(j): d(j) = d(j - 1): d(j - 1) = M? Next jNext ifor i=1 to N? print D(i);Next i
程序三:for i=1 to n-1?for j=i+1 to n?? if D(j)<D(i) then M=D(j):D(j)=D(i):D(i)=M? Next jNext ifor i=1 to N? print D(i);Ne
您可能关注的文档
最近下载
- 【中考真题】2025年上海英语试卷(含听力mp3).docx VIP
- (高清版)B-T 3836.2-2021 爆炸性环境 第2部分:由隔爆外壳“d”保护的设备.pdf VIP
- 课件录播专业教室建设方案.docx VIP
- 2025年贵州省辅警考试真题及答案.docx VIP
- 工作交接清单——标准模板交接单表格正式版.doc VIP
- GB_T 24021-2024 环境管理 环境标志和声明 自我环境声明 (II型环境标志).pdf VIP
- 渔政执法课件.pptx VIP
- 基于MQTT的远程数据采集与实时控制系统设计和应用.docx VIP
- 2025青岛版小学科学三年级上册1-5《制作动物分类图册》(教学课件)(新教材).pptx
- (高清版)-B-T 30146-2023 安全与韧性 业务连续性管理体系 要求.pdf VIP
文档评论(0)