山東省信息技術(shù)學(xué)考算法與程序設(shè)計(jì)試題答案附后講解.doc

山東省學(xué)考算法與程序設(shè)計(jì)試題選擇題1、下列VB表達(dá)式中：Sqr(x) Text1.text Command1.caption 45+34 45+34值為字符串類型的是（ ）A B C D2、如果給出三條線段的長(zhǎng)分別為a、b、c，且已知abc，要問這三條線段能否構(gòu)成三角形，僅需下列選項(xiàng)中的哪個(gè)判定條件即可？（ ）A 其他選項(xiàng)都不對(duì) B a+cb C a+bc D b+ca3、VB程序中“Dim n As Integer”這條語句的作用是（ ）A 定義一個(gè)事件過程 B 定義一個(gè)數(shù)據(jù)輸入方法 C 定義一個(gè)變量 D 定義一個(gè)數(shù)據(jù)處理方法4、關(guān)于算法的描述，下列選項(xiàng)中正確的是（ ） A 算法的每一步驟必須有確切的含義 B 算法必須有輸入 C 算法的步驟可以是無窮的 D 算法本身就是一種程序設(shè)計(jì)語言5、關(guān)于算法的描述，正確的是（ ） A同一種算法只能用一種程序語言實(shí)現(xiàn)B算法就是數(shù)值計(jì)算的方法C描述算法的方法只有流程圖D算法是描述解決問題的方法和步驟6、算法的描述方法有多種，下列選項(xiàng)中不適合描述算法的是（ ） A機(jī)器語言 B自然語言 C流程圖 D偽代碼7、長(zhǎng)度分別為a、b、c的三條線段，能夠組成三角形的條件是（ ）A a+bc Or a+cb Or b+ca B a+bc or a+cb And b+caC a+bc Or a+cb And b+ca D a+bc And a+cb And b+ca8、已知海倫公式：S=，其中p=（a+b+c），a、b、c分別為三角形的三條邊長(zhǎng)。利用海倫公式求三角形面積的算法屬于（ ） A 排序法 B 解析法 C 窮舉法 D 查找法9、以下程序段中循環(huán)體執(zhí)行的次數(shù)是（ ） s=0 i=0 Do While s1的解的是（ ） A x-1 and x-1 or x1 C x1 D x111、一元二次方程ax2+bx+c=0(a0)的兩個(gè)實(shí)數(shù)根分別為： x1= x2= 下列表達(dá)式正確的是（ ）A x2=-b-sqr(b2-4*a*c)/(2*a) B x1=(-b+sqr(b2-4ac)/(2*a)C x2=(-b-sqr(b2-4*a*c)/(2*a) D x1=-b+sqr(b2-4*a*c)/(2*a)12、關(guān)于算法的描述，下列選項(xiàng)中正確的是（ ）A、一個(gè)算法可以沒有輸入B、算法只能用流程圖表示C、一個(gè)算法，當(dāng)沒有輸入時(shí)，也沒有輸出D、一個(gè)算法的執(zhí)行步驟可以是無限的。13、如果一個(gè)4位數(shù)恰好等于它的各位數(shù)字的4次方和，則這個(gè)4位數(shù)成為“玫瑰花”數(shù)。例如1634就是一個(gè)玫瑰花數(shù)：1634=14+64+34+44。如果要求出所有的玫瑰花數(shù)，下列算法最合適的是（ ）A解析法 B排序法 C查找法 D窮舉法14、一個(gè)單窗體VB程序的運(yùn)行界面如右圖所示。下列說法正確的是（ ）窗體內(nèi)有1個(gè)按鈕窗體內(nèi)有2個(gè)文本框窗體內(nèi)有3個(gè)標(biāo)簽該窗體的標(biāo)題（Caption）屬性值是“加法計(jì)算器”A B C D15、下列VB程序運(yùn)行時(shí)（如圖所示），在文本框Text1中輸入20，在文本框Text2中輸入13，單擊命令按鈕Command1后，文本框Text3中顯示的內(nèi)容是（ ）Private Sub Command1_Click()a=Val(Text1.text)b=Val(Text2.text)Text3.text=a+bEnd SubA 33 B 33 C 2013 D 2013注意：把程序中的Val去掉，再執(zhí)行程序，看結(jié)果是否發(fā)生改變。16、在VB語言中，字符串運(yùn)算符“+”和“&”的作用是把兩個(gè)或多個(gè)字符串連接成一個(gè)字符串。則表達(dá)式20+13&20+13的運(yùn)算結(jié)果是（ ）A201320+13 B201333 C332013 D333317、兩個(gè)阻值為R1、R2的電阻并聯(lián)后，電路阻值R可由公式求解，下面能正確求出R的VB表達(dá)式是（ ）A B C D 18、下列問題不能用算法描述的是（ ）A求一元二次方程ax2+bx+c=0(a0)的兩個(gè)實(shí)數(shù)解B計(jì)算某班英語平均分C求方程y=2x+1的所有整數(shù)解D已知圓錐的底面半徑和高，求表面積和體積19、已知在VB語言中，int(x)函數(shù)的功能是返回不大于x的最大整數(shù)，abs(x)函數(shù)的功能是返回x的絕對(duì)值，則表達(dá)式abs(int(2.88)+int(-3.14)的值是（ ） A 0 B 2 C 1 D 520、在VB語言中表示“x屬于區(qū)間（0，1”的正確表達(dá)式是（ ）A 0x0 and x1 C 0x and x0 or x 0 x = n Mod 10 s = s + x n = n 10LoopPrint s程序運(yùn)行時(shí)，輸入518，運(yùn)行輸出結(jié)果是： 14 (6分)提示： 整除運(yùn)算 如：23710=23 Mod 取余運(yùn)算 如：237 mod 10=7分析：初始值第一步第二步第三步XX=n mod 100815SS=s+s00+80+8+10+8+1+5NN=n 1051851502、閱讀下列程序，寫出正確運(yùn)行結(jié)果Dim sum As LongDim i As Longsum = 0i = 0Do While sum 10 i = i + 1 sum = sum + i * i LoopPrint sum運(yùn)行結(jié)果是： 14 分析：初始值第一步第二步第三步ii =i+100+10+1+10+1+1+1Sumsum=sum+i * i00+120+12+220+12+22+32循環(huán)條件Sum 1 cnt = cnt + 1 變換次數(shù)cnt累加 If n Mod 2 = 0 Then n = n/2 Else n = n*3+1 End IfLoop5、閱讀下列程序，寫出運(yùn)行結(jié)果Dim x As IntegerDim y As Integery = 0For i = 1 To 5 x = Val(InputBox(請(qǐng)輸入：) y = y + xNext iprint y程序運(yùn)行后，依次輸入：10 20 30 40 50 運(yùn)行輸出結(jié)果是： 150 分析：初始第1次第2次第3次第4次第5次第6次i0123456x01020304050不滿足條件，循環(huán)終止y 00+100+10+200+10+20+300+10+20+30+400+10+20+30+40+506、選擇算法，解決問題在使用計(jì)算機(jī)解決問題時(shí)，選擇合適的算法，是有效解決問題的關(guān)鍵。分析下面的問題，請(qǐng)選擇最合適的算法：(填：解析法/窮舉法/遞歸法/排序法，6分) 窮舉法 搬磚問題：100塊磚，100人搬，一個(gè)男人搬4塊，一個(gè)女人搬3塊，兩個(gè)小孩抬1塊，要求一次全搬完，問需男、女、小兒各多少人？7、選擇算法，解決問題在使用計(jì)算機(jī)解決問題時(shí)，選擇合適的算法，是有效解決問題的關(guān)鍵。分析下面的問題，請(qǐng)選擇最合適的算法：(填：解析法/窮舉法/遞歸法/排序法，6分) 遞歸法 猴子吃桃問題：小猴有一天摘了若干個(gè)桃子，它非常貪吃，當(dāng)天就吃掉了一半還多一個(gè)，第二天接著吃剩下的桃子一半多一個(gè)，以后每天都是如此，至了第七天要吃桃子時(shí)，卻發(fā)現(xiàn)只剩下一個(gè)。問小猴那天一共摘了多少個(gè)桃子？8、閱讀下列程序，選出運(yùn)行結(jié)果For i = 1 To 10 i控制*的行數(shù) For j = 1 To i j控制每行*的個(gè)數(shù) Print * ; 輸出 * -注意末尾是分號(hào) Next j Print 輸出換行Next i運(yùn)行結(jié)果是： D (填：A/B/C/D,6分)ABCD9、分析完善程序“完數(shù)”是指一個(gè)自然數(shù)恰好等于它的因子（不包含本身）之和。如6的因子為1、2、3，而6=1+2+3，因而6就是完數(shù)。再如28的因子為1、2、4、7、14，而28=1+2+4+7+14，因而28也是完數(shù)。問題：輸入一個(gè)正整數(shù)n，判斷該正整數(shù)是否為完數(shù)。要判斷一個(gè)整數(shù)n是否為完數(shù)，最簡(jiǎn)單的方法是：求出1到n-1之間的所有因子和為sum，如果sum的值和n的值相同，則n就是完數(shù)。以下代碼是判斷n是否為完數(shù)的程序片段，請(qǐng)你補(bǔ)全代碼：（8分）Dim n As LongDim sum As Long sum用來記錄n的因子和n = InputBox(n=)For i = 1 To n - 1 求n的因子和sum If n Mod i = 0 Then sum = sum+i Next iIf sum=n Then Print n & 是完數(shù)Else Print n & 不是完數(shù)End If10、分析完善程序以下是求解一元二次方程ax2+bx+c=0(a0)的主要VB程序片段。請(qǐng)你補(bǔ)全代碼：（8分）a = Val(InputBox(a=)b = Val(InputBox(b=)c = Val(InputBox(c=)d = b 2 - 4 * a * c 求判別式dIf d 0 Then X1 = (-b + Sqr(d) / (2 * a) X2 = (-b - Sqr(d) / (2 * a) Print x1=; X1 Print x2=; X2End IfIf d=0 Then Print x=; -b / (2 * a)End IfIf d 0 Then Print 無實(shí)數(shù)解End If11、分析解決問題VB語言中繪制圓的方法是：Circle(x,y),r格式說明：其中(x,y)為圓心坐標(biāo)，r為圓的半徑。下表中算法1是在窗體中繪制以（2000，2000）為圓心，半徑依次為100、200800的8個(gè)同心圓。請(qǐng)補(bǔ)充完成算法2，使其實(shí)現(xiàn)與算法1相同的功能。（6分）算法1算法2Circle(2000,2000),100Circle(2000,2000),200Circle(2000,2000),300Circle(2000,2000),400Circle(2000,2000),500Circle(2000,2000),600Circle(2000,2000),700Circle(2000,2000),800Dim k As IntegerFor k = 1 To 8 Circle (2000, 2000), k * 100 Next k12、分析完善程序問題：輸入一個(gè)正整數(shù)n,判斷該正整數(shù)是否為素?cái)?shù)（質(zhì)數(shù)）。要判斷一個(gè)數(shù)n是否為素?cái)?shù)，最簡(jiǎn)單的方法是：統(tǒng)計(jì)2到n-1之間的所有能整除n的整數(shù)個(gè)數(shù)s，若s大于0，則n不是素?cái)?shù)，否則就是素?cái)?shù)。根據(jù)以上方法，完善以下程序代碼：（8分）n = Val(InputBox(n=)s = 0For i = 2 To n - 1 If n Mod i = 0 Then s = s + 1 統(tǒng)計(jì)因數(shù)個(gè)數(shù) End IfNext iIf s = 0 Then -此處若寫s=0也是正確的 Print n & 是素?cái)?shù)Else Print n & 不是素?cái)?shù)End If13、分析完善程序2005年10月9日，國(guó)家測(cè)繪局正式宣布珠穆朗瑪峰的高度是8844.43米，并停用之前的數(shù)據(jù)。現(xiàn)有一張白紙的厚度大約是0.08毫米，對(duì)折一次，厚度變?yōu)?.16毫米，再對(duì)折一次，厚度變?yōu)?.32毫米，每對(duì)折一次，其百度均變?yōu)閷?duì)折前的兩倍。假設(shè)這張紙有足夠大，可對(duì)折任意次，那么這張紙至少對(duì)折多少次后，其厚度將超過珠穆朗瑪峰的高度。以下是求解該問題的程序片段，請(qǐng)你補(bǔ)全代碼：（8分）Dim height As DoubleDim h As DoubleDim cnt As Longheight = 8844430 -單位為毫米h = 0.08 -單位為毫米cnt =0 Do While h height cnt = cnt + 1 h = 2*h -此處若寫h+h或h*2也是可以的LoopPrint cnt14、分析解決問題在VB語言中常用的字符串截取函數(shù)有：（6分）函數(shù)名功能示例結(jié)果Mid(s,m,n)從字符串s的第m位開始截取長(zhǎng)度為n的子串Mid(ABCDEFG, 5, 2)EFLeft(s,n)截取字符串s左邊n個(gè)字符Left(ABCDEFG, 3)ABCRight(s,n)截取字符串s右邊n個(gè)字符Right(ABCDEFG, 2)FG假如某人身份證號(hào)碼s如果需要根據(jù)此身份證號(hào)碼求出該人的”出生年月日”。下列四個(gè)表達(dá)式中不能實(shí)現(xiàn)的一個(gè) D (填A(yù)/B/C/D)。A. Mid(s, 7, 8)B. Rig