高考算法與程序設(shè)計(jì)試題及答案.doc

編輯：桐鄉(xiāng)第一中學(xué) 杜宗飛A算法與程序設(shè)計(jì)一、選擇題（本大題共17小題，每題2分，共34分）1.下列問(wèn)題不能用算法描述的是A.已知a、b、c的值，求一元二次方程ax2+bx+c=0（a0）的實(shí)數(shù)解B.計(jì)算某個(gè)班級(jí)英語(yǔ)成績(jī)的平均分C.列出方程y=2x+1的所有實(shí)數(shù)解D.根據(jù)矩形的長(zhǎng)和寬求面積2.下列可以作為VB變量名的是A. A&s B. A+S C. AS D. A_s3.將數(shù)學(xué)表達(dá)式寫(xiě)成VB表達(dá)式正確的是A.（y Int（x）/x*x B.（y Abs（x）/x2C.（y Int（x）/x2 D.（y Abs（x）/ x*x4. 某賓涫的房間號(hào)由5位字符組成（例如A0823表示A幢8層23號(hào)房間）末位數(shù)字為奇數(shù)時(shí)表示房間朝南，為偶數(shù)時(shí)表示房間朝北，字符串變量s中存儲(chǔ)了1個(gè)房間號(hào)，下列能正確判斷房間朝南的VB表達(dá)式是A.Val（Mid（s，5，1）Mod 2 = 1 B. Val（Mid（s，5，1）Mod 2 = 0C. Val（Mid（s，5，1） 2 = 1 D. Val（Mid（s，5，1） 2 = 05.下列VB表達(dá)式中：Sin（x） Text1.Text Label1.Caption Chr（x） Asc（x）值為字符串型的是A. B. C. D. 6下列能準(zhǔn)確表達(dá)“如果明天不下雨，那久我們騎車(chē)去郊游”的偽代碼是 Alf（明天下雨）Then（我們騎求去郊游） BIf（明天不下雨）Then（我們騎車(chē)去郊游）Else（我們不去郊游） C，If（明天下雨）Then（我們不去郊游）Else（我們騎車(chē)去郊游） Dlf（明天不下雨）Then（我們騎車(chē)去郊游）7.尋找數(shù)組元素a(1)到a(10)中最小值min程序段如For i = 2 To 10 If a（i） min Then min = a(i)Next i方框中最合適的語(yǔ)句是A. a（1）= min B. a（1）= 0 C. min = a(1) D. min = 08.某VB的事件過(guò)程如下：Private Sub Command1_Click() Dim a As Integer a = Val(Text1.Text) a = 2 * a + 1 Text1.Text = Str(a)End Sub程序運(yùn)行時(shí)，在文本框Text1中輸入1，連續(xù)兩次單擊命令按鈕Command1后，Text1中顯示的內(nèi)容是A. 7 B.5 C. 3 D. 19.對(duì)數(shù)組元素a(1)到a(8)進(jìn)行排序，其排序算法的VB部分程序段如下：For m = 1 To 7 p = m For n = m + 1 To 8 Next n If p m Then t = a(p): a(p) = a(m): a(m) = tNext m方框中的語(yǔ)句是A. If a(n) a(p) Then p = m B. If a(n) a(p) Then p = n D. If a(n) a(p) Then p = m10.有如下VB程序段：Dim i As Integer, c As String, s As String, t As Strings = 2012 Hero: t = For i = 1 To Len(s)c = Mid(s, i, 1)If c = a And c c And b + c a And c + a b) Then st = 這三條線(xiàn)不能構(gòu)成一個(gè)三角形ElseIf a * a + b * b = c * c Or a * a + c * c = b * b Or b * b + c * c = a * a Then st = 可以構(gòu)成一個(gè)直角三角形ElseIf Then st = 可以構(gòu)成一個(gè)等邊三角形Else st = 可以構(gòu)成一個(gè)不等邊斜三角形End IfLabel1.Caption = End Sub（1）請(qǐng)?jiān)趧澗€(xiàn)處填入合適代碼（2）下列表達(dá)式與“Not (a + b c And b + c a And c + a b)”等價(jià)的是 （填字母）。A. a + b = c Or b + c = a Or c + a = bB. a - b = c And b - c = a And c - a = bC. a + b = c And b + c = a And c + a a(i + 1) Then k = k + 1 Else k = 1（1） If k max Then k = max（2）Next iText2.Text = Str(max)End Sub18.三次函數(shù)的圖像如下圖所示。 從圖像中觀(guān)察得到，在0,4區(qū)間內(nèi)，分別存在一個(gè)局部極大點(diǎn)P（在P附近的函數(shù)值都小于f（P）和局部極小點(diǎn)Q（在Q附近的函數(shù)值都大于f（Q）。尋找P和Q近似值的方法如下：在0,4區(qū)間內(nèi)，每隔e（e=0.001）取一個(gè)值逐一枚舉，如果找到某個(gè)值x，能同時(shí)滿(mǎn)足f（x） f（x-e）和f（x） f（x+e），在x可作為P的近似值；如果找到的某個(gè)值x，同滿(mǎn)足f（x） f（x-e）和f（x） a And b c Then Label1.Caption = 當(dāng)x= + Str(x) + 時(shí)，函數(shù)的極大值的近似值= + Str(b) End If If (2) Then Label2.Caption = 當(dāng)x= + Str(x) + 時(shí)，函數(shù)的極小值的近似值= + Str(b) End If a = b: b = cNext xEnd Sub第卷選考模塊（共45分）A算法與程序設(shè)計(jì)一、選擇題：本大題13小題，每小題2分，共26分。題號(hào)l2345678910111213答案CDBADDCABCBAC二、綜合題：本大題5小題，其中第14小題2分，第15小題4分，第16小題5分，第17小題4分，第18小題4分，共19分。14.1