如果您无法下载资料,请参考说明:
1、部分资料下载需要金币,请确保您的账户上有足够的金币
2、已购买过的文档,再次下载不重复扣费
3、资料包下载后请先用软件解压,在使用对应软件打开
2007年6月高中信息技术会考算法与程序设计题(第一套)四、程序设计题(本题有4小题,第1-3小题,每小题4分,第4小题6分,共18分)1.有如下VisualBasic程序段:a=30b=20a=b该程序段运行后,变量a的值为________。2.有如下VisualBasic程序段:DimaAsSingle,pyAsStringa=Val(Text1.Text)Ifa>0Thenpy="正数"Ifa=0Thenpy="零"Ifa<0Thenpy="负数"Label1.Caption=py在文本框Text1中输入100,则在Label1标签上显示的是。3.以下VisualBasic程序的功能是:计算表达式1×2×3×4×5×6×7×8×9×10的值,并在文本框Text1中输出结果。为了实现这一功能,程序中划线处的语句应更正为_____________。PrivateSubCommand1_Click()DimiAsInteger,sumAsLongsum=0Fori=1To10sum=sum*iNextiText1.Text=Str(sum)EndSub4.从改革开放以来,浙江省农村家庭的可支配收入逐年增加,近几年每年增长率在9%左右。小明一家今年的可支配收入是32000元,按现在的增长率9%计算,小明家几年后可支配收入将达到50000元?解决此问题的流程图如VB-1所示。根据流程图VB-1编写的VisualBasic程序如下,在①和②划线处,填入合适的语句或表达式,把程序补充完整。PrivateSubCommand1_Click()DimxAsLong,pAsDouble开始DimnAsIntegerx=32000可支配收入:x←32000p=0.09n=0增长率:p←9%DoWhile①x=x*(1+p)所需年数:n←0②LoopNYText1.Text=Str(n)x<50000?EndSub输出nx←x(1+p)n←n+1结束程序中划线处①应填入程序中划线处②应填入图VB-12007年6月高中信息技术会考算法与程序设计题(第二套)四、程序设计题(本题有4小题,第1-3小题,每小题4分,第4小题6分,共18分)1.有如下VisualBasic程序段:a="Good"b="Bye"c=a+b该程序段运行后,变量c的值是___________。2.有如下VisualBasic程序段:x=3Ifx>5Theny=x*xElsey=4*xEndIf该程序段运行后,变量y的值是___________。3.下面程序的功能是:计算表达式1+3+5+…+(2n-1)的值,在文本框Text1中输入n的值,结果在文本框Text2中输出。则程序中划线处的语句应更正为__________________。PrivateSubCommand1_Click()DimsumAsLong,iAsInteger,nAsIntegersum=0n=Val(Text1.Text)Fori=1To2*n-1Step2sum=sum+2NextiText2.Text=Str(sum)EndSub4.依照中华人民共和国《机动车驾驶员驾车时血液中酒精含量规定》,血液中酒精含量大于或等于0.3mg/ml驾驶机动车的属酒后驾车;大于或等于1.0mg/ml驾驶机动车的属醉酒驾车。设计一个程序,帮助交警判定某人属酒后驾车、醉酒驾车还是没有违法。解决此问题的流程图如VB-1所示。根据流程图VB-1编写的VisualBasic程序如下,在①和②划线处,填入合适的语句或表达式,把程序补充完整。开始将酒精含量的值送变量xNYx≥1?NY输出:你属于醉酒驾车!x≥0.3?输出:你属于酒后驾车!输出:恭喜你没有违法!结束图VB-1PrivateSubCommand1_Click()DimxAsSinglex=Val(Text1.Text)If①ThenLabel1.Caption="你属于醉酒驾车!"ElseIfx>=0.3ThenLabel1.Caption="你属于酒后驾车!"②Label1.Caption="恭喜你没有违法!"EndIfEndIfEndSub程序中划线处①应填入程序中划线处②应填入2007年6月高中信息技术会考算法与程序设计题(第三套)四、程序设计题(本题有4小题,第1-3小题,每小题4分,第4小题6分,共18分)1.有如下VisualBasic程序段:a=300b=400b=b-a该