1.1計算機解決問題的過程ー、單項選擇題.利用計算機解決問題的過程中,“找出已知和未知,明確它們之間的關(guān)系,列出數(shù)學(xué)表達式”屬于以下哪ー個步驟（ ）。A,設(shè)計算法B.分析問題C.編寫程序D,調(diào)試運行程序答案.要進行元旦晚會比賽,學(xué)校請你設(shè)計一個能夠?qū)υ┩頃?jié)目分數(shù)自動排序的軟件,你接到任務(wù)后,準備開始設(shè)計此軟件,比較好的方法和步驟是?（ ）。A.設(shè)計算法,編寫程序,提出問題,調(diào)試程序B.分析問題，編寫程序，設(shè)計算法，調(diào)試程序C.分析問題,設(shè)計算法,編寫程序,調(diào)試程序D.設(shè)計算法,提出問題,編寫程序,調(diào)試程序答案.程序編好以后,計算機無法檢查出來的錯誤是?（A.編譯錯誤B.執(zhí)行錯誤C.邏輯錯誤D.語法錯誤答案1.2算法和算法的描述一、單項選擇題1.以下不是算法特征的是（）。A.有窮性B.確定性和可行性C.輸入和輸出D.高效

2.在流程圖的基本圖形中,菱形表示（）。A.開始/結(jié)束B.輸入/輸出C.處理D.判斷答案3.以下說法正確的是（）。A,算法就是程序B.數(shù)據(jù)結(jié)構(gòu)就是程序C.算法+數(shù)據(jù)結(jié)構(gòu)=程序D,算法就是解決問題的方法答案二、簡答題.分別用算法的三種描述方式描述下列:某圖書城書籍促銷,一次購買100元以上書籍8折,100元以下9折。提示(ttT).閱讀程序框圖,若輸入m=4,n=3,則輸出a=,i=(ttT)3程序與程序設(shè)計語言單項選擇題.在下面給出的各項中,屬于機器語言的是（）。x=10+l011011000000000000000001110101CLA00017X=X+1答案.程序設(shè)計語言的發(fā)展經(jīng)歷了從（ ）一匯編語言一高級語言的過程。A.自然語言B.機器語言D.低級語言答案.編譯方式是先（）,再執(zhí)行。A,翻譯整個程序B.逐句翻譯C.翻譯一條執(zhí)行一條D.直接執(zhí)行答案.不屬于程序三種基本結(jié)構(gòu)的是（ ）。A.順序結(jié)構(gòu)B.選擇結(jié)構(gòu)C.循環(huán)結(jié)構(gòu)D,數(shù)據(jù)結(jié)構(gòu)答案5.“下雨在體育館上體育課,不下雨則在操場上體育課”,用算法描述這ー問題,合適的算法5.結(jié)構(gòu)是（A.順序結(jié)構(gòu)B.選擇結(jié)構(gòu)C.循環(huán)結(jié)構(gòu)D.D.數(shù)據(jù)結(jié)構(gòu)2.1VB語言及程序開發(fā)環(huán)境ー、單項選擇題A.B.A.B.C.D.Test@qw6cost_lcount2s.雙擊窗體中的對象后,VisualBasic將顯示的窗口是（）。A,工程窗口B,工具箱C.代碼窗口D.屬性窗ロ.VB提供控件的窗口是（）。A.工具欄B.布局窗口C.工具箱D.屬性窗ロ.在VB集成開發(fā)環(huán)境中,單擊工具欄中的 （啟動）按鈕可以進入（）。A,設(shè)計模式B,運行模式C,中斷模式D,設(shè)計代碼模式.在VB集成開發(fā)環(huán)境中,若不小心關(guān)閉了工程窗ロ,可依次點擊菜單欄的（）重新打開?！熬庉嫛癌`＞‘’工程資源管理器”“視圖”ー》“工程資源管理器”“工程”ー＞“工程資源管理器”“格式”ー〉“工程資源管理器”答案二、填空題.“根據(jù)圓的面積求其周長”程序的界面和代碼如下圖所示（s代表圓的面積、r代表圓的半徑、c代表圓的周長）：回答如下問題:回答如下問題:（1）根據(jù)VB程序的基本組成,程序代碼缺少部分;該部分的代碼應(yīng)為。（2）請定義ー個符號常量pi代表圓周率3.141592653：（3）請根據(jù)算法提示補充完整計算圓的半徑和周長的代碼（圓周率用第（2）小題的pi表示）:r=〇c=〇.“變量演示程序”的程序界面及代碼如下圖所示:CoBBandld1E工程CoBBandld1E工程1-FofbI(Code)|DimaAsInteger|「?txp+a%エ上cmmandlClick()a=11001Textl,text=a+2EndSub將“a=100”按下表中“代碼”列的要求依次修改,應(yīng)該如何修改變量類型說明語句才能使程序正常運行并得到預(yù)計結(jié)果?rr,ノ代碼預(yù)計結(jié)果如何修改類型說明語句?1a=100102Dimaasinteger2a=50000500023a=100.89102.894a=#2010-4-22#2010-4-245a="china中國”6a=true(1)第5行a="china中國”正確定義后程序仍不能正常運行的原因是:。(2)從第6行的代碼運行結(jié)果觀察,true在計算機中用表示,false用表示。答案.請計算表達式1+3*4mod15/3-2'3+14\9/3的值。提示9.請將數(shù)學(xué)公式翻譯成對應(yīng)的VB表達式。提示心|+#ム44*:2程序的順序結(jié)構(gòu)ー、單項選擇題“15”,則輸出的結(jié)果L執(zhí)行以下程序,在彈出的第1個輸入框輸入“10”,第2個輸入框輸入為“15”,則輸出的結(jié)果DimaAsInteger,bAsIntegera=InputBox（"輸入"，"a="）b=InputBox（"輸入"，"b="）Printa;"+";b;*=",a+ba+b=2510+15=25a+b=25答案A=C答案A=C：D=A；D=B”后,答案.已知A,B,C,D是整型變量,且都已有互不相同的值,執(zhí)行語句“B=8：其值相等的變量是（）。A,DA,CC,BB,A.要交換變量A和B之值,應(yīng)使用的語句組是（）。A=B：B=C：C=AC=A：A=B：B=CA=B：B=AC=A：B=A：B=C二、填空題4.有如下VisualBasic程序段:m=〃VB〃n=ist=easyt=m+n+t該程序段運行后,變量t的值為。答案2.3程序的選擇結(jié)構(gòu)ー、單項選擇題1.判斷X是否在區(qū)間（a,b］上,在VB中以下哪個邏輯表達式是正確的?（）A.a<x<=bB.a<xAndxWbC.a<xAndx<=bD.a>xAndx<=b答案2.設(shè)a=2,b=3,在VB中，表達式a>borb>=3的值是（）。falsetrueC.-lD.1答案3.執(zhí)行以下程序段后,整型變量c的值為（）。a=24b=328selectcaseb\10case0c二a*10+bcase1to9c二a*100+bcase10to99c=a*1000+bendselect537242724328240328答案二、多選題.下面是判斷變量X是不是能被5整除的偶數(shù)的程序,橫線上的邏輯表達式應(yīng)為()。DimxasIntegerX=Val(Textl.text)IfthenLabel1.Captionー這個數(shù)是能被5整除的偶數(shù)”ElseLabel1.Captionー這個數(shù)不是能被5整除的偶數(shù)”Endif(xmod5)=0and(xmod2)=0xmod10=0xmod5=0xmod2=0答案三、填空題.某市出租車計費標準規(guī)定:出租車啟動后行程不超過3千米(包含3千米)計費5元;如果行程超過3千米且不超過10千米(包含10千米),則超過3千米部分按1.5元/千米計費(3千米及以內(nèi)部分計費仍為5元);若行程超過10千米,則在前面計費基礎(chǔ)上,超出10千米部分按1.8元/千米計費。假定某出租車行程為x千米,計費標準如下:當x<3千米時,計費為5元;當3くxく10千米時,計費為5+(x-3)XI.5當x〉10千米時,計費為5+(10-3)X1.5+(x-10)X1.8解決此問題的算法流程圖如圖所示,相應(yīng)的VisualBasic程序如下,在程序①和②畫線處,填入適當?shù)恼Z句或表達式，把程序補充完整。PrivateSubCommandlClick()DimxAsSingle,sAsSinglex=InputBox(〃輸入"，"請輸入行程")If①Thens=5ElseIfx<=10Thens=5+(x-3)*1.5Else ② EndIfEndifPrintsEndSub程序中①畫線處應(yīng)填入程序中②畫線處應(yīng)填入答案四、編程題6.在“神州號”程序中,我們只判斷了飛船成功飛行的條件。當飛船速度繼續(xù)加大時,飛船將達到第二宇宙、第三宇宙速度……(見下表)。試編寫程序,輸入不同的飛船速度,判斷它的各種飛行狀況。飛船速度(V)單位(km/s)飛行狀況7.91<=V<11.19飛船繞地球似做勻速圓周運動11.19<=V<16.67飛船離開地球的控制,圍繞太陽轉(zhuǎn)レ>=16.67飛船掙脫太陽引力飛出太陽系答案2.4程序的循環(huán)結(jié)構(gòu)ー、判斷并改錯.閱讀以下程序段,請判斷是否有誤并修正。’程序運行結(jié)果:實現(xiàn)50至リ1的所有偶數(shù)的輸出Forj’程序運行結(jié)果:實現(xiàn)50至リ1的所有偶數(shù)的輸出PrintjNexta2.閱讀以下程序段,請判斷是否有誤并修正。i=1 ’程序運行結(jié)果:實現(xiàn)1到5的輸出DoWhilei<=5PrintiLoop答案3.閱讀以下程序段,請判斷是否有誤并修正。fori=lto5step1forj=lto10step1printi+jnextinextj答案二、讀程序?qū)懡Y(jié)果4.ForI=1To20Step1PrintI,IfIMod5=0ThenPrintEndIfNextI答案5.s=10Fori=1To5Step1j=i*2s=s+jNextiPrinti,s6.i=1DoWhilei<=5Printii=i+1Loopi=1DoWhilei<=5i=i+1PrintiLoopi=1DoPrintii=i+1LoopUntili<=5i=1DoPrintii=i+1LoopUntili>=5答案.Fori=1To3Step1Forj=1To4Step1Printi;j,NextjPrintNexti答案三、程序填空.用戶輸入一個大于3的正整數(shù)m,程序判斷該數(shù)是否為素數(shù)。PrivateSubcommandl_click()DimmAsIntegerDimiAsIntegerm=InputBox(“請輸入ー個數(shù):")i=2DoUntil_① i=i+1LoopIf_.②ThenPrintm;”不是素數(shù)〃ElsePrintm;〃是素數(shù)〃2.5模塊化程序設(shè)計ー、單項選擇題.下列自定義函數(shù)正確的是（）。PublicFunctionarea(aasinteger,basinteger,casinteger)assingleP=(a+b+c)/2area=sqr(p*(p-a)*(p-b)*(p-c))EndfunctionPublicFunctionarea(aasinteger,basinteger,casinteger)assingleP=(a+b+c)/2S=sqr(p*(p-a)*(p-b)*(p-c))EndPublicFunctionarea(aasinteger,basinteger,casinteger)assingleP=(a+b+c)/2S=sqr(p*(p-a)*(p-b)*(p-c))EndfunctionPublicFunctionarea(aasinteger,basinteger,casinteger)assingleP=(a+b+c)/2S=sqr(p*(p-a)*(p-b)*(p-c))Endfunction答案.已知利用海倫公式求三角形面積的過程如下:Privatesubarea(aasinteger,basinteger,casinteger,s)P=(a+b+c)/2S=sqr(p*(p-a)*(p-b)*(p-c))Endsub下列調(diào)用該過程正確的是( )。area(3,4,5,s)area3,4,5,sarea(3.1,4.2,5,5,s)area3.1,4.2,5.5,s二、簡答題.什么是“自頂向下、逐步求精”程序設(shè)計思想,其優(yōu)點有哪些?提示.模塊化程序設(shè)計思想的優(yōu)點是什么?提示3.1可視化編程的概念與方法單項選擇題.在VisualBasic工程設(shè)計中,雙擊窗體中的對象后,出現(xiàn)的是（ ）。A,工程窗口B,工具箱C.代碼窗口D.屬性窗ロ答案.在VisualBasic代碼窗口中,語句Student.Font="宋體"中的Student是（ ）。A.對象名B.屬性名C.屬性值D.窗口名.在VisualBasic代碼窗口中,語句Old.Caption="78"中的78是（ ）。A.對象名B.屬性名C.屬性值D.窗口答案4.要使一個命令按鈕顯示文字“確定”,正確的設(shè)置是把該命令的（ ）。A.屬性Font設(shè)置為“確定”B.屬性.ForeColor設(shè)置為“確定”C.屬性Caption設(shè)置為“確定”D.屬性BorderStyle設(shè)置為“確定”答案3.2程序調(diào)試的方法在程序設(shè)計過程中經(jīng)常出現(xiàn)四種類型的錯誤:編輯錯誤、編譯錯誤、運行錯誤和邏輯錯誤。請完成下面的題目,體驗各種錯誤類型。（點擊這里打開素材）.打開素材中的文件夾“ド,修改程序中編輯時的錯誤,實現(xiàn)輸入ー個三位數(shù),然后將其反向輸出。答案.打開素材中的文件夾“2”,請修改程序中編譯時的錯誤,實現(xiàn)用戶登錄程序。.打開素材中的文件夾“3”,請修改程序中運行時的錯誤,實現(xiàn)三角形面積的計算。答案.打開素材中的文件夾“4”,請修改程序中邏輯的錯誤,實現(xiàn)交換兩個變量的值。答案3.3綜合活動請根據(jù)題干描述的任務(wù)需求,按照模塊化程序設(shè)計的思想方法,進行程序設(shè)計。.請編寫ー個程序,讓計算機與我們ー起玩石頭、剪刀、布游戲。答案.隨機產(chǎn)生一個100以內(nèi)的整數(shù),讓用戶輸入猜想的數(shù)。如果猜對了,顯示正確的信息;如果猜錯了,顯示猜錯的信息,同時統(tǒng)計用戶猜想的次數(shù)。.圖片顯示程序。用單選框控制圖片的顯示和隱藏。答案用解析法設(shè)計程序一、單項選擇題.如要完成:從鍵盤輸入ー個正整數(shù),判斷是否是奇數(shù),如是就在屏幕上顯示。比較好的算法是()。A.①輸入的數(shù)存入n變量②f=(n\2=Int(n/2))③如果f的值為True就顯示n的值B.①輸入的數(shù)存入n變量②f=(n\2=Int(n/2))③如果f的值為False就顯示n的值C.①輸入的數(shù)存入n變量②如果n/2=Int(n/2)成立,就顯示n值D.①輸入的數(shù)存入n變量②如果n/2=Int(n/2)不成立,就顯示n值答案.a,b,c三個變量中存放不同的整數(shù),讓計算機處理一下,使:a中值最大,b中值第二。能實現(xiàn)此要求,并比較好的算法是( )。A.①定義ー個max(x,y)的函數(shù)(值為x,y中大的值)②a=max(max(a,b),c)③b=max(b,c)B.①如a<b就a=b②如a<c就a=c③如b<c就b=cC.①如a>b就a=b②如a>c就a=c③如b>c就b=cD.①如a<b兩變量值交換②如a<c兩變量值交換③如b<c兩變量值交換答案二、填空題3.以下VisualBasic程序的功能是:計算表達式1X3+2X3+3X3+…+100X3的值,并在文本框Textl中輸出計算結(jié)果。PrivateSubCommandlClickODimiAsInteger,sAsIntegers=0i=1DoWhilei<=100s=i*3i=i+1LoopTextl.Text=Str(s)EndSub問:(1)剛退出循環(huán)時,變量i的值是。(2)為了實現(xiàn)上述表達式的計算,程序中畫線處的表達式應(yīng)更正為。答案.以下VisualBasic程序的功能是:計算表達式1+3+9+27+81+…+2187的值,并在文本框Textl中輸出計算結(jié)果。PrivateSubCommandl_Click()DimiAsInteger,tAsLongt=0i=1DoWhilei<=2187t=t+ii=i+3LoopTextl.Text=Str(t)EndSub問:(1)為了實現(xiàn)這ー?目標,程序畫線處的表達式應(yīng)更正為。(2)運行更正后的程序,循環(huán)剛退出時變量i的值為。答案.將一個十進制正整數(shù)轉(zhuǎn)化為二進制數(shù)可以采用“除二取余法”,主要方法就是將十進制數(shù)用2除,保存所得余數(shù),然后將商的整數(shù)部分作為下次運算的被除數(shù),重復(fù)上述“除二取余”操作,直到商的整數(shù)部分為零停止。程序界面如圖VBT所示,在文本框Textl中輸入ー個正整數(shù),單擊“開始轉(zhuǎn)換”按鈕(Command1)后,對應(yīng)的二進制數(shù)在標簽Label3中顯示出來。解決此問題的算法流程圖如圖VB-2所示,相應(yīng)的VisualBasic程序如下,在程序①和②畫線處,填入適當?shù)恼Z句或表達式,把程序補充完整。PrivateSubConunandl_Click()DimxAsInteger,sAsString,rAsInteger,tAsInteger ① s=DoWhilex<>0r=xMod2s=Str(r)+sx=②LoopLabel3.Caption=sEndSub程序中①畫線處應(yīng)填入。程序中②畫線處應(yīng)填入。圖VB-1答案結(jié)束s-*-Str(r)+s將當前x被2除的余被保存到變量結(jié)束s-*-Str(r)+s將當前x被2除的余被保存到變量r將當前x被2除所得商的

整數(shù)部分保存到變量x圖VB-24.2用窮舉法設(shè)計程序ー、單選題.使用窮舉法解決問題,在列舉問題可能解的過程中,（A.不能遺漏,A.不能遺漏,B.不能遺漏,C.可以遺漏,D.可以遺漏,但可以重復(fù)也不應(yīng)重復(fù)但不應(yīng)重復(fù)也可以重復(fù)至至至至至至至至1122兔終如兔88882222至至至至1212題商稼稼んBcD答案.雞、兔共籠,有腿共60條,問雞、兔各有多少只?下面雞和兔的只數(shù)最合理的范圍是（）〇14141414二、程序填空題.有30個人,其中有男人、女人和小孩。他們在一家飯館里花去500元。已知:每個男人花30元,每個女人花20元,每個小孩花10元。問:男人、女人、小孩各為多少人?為了實現(xiàn)這一目標,完善下面的VB程序,在畫線處填入合適的語句或表達式,完成程序設(shè)計。PrivateSubCommandl_Click()DimmanAsInteger,womanAsInteger,childAsIntegerForman=1To ① Forwoman=1To ②child=(3)s=30*man+20?woman+10*childIf④ThenPrint”男人〃;man;〃女人〃;woman;"小孩’；child”EndIfNextwomanNextmanEndSub程序中①畫線處應(yīng)填入程序中②畫線處應(yīng)填入程序屮③畫線處應(yīng)填入程序中④畫線處應(yīng)填入答案編程題.尋找“水仙花數(shù)”。水仙花數(shù)是…組三位的正整數(shù),它們滿足條件:每一位上數(shù)字的立方之和恰好等于它自己。例如：153就是ー個水仙花數(shù),r3+5-3+3~3=153,請找出所有的水仙花數(shù)及個數(shù)。答案4.3查找算法設(shè)計ー、單項選擇題.小明編輯了一個文件,現(xiàn)在想繼續(xù)添加內(nèi)容,他應(yīng)該使用下列哪個語句?( )Open"文件名"forinputas#文件號Open"文件名"forappendas#文件號Open"文件名"foroutputas#文件號Open"文件名"forwriteagainas#文件號答案.已到達文件結(jié)束處,則下列哪個函數(shù)的返回值為true?()〇A.Bof()B.EndofOC.EndifOD.Eof()答案.有一文件只有一行,內(nèi)容如下:45,"hello",則下列哪個語句可以實現(xiàn)讓a=45,b$="hello"?()TOC\o"1-5"\h\zWrite #文件號,a, b$print #文件號,a, b$input #文件號,a, b$Lineinput#文件號,a,b$答案4.定義一個二維數(shù)組k(20,30),則其元素個數(shù)是()〇20X3021X3020X31D.21X31答案5.L=instr(3,"abcdeabcde","cde"),貝リL=(381D."cde"答案.下列哪個數(shù)列適合使用對半查找算法查詢數(shù)據(jù)?( )〇1,2,3,4,4,3,2,19,8,7,6,51,3,4,7,12,40,51,3,4,7,6,8,10答案二、程序填空題.有些人喜歡在網(wǎng)上收集別人的E-Mail地址,然后賣給別人非法獲利,現(xiàn)在小明想檢測ー下自己的E-Mai!地址xiaoming@21是否被人收集在"email,txt”中，但人工找太麻煩了,請你編制ー個程序幫他解決這個問題。PrivateSubruncheck_Click()Dima$,bAsIntegerOpen/zd:\email.txt/zForInputAs#1DoWhile(1)Input#1,a$Ifa$=emailaddress.TextThen(2)LoopIfb=1Thencheckresult.Caption="你的E-Mail地址已被收錄"Elsecheckresult.Caption="你的E-Mail地址未被收錄”EndIf(3)EndSub答案8.請用二分法計算方程f(x)=2x3+3x-3=0在區(qū)間［0,2］內(nèi)的ー個實根,要求精確到小數(shù)點后第2位。PrivateSubCommandl_Click()Dimx,xl,x2,resultl,result2,resultAsDoublexl=0x2=2resultl=2*xl*xl*xl+3*xl-3result2=2*x2*x2*x2+3*x2-3Ifresultl*result2<0ThenDox=(1)result=2*x*x*x+3*x-3If(2)Thenresultl=resultElsex2=xEndIfLoopUntilAbs(result)<=0.01PrintxElsePrint〃在「&xl&“J&x2&之間沒有根〃EndIfEndSub答案4.4排序算法設(shè)計ー、單項選擇題.對ー個數(shù)組進行排序一般用（）重循環(huán)來實現(xiàn)。A.單B.2C.3D.4答案.選擇排序的外循環(huán)次數(shù)是（ ）。A.NB.N+1 C.N-1 D.N+內(nèi)循環(huán)變量答案二、程序填空題.小明在輸入ー批人（10個）的年齡數(shù)據(jù),由于要計算養(yǎng)老金,因此希望能對這些年齡數(shù)據(jù)從小到大排列,你能用選擇排序法幫他的忙嗎?（要求每趟比較完成后オ交換一次數(shù)據(jù),而不是每次比較都要交換）PrivateSubconunandlClick()

Dima(lTo10)AsInteger,i,j,temp,temporderAsIntegerDimbasstringFori=1To10b=〃請輸入第"&i&〃個數(shù)〃a(i)=Vai(1)NextiFori=1To(2)temporder=iForj= (3)To10Ifa(j)<a(temporder)Then(4)Nextjtemp=a(i)a(i)=a(temporder)a(temporder)=tempNextiFori=1To10Printa(i);NextiEndSub答案4.從鍵盤上接收10個數(shù),接收過程請用插入排序法把該數(shù)列按從小到大來排序。PrivateSubrunprogram_Click()Dima(lTo(1) )AsInteger,i,j,k,tempAsIntegerDimba(l)Print

Print

Fori

b=

temp?答案4.從鍵盤上接收10個數(shù),接收過程請用插入排序法把該數(shù)列按從小到大來排序。PrivateSubrunprogram_Click()Dima(lTo(1) )AsInteger,i,j,k,tempAsIntegerDimba(l)Print

Print

Fori

b=

temp?asstring=Vai(InputBox(〃請輸入第1個數(shù)”))a⑴；=2To10〃請輸入第〃&i&〃個數(shù)〃=Vai(InputBox(b))Ifa(i-1)<tempThen

(2)ElseForj=1To(3)Ifa(j)>tempThenFork= (4)TojStep-1a(k+1)=a(k)Nextk(5)ExitForEndIfNextjEndIfFork=1ToiIfa(k)=tempThenPrinta(k),ヽ")",、ElsePrinta(k);EndIfNextkPrintNextiEndSub答案4.5遞歸算法與遞歸程序ー、判斷題.在定義一個過程或者函數(shù)時出現(xiàn)直接調(diào)用自身過程或自身函數(shù)的成分,稱為遞歸。（）答案.遞歸過程是指直接或間接調(diào)用自身的過程。（）答案.遞歸方法是指?種可以在無限步驟內(nèi),根據(jù)特定的法制或公式對ー—個或多個前面的元素進行運算,以確定一系列元素（如數(shù)或者函數(shù)）的方法。（）答案二、程序填空題.下面是求解1!+2!+ 100!和的程序。Functionq(nAsInteger)AsDoubleIf_①Then ,遞歸求解N!—②—

Else—③一EndIfEndFunctionFunctionf(nAsInteger)AsDoubleIf④ Then ，遞歸求解l!+2!+ +n!—⑤一Else—⑥一EndIfEndFunctionPrivateSubCommand1_C1ick()MsgBox”1!到100!的和"&f(100)EndSub答案答案5.閱讀程序,填寫結(jié)果。5.閱讀程序,填寫結(jié)果。Functiondg(ByValnAsInteger)AsLongIfn=1Thendg=1Elsedg=dg(n-1)+nEndIfEndFunctionPrivateSubCommandl_Click()Text1.Text=dg(100)輸出答案為。答案答案66.閱讀下列求3!+5!+7!的兩個程序:程序ー程序ーPrivateSubCommandl_Click()DimSAsInteger,KAsInteger,程序二PrivateSubCommand1.Click()DimSasIntegerS=Fac(3)+Fac(5)+Fac(7)DimTAsInteger,IAsIntegerS=Fac(3)+Fac(5)+Fac(7)T=1EndSubForK=2ToIPublicFunctionFac(AAsInteger)AsIntegerT=T*KIfA=0ThenNextKFac=lS=S+TElseNextIFac=A*Fac(A-l)Print"S=";SEndIfEndSubEndFunctionForI=3To7Step2Print"S=”;S請比較兩個程序:(1)程序1使用了算法。(2)程序1與程序2比較,從程序設(shè)計思想上看,有什么不同?答案二、程序設(shè)計題7.用遞歸算法設(shè)計程序:將數(shù)轉(zhuǎn)為字符串。答案5.1面向?qū)ο蟪绦蛟O(shè)計的基本思想ー、填空題.面向?qū)ο蟮?、?可以使軟件開發(fā)過程更為簡單、清晰,程序的復(fù)雜性不斷降低,正確性不斷加強,并且易于理解,修改和擴充。答案二、選擇題.與傳統(tǒng)的程序設(shè)計方法相比,面向?qū)ο蟪绦蛟O(shè)計有諸多優(yōu)勢,下列選項中哪個不是（）。A.可以用于解決軟件復(fù)雜性的控制B.可以提高軟件的生產(chǎn)カC.可以極大提高程序的運行速度和安全性D.可以使軟件開發(fā)過程更為簡單、清晰答案.VisualBasic是ー種面向?qū)ο蟮某绦蛟O(shè)計語言,構(gòu)成對象的三要素是:（A.屬性、B.控件、A.屬性、B.控件、C.窗體、D.窗體、事件、方法屬性、控件、控件、事件過程模塊答案三、判斷題.在面向?qū)ο笙到y(tǒng)的求解空間中,有對象和類,若把現(xiàn)實世界中的事物直接映射到面向?qū)ο蟮能浖到y(tǒng)求解空間,那么物質(zhì)對應(yīng)于對象,面意識對應(yīng)于類。（）答案5.2面向?qū)ο蟪绦蛟O(shè)計的基本概念ー、填空題.程序中的對象是把和封裝成一個整體，是程序運行時的基本實體，是含有數(shù)據(jù)以及對其操作的程序模塊。.在面向?qū)ο蟮某绦蛟O(shè)計中,將一組對象的共同特性抽象出來形成。二、選擇題.對于對象及其特征的錯誤理解是（）。A.對象都具有一個標識自己以區(qū)別其他對象的名字B.對象都具有自身的屬性及其屬性值C.對象?般只用數(shù)據(jù)表示屬性,但不用代碼表示行為D.對象都具有自身的行為（操作）答案.在如下圖所示的VisualBasic窗體中,這些被放入窗體中的控件稱之為（）。A.類B.事件C.屬性D,對象答案.下列有關(guān)類、對象和實例的說法中,錯誤的是（）。A.類是對象的模型,根據(jù)同一個模型可以建立相同的對象B.對象是類的具體化,是類的實例C.由類創(chuàng)建對象的過程稱為實例化，每個對象是類的ー個實例D.類是具體的事物,以對象為模板來生成答案三、判斷題.類和對象之間的關(guān)系是抽象和具體的關(guān)系。（）答案.VisualBasic中的對象就是指控件。（）答案5.3面向?qū)ο蟮墓δ軐崿F(xiàn)ー、填空題.VB中創(chuàng)建一個方法的步驟:答案二、選擇題.每次使用ー個類的新對象時,都必須進行以下工作,其中錯誤的是（）。A.創(chuàng)建對象B.創(chuàng)建類C.使用對象的屬性和方法D.釋放對對象的引用答案.VB面向?qū)ο蟮某绦蛟O(shè)計一般過程是（）。A.編寫類代碼ー類聲明為對象變量一根據(jù)類創(chuàng)建對象實例ー對實例進行屬性和方法的設(shè)置或調(diào)用B.類聲明為對象變量一根據(jù)類創(chuàng)建對象實例ー編寫類代碼ー對實例進行屬性和方法的設(shè)置或調(diào)用C.根據(jù)類創(chuàng)建對象實例ー對實例進行屬性和方法的設(shè)置或調(diào)用ー編寫類代碼ー類聲明為對象變量D.編寫類代碼ー根據(jù)類創(chuàng)建對象實例ー類聲明為對象變量T對實例進行屬性和方法的設(shè)置或調(diào)用三、判斷題.VB中作用域關(guān)鍵字Private表明可以在類外部調(diào)用代碼,Public表明只能調(diào)用類中的代碼。()答案四、操作題.設(shè)計一個模擬手電筒光照效果的程序。(具體操作任務(wù)、素材、提示請下載手電筒操作題壓縮包)6.1多媒體應(yīng)用程序設(shè)計單項選擇題.MediaPlayerl.DisplaySize=mpFitToSize具有的功能是（ ）〇A.使視窗全屏顯示B.使視窗大小為原始大小C.使視窗大小為原始大小的1/4屏幕D.使視窗大小由控件的高度、寬度決定答案.結(jié)束當前程序的語句是（）〇A.quitB.exitC.endD.sub答案.在用菜單編輯器設(shè)計菜單時,必須輸入的項有（）〇A.快捷鍵B.標題C.索引D.名稱答案6.2數(shù)據(jù)庫管理軟件的開發(fā)ー、單項選擇題1.Datal屬性Database的作用是（ ）〇A.指定Data!的控件名B,用于指定Datal控件所鏈接的數(shù)據(jù)庫中的某ー張表C.用于指定要鏈接的數(shù)據(jù)庫的完整路徑信息D,用于指定數(shù)據(jù)控件要鏈接的數(shù)據(jù)格式.如果想在Datal控件中實現(xiàn)査找第一個姓謝的記錄,應(yīng)如何設(shè)置（）〇Datal.Recordset.FindFirst"姓名"Like’謝?'Datal.Recordset.FindFirst"姓名"as’謝?'Datal.Recordset.FindPrevious"姓名"Like，謝?'Datal.Recordset.FindPrevious"姓名"as，謝?'答案.如果想在Datal控件中實現(xiàn)移動到前ー筆記錄的功能,應(yīng)如何設(shè)置（ ）〇Datal.Recordset.MoveLastDatal.Recordset.MoveNextDatal.Recordset.MovePreviousDatal.Recordset.MoveFirst答案.下列數(shù)據(jù)控件的常用方法不正確的是（）。AddNew 添加一筆記錄Delete 刪除記錄當前內(nèi)容Refresh 更新數(shù)據(jù)控件的數(shù)據(jù)內(nèi)容Edit 將可更新記錄的當前記錄內(nèi)容復(fù)制至緩沖區(qū)中以便進行編輯操作答案二、程序設(shè)計題.某校學(xué)生都很喜歡看書,為了讓全校同學(xué)都能共享每個同學(xué)所擁有的圖書,小李同學(xué)帶頭設(shè)立了一個小小圖書館。現(xiàn)在他們想通過數(shù)據(jù)庫來管理他們的小圖書館,可他們現(xiàn)在還沒學(xué)到這方面的知識,請你就這情況幫他們設(shè)計這個數(shù)據(jù)庫,你會怎么做?答案《算法與程序設(shè)計》測試題（一）考試時間:90分鐘滿分:100分ー、單項選擇題:（共20個空,每空2分,共40分）.使用計算機解題的步驟,以下描述正確的是（ ）。A,正確理解題意ー設(shè)計正確算法一尋找解題方法T編寫程序T調(diào)試運行B,正確理解題意T尋找解題方法一設(shè)計正確算法一編寫程序T調(diào)試運行C,正確理解題意ー尋找解題方法一設(shè)計正確算法一調(diào)試運行T編寫程序D,正確理解題意T設(shè)計正確算法一尋找解題方法一編寫程序ー調(diào)試運行2.下列算法展示了一臺自動售貨機一次售貨的工作流程:步驟1:等待接收一枚硬幣;步驟2：若硬幣面值不是0.1元、0.5元、1元,退回硬幣;步驟3：若投入貨款達1.5元或以上，執(zhí)行步驟4和5；步驟4:售出ー個口香糖;步驟5：從接收貨款中減去1.5元;步驟6;退回余額。下列關(guān)于這個算法說法正確的是（）。A.上述算法采用自然語言表示B?這臺自動售貨機在任何情況下也不會售出口香糖C,上述算法屬于順序算法結(jié)構(gòu)D.這臺自動售貨機只會在接受硬幣達2元時オ放出口香糖3.VisualBasic規(guī)定窗體文件的擴展名是（）〇.for,frmC..vbpD..bas.假設(shè)某ー程序如下,則能觸發(fā)該程序的事件是（）。PrivateSubcommand2_Click（）Forml.Caption="VB示例”EndSubcommand2clickform1caption.下列結(jié)果為True的邏輯表達式是（）。Not（3<8）(3<8)And(5>10)(3<8)And(5<10)(3>8)Or(5>10).以下語句中正確的是()。Constvarlasinteger=50000Dim888flasStringx+y=9Dimd(lto500)AsDouble.在VB中,添加一個標簽,在工具箱中要單擊控件是()。A..下列運算結(jié)果中,值最大的是()。3\43/44mod33mod4.表達式abs(int(—3.4))*sqr(100)的值是()。-340-343040.若i=l,j=9,則運行Printi;j;i*j的結(jié)果是()〇1*9=9i*j=9C. . ? ?土?.1*J=1*J9.下列VisualBasic程序段運行后,變量max的值為()。a=5b=10max=aIFb>maxThenmax=bA.5105和10D.以上都不是12,下列四種描述中,符合以下程序的是()。fork=llto20x=inputbox（“請輸入ー個整數(shù)”）y=xA2nextprintx,yA.讀入10個不同的x值,只計算最后ー個y值,只輸出最后ー個x,yB.讀入10個不同的x值,計算10個不同的y值,輸出10個不同的x,y值C.只讀入ー個x值,進行10次相同的運算,輸出10個相同的x,y值D.讀入10個不同的x值,計算10個不同的y值，只輸出最后ー個x,y值13.下列程序段中可以輸出整數(shù)1-5的是（）。A.i=1DoWhilei>5i=i+1PrintiLoopB.i=1DoWhilei<=5i=i+1PrintiLoopC.i=1DoWhilei<=5Printii=i+1LoopD.i=1Dountili<=5Printii=i+1Loop.執(zhí)行下面程序段的結(jié)果是（）。n=6ford=ltonIfnmodd=0thenprintd;endifnextd161231236123456.閱讀下面的程序段:a=0Form=lTo3Forn=lToma=a+lNextNext執(zhí)行上面的程序后,a的值為（）〇3569.關(guān)于模塊化程序設(shè)計以下說法中錯誤的是（）。A,模塊化程序設(shè)計體現(xiàn)了“自頂而下、逐步求精”的程序設(shè)計的基本思想B.模塊化程序設(shè)計主要通過過程和函數(shù)的定義和調(diào)用來實現(xiàn)C,模塊化程序設(shè)計可以提高程序運行速度D,模塊化程序設(shè)計有利于程序的的閱讀和修改.有一組數(shù),順序是“4,7,8,1,9”,用選擇排序法將這組數(shù)從小到大排序,第二次交換數(shù)據(jù)后的順序是（）。1、4、7、8、91、4、8、7、91、7、8、9,41、7、8、4、918.下列表述中不含遞歸現(xiàn)象的是（）。A,站在兩面平行的鏡子中間照鏡子,鏡子中的影像成“像中像’‘B.定義自然數(shù):0是自然數(shù)，比自然數(shù)大1的數(shù)是自然數(shù)C.乘法九九表D.“從前有個廟，廟里有個老和尚在給小和尚講故事,老和尚說:‘從前有個廟，廟里有個老和尚在給小和尚講故事,老和尚說:…