歷年算法與程序設(shè)計(jì)學(xué)業(yè)水平考試真題帶答案

1、、選擇題1、流程圖是描述的常用方式.A、程序B、算法2、下面不屬于算法描述方式的是.A、自然語(yǔ)言B、偽代碼3、以下運(yùn)算符中運(yùn)算優(yōu)先級(jí)最高的是A、+B、人4、某程序中三個(gè)連續(xù)語(yǔ)句如下：a=1b=2c=b+aA、順序結(jié)構(gòu)B、選擇結(jié)構(gòu)5、窮舉法的適用范圍是A、一切問(wèn)題C、解的個(gè)數(shù)有限且可一一列舉C、數(shù)據(jù)結(jié)構(gòu)D、計(jì)算規(guī)那么C、流程圖D、機(jī)器語(yǔ)言.C、 >=D、 *它屬于C、循環(huán)結(jié)構(gòu)D、以上三種都不是B、解的個(gè)數(shù)極多的問(wèn)題D、不適合設(shè)計(jì)算法6、在現(xiàn)實(shí)生活中,人工解題的過(guò)程一般分為A、理解分析問(wèn)題一尋找解題方法一用工具計(jì)算一驗(yàn)證結(jié)果B、尋找解題方法一理解分析問(wèn)題一用工具計(jì)算一驗(yàn)證結(jié)果 C、用工具計(jì)算

2、一驗(yàn)證結(jié)果一尋找解題方法一理解分析問(wèn)題 D、用工具計(jì)算一驗(yàn)證結(jié)果一理解分析問(wèn)題一尋找解題方法7、以下關(guān)于算法的特征描述不正確的選項(xiàng)是A、有窮性：算法必須在有限步之內(nèi)結(jié)束C、輸入：算法必須至少有一個(gè)輸入8、以下哪一個(gè)不是用于程序設(shè)計(jì)的軟件A、BASICB、C 語(yǔ)言B、確定性：算法的每一步必須確切的定義D、輸出：算法必須至少有一個(gè)輸出C、WordD、Pascal9、以下可以作為合作變量名的是A、a7B、7aC、a-3D、810、編程求1+2+3+ 1000的和,該題設(shè)計(jì)最適合使用的限制結(jié)構(gòu)為A、順序結(jié)構(gòu) B、分支結(jié)構(gòu)C、循環(huán)結(jié)構(gòu)D、選擇結(jié)構(gòu)11、以下步驟不屬于軟件開(kāi)發(fā)過(guò)程的是A、任務(wù)分析與系統(tǒng)設(shè)計(jì)

3、B、軟件的銷(xiāo)售C、代碼編寫(xiě)與測(cè)試 D、軟件測(cè)試與維護(hù)12 .以下程序段運(yùn)行時(shí),語(yǔ)句 k=k+1執(zhí)行的次數(shù)為次.k=-10 do k=k+1 loop while untilk=0A. 9 B. 10C. 11 D.1213 .x=6, y=5,那么以下運(yùn)算結(jié)果為T(mén)rue的是A. Notx>y B. x<5ory>6 C. x>=6Andy>=5 D. Notx>414 .模塊化程序設(shè)計(jì)方法反映了結(jié)構(gòu)化程序設(shè)計(jì)的根本思想.A、自頂向下,逐步求精B、面向?qū)ο?C、自定義函數(shù)、過(guò)程D、可視化編程15、一位同學(xué)想編程解決韓信點(diǎn)兵的問(wèn)題,他制定的如下工作過(guò)程中,最恰當(dāng)

4、的是A、設(shè)計(jì)算法,編寫(xiě)程序,提出問(wèn)題,運(yùn)行程序,得到答案日分析問(wèn)題,編寫(xiě)程序,設(shè)計(jì)算法,運(yùn)行程序,得到答案C分析問(wèn)題,設(shè)計(jì)算法,編寫(xiě)程序,運(yùn)行程序,得到答 案D設(shè)計(jì)算法,提出問(wèn)題,編寫(xiě)程序,運(yùn)行程序,得到答案16、交換變量A和B,語(yǔ)句為A. A=B;B=C;C=A B. C=A;A=B;B=CC. A=B;B=AD. C=A;B=A;B=C17 .執(zhí)行以下程序段后,變量 y的值為 x=3 : y=7Do While x < Sqry x = x + 2LoopA、7 B、8 C、10 D、918 .在VB程序設(shè)計(jì)中交換變量 x和y的值,應(yīng)使用的賦值語(yǔ)句是A、t = x : y=x : y

5、=t B、x=y : y=t : t=x C、x=y : y=x D、t=x : x=y : y=t19 .以下程序執(zhí)行后 A、B的值是A = 5B = 6 A = B : B = A : A = BA、5、6 B、6、6C、6、5 D、5、520 .流程圖中表示判斷框的是A、銀形框 B、菱形框C、圓形框D、橢圓形框21 .以下描述中最適合用計(jì)算機(jī)編程來(lái)處理的是.A、確定放學(xué)回家的路線B、計(jì)算某個(gè)同學(xué)期中測(cè)試各科成績(jī)局部C、計(jì)算100以?xún)?nèi)的奇數(shù)平方和D、在因特網(wǎng)上查找自己喜歡的歌曲22 .以下程序執(zhí)行后 A、B的值是.A=30B=40A=A+B : B=A-B : A=A-BA、30、40 B

