版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領
文檔簡介
第一套(算法某些)23、下列選項中,關于算法描述對的是(
)。A算法只能用自然語言描述B算法必要在有限環(huán)節(jié)內實現(xiàn)C算法就是一種高檔程序設計語言D算法可以有0個或各種輸入,但只能有一種輸出24、下列選項中,能作為VB程序變量名是(
)。AwhileB4A123Ca%cDdist25、如下程序段執(zhí)行后,輸出成果為()。
m=29
IfmMod3<>0
ThenPrint
m
&
“不能被3整除”
ElsePrint
m
&
“能被3整除”
End
If
An能被3整除
Bn不能被3整除
C29不能被3整除
D29能被3整除
26、下列VB表達式中,值為字符串類型是(
)。(1)Abs(x)(2)Text1.Text(3)”123+45”(4)Sqr(x)
(5)Labell.CaptionA(1)(3)(5)B(2)(3)(5)C(2)(4)(5)D(1)(2)(3)27、在VB中,下列哪個選項是對的賦值語句?()A=xB5s=80
Ca+b=cDs=s+528、閱讀程序,寫出運營成果DimnAsIntegern=Val(InputBox(“n=”))DoWhilenMod2=0n=n\2LoopPrintn程序運營時,輸入24,輸出n值是:______29、分析并完善程序如下是計算s=1+6+11+…+101程序代碼,請完善程序。
DimsAsInteger
DimiAsInteger
s=0
Fori=1To101Step__________
s=____________
Nexti
Prints30、算法設計與程序實現(xiàn)某市出租車收費原則如下:
(1)3公里內(含3公里),收費8元;
(2)超過3公里但未超過6公里某些,按1.5元/公里收費;
(3)超過6公里某些,按2.25元/公里收費。依照以上原則,輸入出租車行駛公里數(shù),請計算顧客需付費多少元?【參照代碼】DimsAsSingle
DimpAsSingle
s=Val(InputBox(“s=”))Ifs<=3Then
p=8End
IfIf______________Then
p=1.5*(s-3)+8EndIfIfs>6Then
p=2.25*(s-6)+1.5*3+8EndIfPrintp
依照上述回答下列問題:1、本題采用算法是__________(填寫:解析法/查找法/枚舉法/排序法)。2、程序代碼中空白處應填寫條件是____________(填寫字母:A/B/C/D).A3<s≦6B3≦s≦6
C
s>3Ands<=6
Ds>3Ors<=6
第二套(算法某些)23、設a=2,b=5,在VB中,表達式a>bAndb>3值是(
)。A1B-1CFalseDTrue24、如下程序段運營后,x和st值分別是(
)。
Dim
x
As
Integer
Dim
st
As
String
x=123+678
st=”123”+”678”A
123678
“123678B
801
“123678C
123678“801D
801“80125、用流程圖表達條件“A>B”與否成立,要用到如下哪個圖形?(
)A
平行四邊形B
菱形C
圓角矩形直角矩形D
26、下列選項中,能作為VB程序變量名是(
)。A
dimB3abCa*bDxy27、如下程序段運營后,
s值是(
)。n=0s=0Do
While
s<=10
n=n+3
s=s+nloop
A30B18C0D328、閱讀程序,寫出運營成果Dima(10)
As
Integer
DimiAsInteger
a(1)=1
a(2)=1
Fori=3To6
a(1)=a(i-1)+a(i-2)
Next
i
Printa(6)
上述程序運營后,輸出a(6)值是_________________________。(6分)29、分析并完善程序如下是計算s=1*2*3*…*10程序代碼,請補全程序。(6)
DimsAsLong
DimiAsInteger
s=__________
Fori=1To10
s=__________
Nexti
Prints30、算法設計與程序實現(xiàn)
勾股數(shù)求出100以內滿足a<b所有勾股數(shù)?!緟⒄粘绦颉緿imaAsIntegerDimbAsIntegerDimcAsIntegerFora=1To100
Forb=1To100
Forc=1To100If________Then
Printa;b;cEndIf
Nextc
NextbNexta1、本題采用算法是__________(填寫:解析法/枚舉法/排序法/遞歸法)。2、程序代碼中空白處應填寫條件是________(填寫字母:A/B/C/D).A
a<b
And
a2+b2=c2B
a<b
Or
a2+b2=c2C
a<b
Anda^2+b^2=c^2D
a<b
Or
a^2+b^2=c^2第三套(算法某些)23、下列選項中,能作為VB程序變量名是(
)。A、s+1B、3stuC、trueD、s124、下列哪個程序段運營成果如圖1所示?()************************
圖1A、
for
i=1
to5Forj=1
to
6
Print”*”
next
j
nextiB、
for
i=1
to5fori=1
to
6print”*”next
i
printnext
i
C、
for
i=1
to5Forj=1
to
6Print”*”next
j
printnextjD、
for
i=1
to5Forj=1
to
6Print”*”next
j
printnexti25、在VB中,Int(x)
函數(shù)功能是返回不不不大于x最大整數(shù),設a=3
,b=4,c=5,則下列表達式運算成果中值最大是(
)。A、Sqr(c)B、
Abs(a-b)C、Int(2*a-c/b)D
、a^2+b^2-c^226、在VB中,用變量code存儲學生借閱卡編碼(code=”N00502”),則變量code
數(shù)據類型應定義為(
)。A
IntegerB
DoubleC
StringD
Single27、VisualBasic程序設計語言屬于(
)。A、匯編語言B、自然語言C、高檔語言D、機器語言28、閱讀程序,寫出運營成果DimiAsIntegerDimxAsIntegerDimyAsIntegery=30Fori=1
To
3x=Val(InputBox(“x=”))If
y<xThen
y=xEnd
IfNext
iPrint
y程序運營后,依次輸入:36
87
51運營后輸出成果是_________________。(6分)29、算法設計與程序實現(xiàn)(拖動滾動條瀏覽所有試題內容,點擊右側圖標可切換輸入法)GDP增長問題
某省GDP是6.7萬億元,如果每年按7%比例增長,問多少年后來此省GDP超過15萬億?【算法分析】
假設n
年后此省GDP超過15萬億元,依照題意得出數(shù)學關系式?求最小n。【參照程序】
Dim
p
As
Single’p用于記錄GDP值
Dim
r
As
Single
’r用于記錄GDP年增長比例
Dim
n
As
Integer
’n用于記錄年數(shù)
p=6.7r=0.07n=0DoWhile_________
p=p*(1+r)
n=n+1LoopPrint
n&
”年后,GDP值超過15萬億元?!币勒丈鲜龌卮鹣铝袉栴}:(共6分,每空3分)1、
本題采用算法是______________(填寫:解析法/枚舉法/排序法/遞歸法)。2、
寫出程序中空白處表達式_______________________________。30、算法設計與程序實現(xiàn)判斷車牌單雙號【背景知識】
為了保障空氣質量,減少霧霾,某市決定當空氣污染嚴重時,實行汽車單雙號限行,違背規(guī)定車輛將予以懲罰。如何讓高清攝像頭自動判斷車牌單雙號,交警犯了愁,她需要編程高手你幫忙,完善下面程序。(提示:(1)所有車牌號中都具有數(shù)字,并且車牌號長度都是6;(2)以車牌中最后一位阿拉伯數(shù)字奇、偶來決定單雙號。)
(1)輸入:AD2367(2)輸入:A8888A(3)輸入:A8963C輸出:單號輸出:雙號輸出:單號【算法描述】自然語言流程圖第1步:輸入車牌號第2步:取車牌號最后一位x;第3步:判斷x與否為數(shù)字,如果是,轉第4步;如果不是,則依次獲得倒數(shù)第二、三……位判斷,懂得找到數(shù)字為止;第4步:判斷x
是奇數(shù)還是偶數(shù),然后輸出相應成果。
開始請依照上述算法描述補全代碼
DimnAsInteger
DimsAsString’定義s
為字符串類型
DimxAsString
s=InputBox(“s=”,s)‘將輸入車牌號賦值給s
n=6‘車牌號長度為6
x=Mid(s,n,1)‘取車牌號s第n位
DoWhilex<”0”O(jiān)rx>”9”‘x不是數(shù)字字符,則取x前一位_______①_______x=Mid(s,n,1)‘取車牌號s第n位
Loop
If_______②_______then
Print“雙號”Else
Print“單號”EndIf(提示:Mid(s,m,n)功能:從字符創(chuàng)S第m位開始,截取長度為n子串。例如:Mid(“A8963C”,5,1)返回值是“3”
請完善上述程序:(共8分,每空4分)1、
依照題意,程序中空白①處應填寫:_______________________________
。2、
依照題意,程序中空白②處應填寫:______(填寫字母:A/B/C/D)。A、Val(x)\2=0
B、Val(x)Mod2=1C、Val(x)Mod2=0
D、Val(x)Mod2<>0
第四套(算法某些)23、一下程序段運營后,y值是(
)。
x=3
Ifx>3
Then
y=2*x
Else
y=3*x+1endifA25B26C10D524、某晚會猜數(shù)字游戲中,有100張寫有1~100之間整數(shù)卡片,主持人隨機抽取一張卡片,讓人們競猜。有一種方案是:第一次猜50,若提示低了,則第二次猜75,若提示還是低了,則第三次猜87,依次類推;若第一次猜50,提示高了,則第二次猜25,若提示還是高了,則第三次猜12,依次類推;……。這種每次縮小一半查找范疇而達到迅速擬定目的算法稱為(
)。A
順序查找法B
排序法C
解析法D
二分查找法25、在平面直角坐標系中,設點A(x1,y1)、點B(x2,y2),則AB兩點之間距離為:VB表達式是(
)。A
Sqr((x1-x2^2+(y1-y2)^2)B
Sqr[(x1-x2)^2+(y1-y2)^2]C
Sqr((x1-x2)2+(y1-y2)2)D
Sqr[(x1-x2)2+(y1-y2)2]26、下列語句正擬定義了一種單精度實型變量x
是(
)。ADimxAsSingleB
其他三項都不對CDimxAsIntegerDDimxAsString27、在VB中表達“x
屬于區(qū)間[a,b)”對的表達式是(
)。Aa<=xAndx<bBa<=xOrx<bC
a≦xAndx<bDa<=x<b28、閱讀程序,寫出運營成果
DimsAsInteger
DimiAsInteger
s=0
Fori=1To10Step4Print“#”;s=s+i
Nexti
Prints
上述程序運營后,輸出“#”個數(shù)是__________;輸出s值是________。(共6分,每空3分)29、閱讀程序,寫出運營成果
DimaAsInteger
DimbAsInteger
DimrAsInteger
a=98
b=63
r=aModb
DoWhiler<>0
a=b
b=r
r=aModb
Loop
Printb
程序運營后,輸出成果為:___________________。(6分)30、算法設計與程序實現(xiàn)
拖動滾動條瀏覽所有試題內容,點擊右側圖標可切換輸入法
換錢問題要將一張100元鈔票,換成等值5元、2元、1元一張鈔票共50張。其中一種換法如下:5元:3張2元:38張1元:
9張求出所有換錢方案?!舅惴ㄔO計】x表達5元張數(shù):1≦x≦20;y表達2元張數(shù):1≦y≦50;z表達1元張數(shù):1≦z≦100.【參照程序】DimxAsIntegerDimyAsIntegerDimzAsIntegerForx=1To20Fory=1To50Forz=1To100
If______________ThenPrintx;y;z
’xyz之間以分號分隔
EndIfNextzNexty
Nextx依照上述回答下列問題:(8分,每空4分)1、本題采用算法是_____________(填:解析法/枚舉法/排序法/遞歸法)。2、程序代碼中空白處應填寫條件是_______________(填寫字母:A/B/C/D)。A
5x+2y+z=100Or
x+y+z=50B
5x+2y+z=100Andx+y+z=50C
5*x+2*y+z=100Orx+y+z=50D
5*x+2*y+z=100And
x+y+z=5
第五套(算法某些)23、在VB中,下列屬于字符串常量是()。
Acnt
B3.14
C
D“Visual
Basic”24、將數(shù)學表達式轉化為VB表達式,下列選項對的是(
)。
25、以10下程序段運營后,整型變量s值是(
)。
s=1
Fori=1To10Step3
s=s*i
Next
i
s
A
55
B
3640
C
28
D
28026、
如下程序段運營后,整型變量max1,min1值分別是(
)。
a=3
b=5
max1=(a+b)/2+Abs(a-b)/2
min1=(a+b)/2-Abs(a-b)/227、給定一種四位數(shù)年份,判斷它與否為閏年:四年一閏、百年不閏;四百年又閏(年份能被4整除但不能被100整除是閏年,或者年份能被400整除也是閏年。例如和都是閏年,21不是閏年)。下列判斷年份。下列判斷年份y是閏年表達式對的是(
)。
AyMod4=0OryMod100<>0AndyMod400=0
ByMod4=0
CyMod4=0AndyMod100<>0OryMod400=0
DyMod400=028、分析并完善流程圖執(zhí)行流程圖,當輸入x值為4時,輸出y值為2,則菱形判斷框中條件也許為________(填寫字母:A/B/C/D6分)。Ax>3
B
x>4Cx<=4
D
x<=529、分析并完善程序
如下是計算s=12+22+32+…+1002程序代碼,請補全程序。(共6分,每空3分)
DimsAsLo
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網頁內容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
- 4. 未經權益所有人同意不得將文件中的內容挪作商業(yè)或盈利用途。
- 5. 人人文庫網僅提供信息存儲空間,僅對用戶上傳內容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內容本身不做任何修改或編輯,并不能對任何下載內容負責。
- 6. 下載文件中如有侵權或不適當內容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 2025國際貿易合同
- 2025開關插座采購合同標準版
- 2025年度高科技企業(yè)公司股權協(xié)議書模板3篇
- 2025年度智能家居生態(tài)鏈消費者協(xié)議3篇
- 2025年度新材料研發(fā)與應用公司整體轉讓協(xié)議版3篇
- 2025年度醫(yī)療設備融資租賃服務合同模板3篇
- 2025年度農村宅基地房買賣合同(農村電商服務站建設)
- 2025年度公租房合同(含租賃合同簽訂及備案費用)3篇
- 2025年度環(huán)保處理設備專業(yè)維修與改造合同3篇
- 2025年度新能源汽車充電基礎設施合作項目協(xié)議書范本3篇
- ACC-AHA-HRSICD治療適應證指南
- 共享單車電動車加盟城市代理協(xié)議模板
- 2024年上海市交大附中嘉定高二物理第一學期期末達標檢測試題含解析
- (新版)焊工(初級)理論知識考試200題及答案
- 新版《電力設備典型消防規(guī)程》
- 《艱辛探索和建設成就》教學設計
- YS/T 673-2013還原鈷粉
- GB/T 7631.5-1989潤滑劑和有關產品(L類)的分類第5部分:M組(金屬加工)
- GB/T 40428-2021電動汽車傳導充電電磁兼容性要求和試驗方法
- 七年級下冊道德與法治復習資料
- 阿里云數(shù)字化轉型生態(tài)介紹課件
評論
0/150
提交評論