最新高中信息技術(shù)《算法與程序設計》練習

PAGEPAGE23?算法與程序設計?練習〔總分值：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,TreeAsInteger

Do

Age=17

Age=Age+1

Tree=Tree+Age〔Tree應該是樹的累加數(shù)，這樣適宜嗎？〕

LoopUntilTree=100

PrintAge&“歲〞

EndSub同學2：計算S=1×2×3×4×5×6×7×8×9的值。程序如下：

PrivateSubCommand1_Click()

DimSAsInteger

〔S沒有初始值，默認為0〕Fora=1To10〔終值設置錯誤〕

S=S*a

Nexta

Print“S=〞&S

EndSub同學3：求解方程ax+b=0。程序如下：

PrivateSubCommand1_Click()

DimAAsSingle,BAsSingle

InputBox("A=")〔從鍵盤得到的數(shù)據(jù)賦給誰了？〕

InputBox("B=")

X=-B/A

PrintX

EndSub同學4：計算S=1+(1+2)+(1+2+3)+…+(1+2+3+…+100)的值。程序如下:

PrivateSubCommand1_Click()

DimiAsInteger,TAsLong,SAsLong

S=0:T=0

Fori=1to100

T=T+i〔T的值為：1＋2＋3＋……n〕

S=S+T

NextI

Print"S=";S

EndSubA、同學1B、同學2C、同學3D、同學42、(1.5分)下面的4個VB程序段能使變量a、b、c的值全部相同的是()。程序一：

a=1:b=2:c=3

a=b

b=c

c=a程序二：

a=1:b=2:c=3

c=a

c=b

c=c程序三：

a=1:b=2:c=3

c=a

b=c程序四：

a=1:b=2:c=3

c=a=bA、程序一B、程序二C、程序三D、程序四

3、(1.5分)如果要改變窗體的標題，那么需要設置的屬性是()

A、CaptionB、名稱C、FontD、Visible

4、(1.5分)數(shù)組D的1到N號元素已經(jīng)賦入常數(shù)值，下面4個程序段都把這N個常數(shù)值輸出，其中不能保證輸出的數(shù)據(jù)是由小到大的程序段是哪個？()。程序一：

fori=1ton-1

Min=D〔i〕:M=i

forj=i+1ton

ifD(j)＜MinthenMin=D(j):M=j

Nextj

k=D(i):D(i)=Min:D(M)=k

NextI

fori=1toN

printD〔i〕;

Nexti程序二：

Fori=1Ton-1

Forj=nToi+1Step-1

Ifd(j)＜d(j-1)ThenM=d(j):d(j)=d(j-1):d(j-1)=M

Nextj

Nexti

fori=1toN

printD(i);

Nexti程序三：

fori=1ton-1

forj=i+1ton

ifD(j)＜D(i)thenM=D(j):D(j)=D(i):D(i)=M

Nextj

Nexti

fori=1toN

printD(i);

Nexti程序四：

Fori=1Ton-1

Forj=i+1Ton

Ifd(j)＜d(j-1)ThenM=d(j):d(j)=d(j-1):d(j-1)=M

Nextj

Nexti

fori=1toN

printD(i);

NextiA、程序一B、程序二C、程序三D、程序四

〔調(diào)試程序時請將以下代碼加在源代碼的前面Dimd(5)AsIntegerFori=1To5d(i)=InputBox("D("&i&")=")NextN=5〕5、(1.5分)以下程序運行后輸出的結(jié)果是()。

PrivateSubCommand1_Click()

a=71*72

P=10000\a+1〔“\〞為取整運算〕Fori=P*aTo11111Stepa

c=i\100Mod10

Ifc=2ThenPrintI;

Nexti

EndSubA、10224B、1022456232C、56232D、153366、(1.5分)下面的4個程序在運行時都會出錯，其中不屬于語法錯誤的是()。程序一：

fori=-10to10

s*1=s〔賦值語句中“＝〞的左面只能是變量〕nextI