6、、40、40C、40、30D、30、3023 . VB語(yǔ)言中,以下各種根本數(shù)據(jù)類(lèi)型說(shuō)明符中表示整型數(shù)的是.A、Boolean B、IntegerC、SingleD、String24 .執(zhí)行以下程序段后,變量 x的值為.x =3 : y = 77 Do While x < Sqr y x = x + 2LoopA、7B、8C、10 D、925.下面是用 VB編寫(xiě)的求1 + 1/2 + 1/3 +1/1皿程序,該程序循環(huán)終止時(shí)i的值是多少?Private Sub Form_Activate()Dim i As Integer , sum As Integer sum = 0For i = 1

7、 To 100sum = sum + 1/iNext iPrint " sum =" ; sumEnd SubA、i = 102 B、i = 100C、i = 101D、無(wú)法判斷26、由語(yǔ)句：Dim K11 As Long,判斷以下結(jié)論中錯(cuò)誤的選項(xiàng)是.A、語(yǔ)句定義了數(shù)組 K,它的下標(biāo)是從0到11B、數(shù)組K共有12個(gè)分量C、數(shù)組K的各個(gè)分量都是長(zhǎng)整型數(shù)D、數(shù)組K的各個(gè)分量的值將按從小到大的順序自動(dòng)排列27、以下是合法變量名的是：A、a-3 B、7C、a$ D、text728、以下不屬于算法根本特征的是.A、可執(zhí)行性B、確定性C、有窮性 D、無(wú)限性29、用計(jì)算機(jī)程序解決問(wèn)題時(shí),

8、調(diào)試程序和檢測(cè)結(jié)果的目的是A、前者用于檢查語(yǔ)法是否正確,后者檢查能否按要求完成任務(wù) B、前者檢查算法是否正確,后者檢查是否有語(yǔ)法錯(cuò)誤C、前者用于檢查語(yǔ)法是否正確,后者檢查是否有病毒D、兩者無(wú)區(qū)別30、下面屬于邏輯運(yùn)算符的是A、orB、FalseC、True D、<>31、以下程序段運(yùn)行后,變量 max的值為 .a = 5b = 10max = aIF b > max Then max = bA、5B、10C、5和10 D、其他三項(xiàng)都不是32、以下屬于程序的根本限制結(jié)構(gòu)的是A、星形結(jié)構(gòu)B、選擇結(jié)構(gòu)C、網(wǎng)絡(luò)結(jié)構(gòu) D、平行結(jié)構(gòu)二、程序分析題1、Private SubForm_Act

9、ivate()Dim a, b, cAs Integera = 15: b = 60: c = 38 If a < b Thenm = aElsem = bEnd IfIf m > c Then m = cEnd IfPrint "M=" mEnd Sub運(yùn)行Z果:M=152、Private Sub Form_Load()Dim X As Integer, Y As IntegerTextl.Text =""X = 99: Y = 98: M = XIf X < Y ThenM = YEnd IfTextl.Text = MEnd Su

10、b運(yùn)彳丁Z果:993、用程序?qū)崿F(xiàn)函數(shù)：y=|x|Private Sub Form_Load()Dim X AS Integer, Y AS IntergerText1.Text=" X=InputBox( X=?") if_x>=0 _ thenY=XElse_ Y=-X End IfText1.Text=Y End Sub4、計(jì)算1+2+3+100的值.Private Sub Form_Activate() Dim i, s AS Integer s=0For i=1 TO _100 step 2s=一 s+iNext iPrintS=" sEnd Sub

11、5、計(jì)算1+3+5+99的值.Private Sub Form_Activate() Dim i, s AS Integer s = 0 for i =1 to 99 Step 2 s = s+iNext i PrintS="sEnd Sub6、分析程序,寫(xiě)出計(jì)算結(jié)果Private Sub Form_Activate() Dim i,S as integer S=1 For i=1 to 4 S=S*i Next iPrint" S= ;SEnd Sub 運(yùn)行結(jié)果：S=247、計(jì)算1 + 1/2+1/50的值.Private Sub Form_activate() Dim

12、i,s as integer s=0Next iPrint " S=" ;sEnd Sub8、分析程序,寫(xiě)出計(jì)算結(jié)果Private Sub Form_Activate() Dim I As Integer, S As IntegerS = 0For I = 2 To 6S = S + INext IPrint "S=" SEnd Sub運(yùn)行結(jié)果：S=209. p=1 For i=1 to 5 P=P+i next i print "I,P分別為： ；i,p 輸出：I, P分別為：_6,16 10. Sum=0 For i=1 To 100 su

