計算機程序設(shè)計語言寫程序部分復(fù)習(xí)

1、算法與程序設(shè)計復(fù)習(xí)簡單算法歸納：.“四舍五入問題”一一利用Int函數(shù)實現(xiàn)四舍五入功能例如：Int(x*100+0.5)/100保留兩位小數(shù).“交換兩個變量內(nèi)容問題”一定要引入第三個變量，并注意次序X=3Y=2T=XT=X+YX=Y或者X=YY=TY=T-X.整除(倍數(shù))問題”一一余數(shù)為零(3種方法)方法1:xMody=0方法2:Int(x/y)=x/y方法3:x/y=xy.計數(shù)問題“一一統(tǒng)計符合條件的個數(shù)，初值=0每次自身加1例如:統(tǒng)計出1001000之間所有11倍數(shù)的個數(shù)的下列程序=0Forn=100To1000IfnMod11=0Thens=s+1NextnPrints5.:累加問題“一一

2、符合條件的數(shù)字累加，初值=0累加格式類似sum=sum+1.例如：計算1+1/3+1/5+1/7+99值的程序段S=0累加的初值必須=0Fork=1to99step2fo循環(huán)的開頭，步長設(shè)置為2,即每次k的值加2S=s+1kNextkFOS環(huán)的結(jié)尾6、累乘問題“一一符合條件的數(shù)字累乘，初值=1,累乘格式類似s=s*k例如：計算1*4*7*10*13*17*20T=1Fork=1to20step3T=T*kNextkPrintT選擇題16.下列數(shù)據(jù)中，屬于字符串常量的是哪一項？（）A.ABCB.“123C.FalseD.2*x+523.函數(shù)Abs（x）的功能是下列選項中的哪一項。（）A.求X的平

3、方B.求X的算術(shù)平方根C求X的絕對值D.求不大于X的最大整數(shù)24.下列選項中的哪一項不屬于程序設(shè)計高級語言。（）A.WordB.VBC.PascalD.C+接下來的步驟是下列選34.用計算機解決問題時，首先是分析問題，然后是設(shè)計算法,項中的哪一項。（）A.編寫程序B.輸入程序C得到答案D.調(diào)試運行程序.人們利用計算機解決問題的基本過程一般有如下四個步驟（），請按各步驟 TOC o 1-5 h z 的先后順序在下列選項中選出正確的答案（）調(diào)試運行程序設(shè)計算法分析問題編寫程序A.B.C.D.下列流程圖符號屬于判斷框的是（）A./BB.C.DD.在VB語言中，下列數(shù)據(jù)屬于字符串常量的是（）A.abc

4、B.TotalC.1/2D.123”.下面是“輸入兩個數(shù)，將其中值最大的數(shù)存入max”的算法：第1步：輸入兩個數(shù)a,b。第2步：如果a大于b,則將a的值賦給max,否則將b的值賦給max。第3步：輸出max的值。關(guān)于這個算法，說法正確的是（）A.上述算法是用自然語言描述的B.上述算法是用流程圖描述的C.上述算法是順序算法結(jié)構(gòu)D.上述算法是用偽代碼描述的.在VB語言中，以下函數(shù)運算中結(jié)果不是4的是（）A.Int（4.1）B.Len（信息技術(shù)）C.Abs（-4.1）D.Sqr（16）非選擇題補充完善下列程序段（每小題3分，共12分）。從鍵盤輸入圓的半徑R,輸出圓的周長L和面積S。DimRAsSin

5、gleDimLAsSingleDimSAsSingle=InputBox（輸入半徑R）L=2*3.14*RS=3.14*R*RPrint”圓的周長L=;LPrint”圓的面積S=;S計算旅客的行李費，收費標準為：20千克以下（包括20千克）不收費,超過20千克的部分每千克收20元。X表示行李重量，Y表示行李費。DimXAsSingleDimYAsSingleX=InputBox（輸入行李重量）IfThenY=0ElseY=20*（X-20）EndIfPrint行李費=;Y求s=2+4+6+100之和。DimiAsIntegerDimsAsIntegers=0Fori=2To100Step2s=

6、NextiPrints輸出100以內(nèi)（包含100）能被3整除的數(shù)。DimIAsIntegerI=1DoIfIMod3=0ThenPrintIEndIfI=I+1LoopUntil4.有一張單據(jù)上有一個5位數(shù)的號碼67DD8,其中百位和十位上的數(shù)字看不清了，但知道該數(shù)能夠被78整除，也能被67整除，下面是用窮舉法求出該號碼的程序段：DimaAsInteger,bAsIntegerDimnAsLongFora=0To9Forb=0Ton=67008+*100+b*10IfnMod78=0nMod67=0ThenPrintEndIfNextbNexta請將應(yīng)填寫的內(nèi)容寫在下面相應(yīng)的空格內(nèi)并運行程序?qū)?/p>

7、出該號碼（每空3分,共12分）。.編寫程序計算表達式a=|-3.6|+123Xsin67的值（圓周率n的值取3.14,計算結(jié)果用取整函數(shù)保留整數(shù)部分，每小題4分，共12分）。|-3.6|寫成VB表達式應(yīng)為：sin67寫成VB表達式應(yīng)為：在VB環(huán)境下編寫程序并運行：PrivateSubCommand1_Click()DimaAsSinglea=Abs(-3.6)+123*Sin(67*3.14/180)a=Int(a)PrintaEndSub該程序的運行結(jié)果是：.啟動VB,打開工程文件“C:MyExamVB6.vbp，完成如下算法設(shè)計：該程序的功能是求S=10+20+30+100請將程序缺失部分

8、”補充完整，并將“字符刪除，正確運行程序后，保存文件并退出VBoPrivateSubCommand1_Click()DimSasSingleDimiasIntegerFori=10To100StepDS=NextiPrintSEndSub.啟動VB,打開工程文件“C:MyExamVB1.vbp，完成如下算法設(shè)計：以已知變量X的值是1987,下列程序的功能是求X的各位數(shù)字之和S,其中a存放的事個位數(shù)字，b存放的是十位數(shù)字，c存放的是百位數(shù)字，d存放的事千位數(shù)字。請將程序缺失部分“一”補充完整，并將“一”字符刪除，正確運行程序后，保存文件并退出VBoPrivateSubCommand1_Click()DimaasIntegerDimbasIntegerDimcasIntegerDimdasIntegerDimXasIntegerDimSasIntegerX=1987a=b=c=d=S=a+b+c+dPrintSEndSub.啟動VB,打開工程文件“C:MyExamVB4.vbp，完成如下算法設(shè)計：編寫一元二次方程X2+3X+2=0的求解程序，要求能夠判斷方程是否有限，如果沒有根則給出相應(yīng)的提示信息。請將程序缺失部分“一”補充完整，并將“一”字符刪除，正確運行程序后，保存文件并退出VB。