prints程序二：

fori=-10to10

s=s+1/i〔除數(shù)不能為零〕

nextI

prints程序三：

fori=-10to10

s=s+i*(i+1)

nexts〔循環(huán)變量不一致〕prints程序四：

fori=-10to10step2

s=s+1

nexti

printsA、程序一B、程序二C、程序三D、程序四

7、(1.5分)

面向?qū)ο蟮母靖拍畎▽ο蟆?)、消息和繼承。

A、方法B、事件C、類D、屬性8、(1.5分)

以下程序段運行后S的值是()。

s=0

Fori=1To14

x=3*i

IfxMod3=0Thens=s+1

NextiA、0B、4C、5D、14

9、(1.5分)

當a=5,b=7,c=-2,d=1時，以下結(jié)果為False的是()。

A、a+b＞c+dAnda＞=5OrNotc＞0Ord＜0

B、c+d＞a+bAnda＞=5OrNotc＞0Andd＞0

C、a+d＜b+cAnda＞=5OrNotc＜0Andd＜0

D、a+b＞c+dAnda＜5OrNotc＞0Ord＜0〔運算符的優(yōu)先級：算術(shù)運算〔符合四那么運算法那么〕>比擬運算>邏輯運算〔Not>And>or〕〕10、(1.5分)

運行如下程序段可輸出由“*〞組成的()。

ForX=1To4

PrintSpace(4)&"*****"

NextX

A、矩形

B、平行四邊形

C、三角形

D、梯形

11、(1.5分)

用折半查找法〔二分查找法〕從數(shù)列3，6，7，10，12，16，25，30，75中找到數(shù)據(jù)25的最少查找次數(shù)是()。

A、2

B、3

C、4

D、7

12、(1.5分)

如果A=30，B=40,執(zhí)行A=A+B:B=A-B:A=A-B語句后,A、B的值是()。(交換兩個變量數(shù)據(jù)的另一方法)A、30、40

B、40、40

C、40、30

D、30、30

13、(1.5分)

用冒泡排序法對數(shù)據(jù)7，6，3，9，2從大到小排序，第2趟結(jié)果是()。

A、9,6,3,7,2

B、7,9,6,3,2

C、9,7,3,6,2

D、9,7,6,3,214、(1.5分)

以下程序段運行時語句k=k+1執(zhí)行次數(shù)為()次。

k=－20

do

k=k+1

loopwhile(k=0)

A、20

B、無數(shù)次

C、1

D、0

15、(1.5分)

數(shù)列2，4，8，16，32，……的遞推公式為()。

A、f(n)=n*2

B、f(n)=f(n-1)*2

C、f(n)=2^n

D、f(n)=f(n-1)+2

16、(1.5分)

以下程序段運行后X的值是()。

x=0

Fori=1To5

Forj=iTo5

x=x+1〔循環(huán)次數(shù)計數(shù)器〕Nextj

Nexti

A、0

B、5

C、10

D、15

17、(1.5分)

假設X=False，執(zhí)行IfXThenX=0ElseX=1后X的結(jié)果為()。

A、False

B、編譯錯誤

C、1

D、0

18、(1.5分)

模塊化程序設計方法反映了結(jié)構(gòu)化程序設計的()根本思想

A、自頂而下、逐步求精B、面向?qū)ο?/p>

C、自定義函數(shù)、過程

D、可視化編程

19、(1.5分)

程序段如下：

c="1234"

Fori=1To4

Print_____,

Next

如果要讓程序運行后得到如下結(jié)果：

1234123121

那么在下劃線處應填入的內(nèi)容為()。(提示：Right(x,n):從字符串右面取n個字符，Left(x,n):從字符串左邊取n個字符)A、Right(c,5-i)

B、Left(c,5-i)

C、Right(c,i-5)

D、Left(c,i-5)

20、(1.5分)

