高段练习专门为信息技术高分所备.doc

《高段练习专门为信息技术高分所备.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、3．以下VisualBasic程序的功能是：计算表达式1＋3＋9＋27＋81＋…2187的值，并在文本框Text1中输出计算结果。PrivateSubCommand1_Click()DimiAsInteger,tAsLongt=0i=1DoWhilei<=2187t=t+ii=i+3LoopText1.Text=Str(t)EndSub（1）为了实现这一目标，程序划线处的表达式应更正为_________。（2）运行更正后的程序，循环刚退出时变量i的值为__________。4.在网上商城中找到商品后可以将商品按照价格顺序显示，下列程序模拟该信息处理过程，程

2、序能根据找到的商品信息（价格和发货地），将所有商品按照价格从高到低显示。一开始，所有商品的价格和发货地分别保存在数组a和数组b中，第i个商品的价格保存在a(i)中，对应的发货地保存在b(i)中。程序界面如图VB-1所示，左边列表框List1中显示用户已找到的所有商品信息（包括价格和发货地），单击"开始排序"按钮（Command1），所有商品按照价格从高到低显示在列表框List2中。解决此问题的算法流程图如图VB-2所示，相应的程序如下，在程序(1)和(2)划线处，填入适当的语句或表达式，把程序补充完整。PrivateSubCommand1_Click()D

3、imiAsInteger,jAsInteger,t1AsInteger,t2AsString,kAsIntegerFori=1Ton-1'n表示商品总数k=i'k保存第i大的数，一开始假定是a(i)Forj=i+1TonIfa(k)

4、st2.AddItemStr(a(i))+""+b(i)NextiEndSub程序中(1)划线处应填入___________________程序中(2)划线处应填入___________________图VB-1图VB－25．猜密码。电脑产生一个8位密码，用户输入猜测的密码，电脑判断用户所猜密码的正确性，如果用户输入的密码和电脑产生的密码完全一致则输出"恭喜你猜中了密码！"，否则程序将输出用户密码和计算机产生密码之间不同的字符数。电脑产生的8位密码分别保存在数组pass的8个下标变量pass(1)、pass(2)、…、pass(8)中。程序界面如图VB-1

5、所示，用户在文本框Text1中输入密码，单击"密码校验"按钮（Command1）后，程序在标签Label3中输出密码校验结果。解决此问题的算法流程图如图VB-2所示，相应的程序如下，在程序(1)和(2)划线处，填入适当的语句或表达式，把程序补充完整。Dimpass(1To8)AsIntegerPrivateSubCommand1_Click()Dimx(1To8)AsInteger,iAsInteger,sAsIntegerFori=1To8x(i)=Val(Mid(Text1.Text,i,1))'把文本框中数字逐个分割出来并转化成数值Nextis=0'

6、变量s保存不同字符的总数Fori=1To8Ifpass(i)<>x(i)Then______(1)_____________NextiIf_______(2)________________ThenLabel3.Caption="恭喜你猜中了密码！"ElseLabel3.Caption="你输入的密码共有"+Str(s)+"个字符和密码不符"EndIfEndSubPrivateSubForm_Load()DimiAsInteger'产生8位密码，每位一个非负整数，保存到数组passFori=1To8pass(i)=Fix(Rnd*10)NextiEndSu

7、b程序中(1)划线处应填入________________程序中(2)划线处应填入________________图VB-1答案3、i=i*365614、jk<>i5、s=s+1s=0