高二算法與程序設計模塊考試題

《算法與程序設計》試題學校：_________班級：________學號：_______姓名：_________題號12345678910答案題號11121314151617181920答案

一、單選題（每小題3分，20小題，共60分）1、用計算機解決問題時，首先應該確定程序“做什么？”，然后再確定程序“如何做？”請問“如何做？”是屬于用計算機解決問題的哪一個步驟？（ ）A、分析問題 B、設計算法 C、編寫程序 D、調試程序2、在調試程序過程中，下列哪一種錯誤是計算機檢查不出來的？（ ）A、編譯錯誤 B、執(zhí)行錯誤 C、邏輯錯誤 D、任何錯誤計算機都能檢查出來3、下列關于算法的敘述中，錯誤的是（ ）A、一個算法至少有一個輸入和一個輸出B、算法的每一個步驟必須確切地定義C、一個算法在執(zhí)行有窮步之后必須結束D、算法中有待執(zhí)行的運算和操作必須是相當基本的。4、流程圖中表示判斷的是（

）。Ａ、矩形框Ｂ、菱形框

Ｃ、圓形框Ｄ、橢圓形框5、任何復雜的算法都可以用三種基本結構組成，下列不屬于基本結構的是（ ）A、順序結構 B、選擇結構 C、層次結構 D、循環(huán)結構6、能夠被計算機直接識別的語言是（ ）A、偽代碼 B、高級語言 C、機器語言 D、匯編語言7、在VB語言中，下列數據中合法的長整型常量是（ ）A、08A B、2380836E C、88.12345 D、1.2345E68、求Mid(“ABCDEFG”,3,2)的結果是（ ）A、“ABC” B、“CD” C、“ABCDEF” D、“BCD”9、表達式A+B+C<DANDA>=3ORNOTC<0ORD>0當A=3,B=4,C=-5,D=6時的運算結果是（ ）A、0 B、1 C、TRUE D、FALSE10、在循環(huán)語句Forx=1to100step2……Nextx中，x能達到的最大值是（ ）A、100 B、99 C、98 D、9711、在下列選項中，不屬于VB的對象的是（ ）A、窗體的背景顏色 B、命令按鈕 C、文本框 D、標簽12、在調試程序的時候，經常要設置斷點，設置斷點的快捷鍵是（ ）A、F1 B、F8 C、F9 D、F1213、算法描述可以有多種表達方法，下面哪些方法不可以描述“閏年問題”的算法（ ）

A、自然語言B、流程圖C、偽代碼D、機器語言14、以下不屬于非法用戶自定義標識符（常量和變量命名）的是（ ）

A、8ad B、ad8 C、_a8d D、const

15、已知A，B，C，D是整型變量，且都已有互不相同的值，執(zhí)行語句B=0；A=C；D=A；D=B；后，其值相等的變量是（）

A、A，D B、A，C C、C，B D、B，A

16、要交換變量A和B的值，應使用的語句組是()

A、A=B；B=C；C=AB、C=A；A=B；B=C

C、A=B；B=AD、C=A；B=A；B=C17、Visual

Basic中以單引號開頭一行文字稱為注釋，它對程序的運行（ ）

A、起一定作用

B、有時候起作用

C、不起任何作用，但是必須的

D、不起任何作用，但能增加程序的可閱讀性18、要使一個命令按鈕顯示文字“確定”，正確的設置是把該命令按鈕的（

）。

A、屬性Font設置為“確定”

B、屬性.ForeColor設置為“確定”

C、屬性Caption設置為“確定”

D、屬性BorderStyle設置為“確定”19、要從文本框TXTShowOut中輸出"中國您好！"，代碼為()

ATextBox.text="中國您好！"

BTxtShowOut.Text="中國您好！"

CTxtShowOut.Label="中國您好！"

DVal(TxtShowOut.Text)=“中國您好！”20、下列VisualBasic程序段運行后，變量max的值為（

）。

a=11; b=15;max=a

IFb>maxThenmax=b

A、15

B、11

C、15或11都有可能

D、以上都不是

二、閱讀程序寫結果（第1～2小題每題5分，第3小題10分，共20分）1、PrivateSubForm_Load()N=InputBox(“請輸入N的值：”,“輸入”)S=1Fori=1toNS=S*iNextiMsgBox“S=”+Str(s),0,”計算結果”EndSub當N=5時，運行的結果是__________________。2、PrivateSubCommand1_Click()DimXasinteger,X1asinteger,X2asintegerDimX3asinteger,YasintegerX=InputBox(“X=”，“輸入”)X1=X\100X2=(X-X1*100)\10X3=X-X1*100-X2*10Y=X3*100+X2*10+X1Print“Y=”;YEndSub當X=258時，運行的結果是________________。3、PrivateSubCommand1_Click() DimAasInteger,BasInteger,CasSingleDimDasStringN=InputBox(“請輸入N的值：”)F=NMOD5A=N+1B=ABS(N)SelectCaseFCase1:C=A+B:D=”+”Case2:C=A-B:D=”-”Case3:C=A*B:D=”*”Case4:C=A/B:D=”/”Caseelse:EndEndSelectPrintA;D;B;”=”;CEndSub當N=13時，運行的結果是_____________。

三、程序填空（每小題10分，2小題，共20分）1、下面的程序是求100以內奇數和S的值（S=1+3+5+7...+99），請把空缺的地方填寫完整。

PrivateSubCommand1_Click()

DimSAsInteger

DimIAsInteger

S=__（1）__

ForI=1to100Step__（2）__

S=S+I

Next__（3）__

Label1.____（4）______=___（5）___(S)

EndSub

（1）______（2）_____（3）______（4）______（5）____2、某旅行團共有30個人，其中有男人、女人和小孩，他們在一家餐廳吃自助餐花去500元。已知自助餐的價格是每個男人30元，每個女人20元，每個小孩10元。問：男人、女人、小孩各為多少人。下面是解決該問題的VB程序，請在空缺的地方填寫完整。PrivateSubCommand1_Click()DimManAsInteger,WomanAsInteger,ChildAsIntegerDimMoneyAsInteger,CountAsIntegerCount=0‘用來記錄符合條件的組合數ForMan=1To__(1)__(500/30)ForWoman=1To(30-Man)Child=__________(2)___________Money=30*Man+20*Woman+10*ChildIf_______(3)________ThenCount=Count+1Print“第”;Count;”種情況：”PrintTab(10);”男人”;Man;”個”;Pr