13、m=sum+2 Next i print" Sum= ; sum輸出： Sum=200101 )11 .下面是1+1/2+1/3+1/100的和的程序,該程序循環(huán)終止時(shí)i的值是多少(sum=0 For i=1 To 100 sum=sum+1/i next i12 . a=1;b=0 Do while a<=5 b=b+a*a a=a+1 Loop Print a, b 屏幕上顯示的內(nèi)容是：_6_ , _55_13 .完善程序,打印如以下列圖形 * * * * * *For I = 1 To 6For j = 1 To i Print "*" Next j

14、Print Next i14 .執(zhí)行以下程序段后,變量 x的值為：9x=3;y=77DO WHILE x<sqr(y) x=x+2LOOP15 . p = 0: n = 5 For I = 1 To n p = p + I * 2 If p >= 10 Then Exit For Next IPrint p答案：_12_16 . Ch="DEF For i=1 to 3 ch=ch & mid(ch,i,1) Next i Print ch答案： DEF DEF 17、分析程序,寫(xiě)出執(zhí)行結(jié)果 (VB代碼) Private Sub Form_Activate()Di

15、m a,b,c as integer a=15 b=60 c=38 if a<b then m=a else m=b If m>c then m=c Print M= "mEnd Sub 執(zhí)行結(jié)果： M=1518、分析程序,寫(xiě)出執(zhí)行結(jié)果 (VB代碼) Private Sub Form_Activate() Dim i,s as integer s=0 for i=2 to 6 s=s+INext i Print S="s End Sub 執(zhí)行結(jié)果：S=20三、程序局部大題：1.題目中是一個(gè)求二次函數(shù)曲線頂點(diǎn)坐標(biāo)的VB程序,在運(yùn)行是 Textl、Text2、Tex

16、t3分別輸入3、6、9三個(gè)數(shù),請(qǐng)問(wèn)Text4、Text5輸出結(jié)果分別就應(yīng)為多少每空 4分,共8分Private Sub coiKnandl_click ()Dim a As text, b As tezt, c As text a = Vai (Textl, Text j b = Vai(T ext iText) c = Vai(Text3. Text) m =-b / (2 * a) n =(4*a*c-b*b) / Text!. Text = m Text5. Test = nEnd SubTgt4輸出結(jié)果為:Test 5輸出結(jié)果為:2.下面是用VB編寫(xiě)的求1 + 1/2+1/3+1/10

17、0和的程序,在空缺局部填上相應(yīng)的語(yǔ)句.Private Sub Form_Activate()Dim i As Integer, sum As Integer sum = 0For i = 1 To 100sum = sum +Next iPrint" sum=" sumEnd Sub 3、寫(xiě)出程序結(jié)果：Private Sub Form_Activate()Dim ch As String, i As Integer ch =" DEF'For i = 1 To 3ch = ch & Mid (ch, i, 1 )Next iPrint chEnd

18、Sub答案：4 .表一是某種繪圖軟件的局部指令,如要根據(jù)表中的指令畫(huà)出圖一的圖形,請(qǐng)根據(jù)分析填空:2、方法二工RIGHT 90FORWARD 4LEFT 1501、方法一：FORWARD 3RIGHT 120FORWARD 5RIGHT 150石 FORWARD 3p5 .寫(xiě)出程序結(jié)果： Private Sub Command1_Click() Dim p As Integer, i As Integer, n As Integer p=0 : n=5 For i=1 To n p=p+i*2 If p>=10 Then Exit For Next i Print p End Sub 答

19、案：6 .填補(bǔ)程序：假設(shè)你從今年開(kāi)始為“希望工程存錢(qián),今年存入 100元錢(qián),第二年存入 200元錢(qián), 第三年存入300元錢(qián)依此類(lèi)推,問(wèn)：20年時(shí)間你將為“希望工程存入多少錢(qián)Private Sub Command1_Click()Dim n as integer, intsum as integer intsum=0 For n=1 to intsum=intsum+n*100Lb1sum.caption= 兩年共存入："& intsum & 元""End Sub優(yōu)秀學(xué)習(xí)資料歡迎下載7 .某快遞公司規(guī)定：快件不超過(guò)i公斤的,雙遞n 10元,而過(guò)i公斤

20、的局部,按每公斤5元計(jì)費(fèi), 編寫(xiě)快遞費(fèi)計(jì)算程序運(yùn)費(fèi)為S,重量為P8 .寫(xiě)出程序結(jié)果：(8分,每空4分)Private Sub Form_Activate()Dim p As Integer, i As Integer p = 1 For i = 1 To 5P = P + iNext iPrint “I P 分別為： ；i, pEnd Sub 輸出結(jié)果：I P分別為：, 9 . Private Sub Command1_Click()Dim a As Integer, b As Integer a = 1 : b = 0Do While a <= 5b = b + a * aa = a + 1LoopPrint a, bEnd Sub運(yùn)行結(jié)果： 10.小華從今