行班

枚算教班姓名

學(xué)：1.用50元錢面值為1元2元、5元幣共張每紙少于1張出有多少種兌換方案？每種兌換方案中1元2元5的紙幣各有多少?gòu)?？假設(shè)面值為1元、元5元幣分別是、y、z張兌方k種題意可得出x、y、z滿足表達(dá)式為x+y+z=25x+2y+5z=50解決此問(wèn)題的VisualBasic如下，(1)和(2)線處，填入合適的語(yǔ)句或表達(dá)式，把程序補(bǔ)充完整。PrivateSubCommand1_Click()DimkAsIntegerDimxAsInteger,yAsInteger,zAsIntegerk=0List1.ClearFory=1To23Forz=1To9x=25-y-zIf(1)ThenList1.AddItem"1元+Str(x)+"張"+Str(y)+"張"+Str(z)+"張"____(2)___________EndIfNextzNextyLabel1.Caption=共有"+Str(k)+種換方"EndSub程序中劃線(應(yīng)_____________程序中劃線(應(yīng)_____________2.以下Basic程的功是：計(jì)表達(dá)式1+2+2+2+2+2+2+2+2+2

的值，并在文本框Text1中輸出結(jié)果。為了現(xiàn)一功能，程序中劃線處的語(yǔ)句應(yīng)更正為_(kāi)____________。PrivateSubCommand1_Click()DimiAsInteger,sAsLongs=0k=2Fori=110s=s+kk=k*2NextiText1.Text=Str(s)EndSub3.在100至999之間的自然數(shù)中找出能被整除，且至少有一位數(shù)字為5的有整數(shù)，并統(tǒng)計(jì)個(gè)數(shù)。設(shè)變量s是個(gè)三位正整數(shù)，變量ab、c分別示百位、十位和個(gè)位上的數(shù)字，變量n表示滿足要求的整數(shù)個(gè)數(shù)。對(duì)每一個(gè)，只要判斷a、、中否至少有一個(gè)為5，即可找到符合條件的數(shù)單擊按鈕，在列表框List1中出符合條件s值在文本框Text1中輸出n的值。相應(yīng)的VisualBasic程序下(1)和2)線處，填入合適的語(yǔ)句或表達(dá)式，把程序補(bǔ)充完整。PrivateSubCommand1_Click()DimsAsInteger,nAsDimaAsInteger,bAsInteger,cAsIntegern=0s=102List1.ClearDoWhile(1)=s\100=s\10Mod10=sMod10If(2)Thennn+1List1.AddItemStr(s)s=s+3LoopTex