如果您无法下载资料,请参考说明:
1、部分资料下载需要金币,请确保您的账户上有足够的金币
2、已购买过的文档,再次下载不重复扣费
3、资料包下载后请先用软件解压,在使用对应软件打开
.《算法与程序设计》练习(满分:100分)说明:本卷分为第一卷和第二卷两部分。第一卷为客观题,含单选题和判断题,其中单选题30小题,共45分;判断题20小题,共20分。第二卷为操作题,共3题,第1题15分,第2题10分,第3题10分,共35分。一、单选题1、(1.5分)下面是4位同学为解决问题编写的程序,完全正确的是()。同学1:某同学从17岁开始栽了1棵树,以后每年都比前一年多栽1棵,他要栽够100棵树,最小得多少岁?程序如下:PrivateSubCommand1_Click()DimAgeAsInteger,TreeAsIntegerDoAge=17Age=Age+1Tree=Tree+Age(Tree应该是树的累加数,这样合适吗?)LoopUntilTree=100PrintAge“岁”&EndSub...同学2:计算S=1×2×3×4×5×6×7×8×9的值。程序如下:PrivateSubCommand1_Click()DimSAsInteger(S没有初始值,默认为0)Fora=1To(终值设置错误)10S=S*aNextaPrint“S=”&SEndSub同学3:求解方程ax+b=0。程序如下:PrivateSubCommand1_Click()DimAAsSingle,BAsSingleInputBox("A=")(从键盘得到的数据赋给谁了?)InputBox("B=")X=-B/APrintXEndSub同学4:计算S=1+(1+2)+(1+2+3)+…+(1+2+3+…+100)的值。程序如下:...PrivateSubCommand1_Click()DimiAsInteger,TAsLong,SAsLongS=0:T=0Fori=1to100(T=T+iT的值为:1+2+3+……n)S=S+TNextIPrint"S=";SEndSub、A同学1B、同学2、C同学3、同学D42、(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=bA、程序一、程序二B、程序三C、程序四D3、(1.5分)如果要改变窗体的标题,则需要设置的属性是()A、Caption、名称B、CFont、DVisible4、(1.5分)已知数组D的1到N号元素已经赋入常数值,下面4个程序段都把...这N个常数值输出,其中不能保证输出的数据是由小到大的程序段是哪个?()。程序一:fori=1ton-1Min=D(i):M=iforj=i+1tonifD(j)<MinthenMin=D(j):M=jNextjk=D(i):D(i)=Min:D(M)=kNextIfori=1toNprint(Di);Nexti程序二:Fori=1Ton-1Forj=nToi+1Step-1Ifd(j)<d(j-1)ThenM=d(j):d(j)=d(j-1):d(j-1)=MNextjNextifori=1toNprintD(i);...Nexti程序三:fori=1ton-1forj=i+1tonifD(j)<D(i)thenM=D(j):D(j)=D(i):D(i)=MNextjNextifori=1toNprintD(i);Nexti程序四:Fori=1Ton-1Forj=i+1TonIfd(j)<d(j-1)ThenM=d(j):d(j)=d(j-1):d(j-1)=MNextjNextifori=1toNprintD(i);NextiA、程序一、程序二B、程序三C、程序四D...(调试程序时请将下列代码加在源代码的前面Dimd(5)AsIntegerFori=1To5d(i)=InputBox("D("&i&")=")NextN=5)5、(1.5分)以下程序运行后输出的结果是()。PrivateSubCommand1_Click()a=71