要從n個數(shù)據(jù)元素中順序查找一個元素，最少查找次數(shù)是()?！沧疃嗖檎掖螖?shù)呢？〕A、1

B、n

C、n/2

D、lgn

21、(1.5分)

在流程圖中表示算法中變量的計算與賦值時使用()圖形框。

A、菱形框

B、矩形框

C、圓形框

D、平行四邊形框

22、(1.5分)

VB語言中，以下各種根本數(shù)據(jù)類型說明符中表示整型數(shù)的是()。

A、Integer

B、Boolean

C、Single

D、String

23、(1.5分)

以下哪個是合法的變量名()?！沧兞康拿s定：1、以字母或漢字開頭，不能以數(shù)字或其他字符開頭；2、只能由字母、漢字、數(shù)字俄下劃線組成，不能含有小數(shù)點、空格等字符；3、字符個數(shù)不超過255個；4、不能使用VB中的保存字〕A、sqr

B、2pai

C、c+j

D、abc

24、(1.5分)

程序的根本結(jié)構(gòu)有順序結(jié)構(gòu)、選擇結(jié)構(gòu)和()。

A、邏輯結(jié)構(gòu)

B、模塊結(jié)構(gòu)

C、循環(huán)結(jié)構(gòu)D、層次結(jié)構(gòu)

25、(1.5分)

VB函數(shù)Right()從字串右端開始取局部字串，那么Right("VisualBasic6.0",8)的值為()。

A、VisualB

B、Visual

C、VisualBa

D、asic6.0

26、(1.5分)

VB中保存窗體文件的文件擴展名為()。

A、vbp

B、frmC、doc

D、pas

27、(1.5分)

人們利用計算機解決問題的根本過程一般有如下四個步驟〔①～④〕，請按各步驟的先后順序在以下選項中選擇正確的答案()。

①調(diào)試程序②分析問題③設計算法④編寫程序

A、①②③④B、②③①④C、③②④①D、②③④①28、(1.5分)

程序設計語言的開展歷程中不包括()。

A、機器語言

B、自然語言C、匯編語言

D、高級語言

29、(1.5分)

VB表達式2*8Mod12+4的值是()?！睲od為取余運算〕A、8

B、22

C、20

D、0

30、(1.5分)

下面關(guān)于算法的說法錯誤的是()。

A、算法必須有輸出

B、算法必須在計算機上用某種語言實現(xiàn)

C、算法不一定有輸入

D、算法必須在有限步執(zhí)行后能結(jié)束

二、判斷題

31、(1分)

運行程序時，程序中的每一條語句至少運行一次。

〔錯誤。反例：注釋語句〕32、(1分)

VB表達式〔A+B+C〕的值一定是數(shù)值型數(shù)據(jù)。

〔錯誤。字符型變量也可以進行“＋〞、“－〞運算〕33、(1分)

高級語言是能夠被計算機直接接受和執(zhí)行的計算機語言。

〔錯誤。只有機器語言才能被計算機直接接受和執(zhí)行〕34、(1分)

機器語言是程序設計的核心，是程序設計的靈魂。

〔錯誤。算法＋數(shù)據(jù)結(jié)構(gòu)＝程序〕35、(1分)

列舉一切與命題相關(guān)的情況，然后根據(jù)問題設定的條件，逐個加以檢查，找到滿足條件的解答的方法稱為遞歸算法。

〔錯誤。這是“窮舉法〞的根本思想〕36、(1分)

在程序循環(huán)結(jié)構(gòu)中必須設定終止循環(huán)的條件，否那么會出現(xiàn)死循環(huán)。

〔錯誤。終值條件一定要有，但不一定明確“設定〞，如，F(xiàn)or/Next循環(huán)〕37、(1分)

VB中的事件驅(qū)動就是當應用程序中某對象的特定事件發(fā)生時，通過執(zhí)行一段程序代碼，來完成該特定事件所對應的操作。

38、(1分)

