2010年浙江省信息技术会考试题 ——算法填空题

《2010年浙江省信息技术会考试题 ——算法填空题》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第一套1.有如下VisualBasic程序段：a=12:b=20b=a+b+28a=b+a-5b=a+b该程序段运行后，变量b的值为。2.有如下VisualBasic程序段：a=5b=Len("1011")Ifa>bThenLabel1.Caption="请重新输入"ElseLabel1.Caption="欢迎光临"EndIf该程序段运行后，在标签Label1上显示的是____________。3.以下VisualBasic程序的功能是：计算表达式1×1+2×2+3×3+4×4+5×5+6×6的值，并在文本框Text_1中输出结果。PrivateSubCommand1_Clic

2、k()Dima(1To6)AsIntegerDimsAsInteger,iAsIntegers=0Fori=1To6a(i)=i*is=s+a(i)Nexti_____=str(s)EndSub问：（1）为了计算上述表达式的值，上面程序段划线处应填入_________。（2）该程序段运行后，a(5)的值是____________。4.用辗转相除法求最大公约数。已知用辗转相除法求两个正整数m、n的最大公约数的算法如下：(用num1，num2，r分别表示被除数m、除数n和余数)①求num1/num2的余数r；②若r=0，则执行第⑤步；③将num2的值放在num1中，将r的值放在nu

3、m2中；④重新执行第①步；⑤输出最大公约数num2。下列VisualBasic程序用于求三个正整数的最大公约数。程序界面如图所示，在文本框Text1、Text2和Text3中分别输入三个数a、b和c，单击"求最大公约数"按钮（Command1）后，在文本框Text4中输出a、b、c的最大公约数y。Functiontemp(num1asInteger,num2asInteger)asIntegerDimrasInteger'此函数用于计算两个正整数的最大公约数r=num1Modnum2DoWhile①num1=num2num2=rr=num1Modnum2Looptemp=num

4、2EndFunctionPrivateSubCommand1_Click()DimaasInteger,basInteger,casInteger,xasInteger,yasIntegera=Val(Text1.Text)b=Val(Text2.Text)c=Val(Text3.Text)x=②y=temp(x,c)Text4.Text=Str(y)EndSub（1）解决此问题的算法是。（选填：解析法或枚举法）在程序①和②划线处，填入适当的语句或表达式，把程序补充完整：（2）程序中①划线处应填入___________________。（3）程序中②划线处应填入________

5、___________。第二套1.有如下VisualBasic程序段：m=-5n=-2s=m+Int(n)该程序段运行后，变量s的值为____________。2.有如下VisualBasic程序段：a=10b=8Ifa>bThenLabel1.Caption="morning"ElseLabel1.Caption="byebye"EndIf该程序段运行后，在标签Label1上显示的是____________。3.有如下VisualBasic程序段：s=0a=5Fori=1To10Step2a=a+is=a*iNexti问：该程序段运行后，（1）变量i的值是__________

6、_。（2）变量s的值是___________。4.某超市打折促销，规定如下：①购物未超过500元按原价支付；②购物超过500元但未超过1000元，超过500元部分按9折优惠计价；③购物超过1000元但未超过1500元，超过1000元部分按8折优惠计价；④购物超过1500元但未超过3000元，超过1500元部分按7折优惠计价；⑤购物超过3000元，超过3000元部分按6折优惠计价。根据以上规定，假定购物货款为x元，则实付金额y为:程序界面如图所示，在"输入购物金额（单位：元）"后的文本框orgtext中输入购物金额（单位：元），单击"实付金额计算"按钮（Command1）后，在"

7、实际支付金额（单位：元）为"后的文本框cashText中输出实付金额。解决此问题相应的VisualBasic程序如下：PrivateSubCommand1_Click()DimxAsSingle,yAsSinglex=Val(orgtext.Text)Ifx<=500Theny=xElseIf①Theny=500+(x-500)*0.9ElseIfx<=1500Theny=500+500*0.9+(x-1000)*0.8ElseIfx<=3000Theny=500+500*0.9+500*0