對一個排好序的數(shù)組來說，要查找一個元素，可以用順序查找法，也可以用二分查找法，其中二分查找一定比順序查找快。

〔錯誤。不同的查找方法解決不同的問題，效率上下并不絕對〕39、(1分)

遞歸過程一般通過函數(shù)或子過程來實現(xiàn)。

40、(1分)

對于多種情況的選擇問題，只能采用多重選擇語句來處理，不能使用條件語句。

〔錯誤?？梢圆捎肐f語句的嵌套〕41、(1分)

通過分析問題中各要素之間的關(guān)系，用最簡練的語言或形式化的符號來表達它們的關(guān)系，得出解決問題所需的表達式，然后設計程序求解問題的方法稱為解析法。

42、(1分)

在VB程序設計中，方法對應于對象內(nèi)部的一段程序代碼，既可能是一個函數(shù)，也可能是一個過程。

43、(1分)

控件是應用程序的圖形用戶界面中顯示可供用戶操縱，并可控制應用程序的圖形界面元素，是VB可視化編程的根本操作對象。

44、(1分)

多重循環(huán)的原那么是：外層循環(huán)與內(nèi)層循環(huán)不必層層相套，循環(huán)體之間可以交叉。

〔錯誤。外循環(huán)必須完全包含內(nèi)循環(huán)，也就是說內(nèi)外層Next語句的位置不能交叉〕45、(1分)

VB中所有對象的屬性只能在屬性窗口中設定。

〔錯誤?？梢栽诔绦蛑性O定。如：修改command1的caption屬性為“計算〞可以用comand1.caption=“計算〞實現(xiàn)〕46、(1分)

在程序設計中容易出現(xiàn)的錯誤主要有：編輯時出現(xiàn)的錯誤、編譯時出現(xiàn)的錯誤、運行時的錯誤和邏輯錯誤。

47、(1分)

三角形的兩邊分別為a、b，它們的夾角為60度，圓周率取3.14，在VB中可用公式(a*b*Sin(60*3.14/180)/2)求出該三角形的面積。

48、(1分)

在VB中，可將調(diào)試好的程序編譯生成能夠脫離VB集成環(huán)境在Windows平臺上獨立運行的可執(zhí)行文件。

49、(1分)

在VB中，Int(100*Rnd+1)的取值范圍是1～100之間的所有實數(shù)〔包括1和100〕

〔錯誤。是“整數(shù)〞而不是“實數(shù)〞〕50、(1分)

算法是有限步驟內(nèi)求解問題所使用的一組定義明確的規(guī)那么。

三、操作題

51、(15分)

有一數(shù)列A1、A2、A3、A4、A5、，A1=0、A2=1、A3=1、A4=A1+2*A2＋A3、A5=A2+2*A3+A4、，依此類推編程輸出第23項的值。PrivateSubCommand1_Click()Printf(23)EndSubPrivateFunctionf(nAsInteger)AsSingleIfn=1Thenf=0ElseIfn=2Orn=3Thenf=1Elsef=f(n-3)+2*f(n-2)+f(n-1)EndIfEndIfEndFunction

52、(10分)

編程求12709到45368之間有多少個其各位數(shù)字之和為5的倍數(shù)的正整數(shù)。PrivateSubCommand1_Click()s=0Fori=12709To45368a=Int(i/10000)b=Int((i-a*10000)/1000)c=Int((i-a*10000-b*1000)/100)d=Int((i-a*10000-b*1000-c*100)/10)e=i-a*10000-b*1000-c*100-d*10If(a+b+c+d+e)Mod5=0Thens=s+1NextPrintsEndSub

53、(10分)

三角形的兩邊分別為13、17，它們的夾角為36度，圓周率取3.14，編程求該三角形的面積〔精度：四舍五入保存小數(shù)點后6位〕。

PrivateSubCommand1_Click()Print(13*17*Sin(36*3.14/180)/2)EndSub參考答案單項選擇題：123456789101112131415DCADABCDCAACCCC161718192021222324/