版權說明:本文檔由用戶提供并上傳,收益歸屬內容提供方,若內容存在侵權,請進行舉報或認領
文檔簡介
千里之行,始于足下讓知識帶有溫度。第第2頁/共2頁精品文檔推薦VB基本知識及選擇循環(huán)結構習題一、VB基本學問及挑選、循環(huán)結構習題
一、基本概念題
(1)說明下列哪些是VisualBasic合法的直接常量,并分離指出它們的類型。
100.0%1001E1123D3123,4560100
“ASDF”“1234.5”#2022/10/7#100#π
&O78&H123TrueT-1123!345.54#
(2)下列數(shù)據(jù)哪些是變量,哪些是常量?是什么類型的常量?
Name“name”Falseff“11/16/99”cj
“120”n#11/12/2022#12.345
(3)下列符號中,哪些可以是VisualBasic的合法變量名?
A123a12_3123_aa,123a123Integer
XYZFalseSin(x)變量名sinxπ
(4)把下列數(shù)學表達式寫成VisualBasic表達式:
(1)5||zyx++(2)6)1(xy+
(3)xyyx310+(4)aac
bb242-+-
(5)3211111rrr++(6)110ln45sin10++++yxeο
(5)寫出下列表達式的值:
(1)123+23Mod10\7+Asc("A")
(2)Int(68.555*100+0.4)/100
(3)#11/22/2022#-10
(4)"ZXY"&123&"abc"
(6)設a=7,b=3,c=4,求下列表達式的值:
(1)a+3*c(2)a^2/4
(3)a/2+3\2(4)aMod3+b^3/c\5
(7)寫出下列函數(shù)的值:
(1)Int(-3.14159)(2)Fix(-3.14159)
(3)Sqr(Sqr(81))(4)Len("VisualBasic程序設計")
(5)Int(Abs(99-100)/2)(6)Sgn(7*3+2)
(7)LCase("HellowVB!")(8)Mid("HellowVB!",4,3)
(9)Left("HellowVB!",3)(10)Val("16個加23個")
(11)Str(-459.55)(12)UCase("VisualBasic")
二、挑選題
(1)可以同時刪除字符串前導和尾部空格的函數(shù)是。
A.Ltrim
B.Rtrim
C.Trim
D.Mid
(2)函數(shù)Int(Rnd(1)*10)是在哪個范圍產生隨機整數(shù)。
A.(0,1)
B.(0,9)
C.(1,10)
D.(1,9)
(3)數(shù)學式子sin25o寫成VisualBasic表達式是。
A.Sin25
B.Sin(25)
C.Sin(25o)
D.Sin(25*3.14/180)
(4)表達式16/4–2^3*8/4Mod5\2的值是。
A.14
B.4
C.20
D.2
(5)數(shù)學關系式103=3Andx=3Orx“ABC”
B.“THAT”>“THE”
C.9>“H”
D.“A”>“a”
(16)表達式a+b=c是。
A.賦值表達式
B.字符表達式
C.算術表達式
D.關系表達式
(17)在下列表達式中,非法的是。
A.a=b+c
B.a>b+c
C.a≠b>c
D.a15Theny=x^2+1
Printy
EndSub
(8)執(zhí)行下面程序后,輸出的結果是。
PrivateSubForm_Click()
DimsumAsInteger
sum%=19
sum=2.23
Printsum%;sum
EndSub
(9)執(zhí)行下面程序后,輸出的結果是。
PrivateSubForm_Click()
a=100
Do
s=s+a
a=a+1
LoopUntila>100
Printa
EndSub
(10)執(zhí)行下面程序后,輸出的結果是。
PrivateSubForm_Click()
a="ABCD"
b="efgh"
c=LCase(a)
d=UCase(b)
Printc+d
EndSub
(11)執(zhí)行下面程序后,輸出的結果是。
PrivateSubForm_Click()
x=2:y=4:z=6
x=y:y=z:z=x
Printx;y;z
EndSub
(12)執(zhí)行下面程序后,輸出的結果是。
PrivateSubForm_Click()
DimcountAsInteger
count=0
Whilecount=i)ThenPrintTab(j*3);Format(b(i,j),"###");Nextj
Nexti
EndSub
A.123
B.1
C.147
D.123
4564524646
7897893699
五、填空題
(1)在VB中聲明符號常量的關鍵字是_______。
(2)設a=1,b=2,c=3,則VB6.0表達式:a子句缺省時,循環(huán)變量每次轉變的值是_______。
(10)填空,使得程序運行后,能在窗體上打印如圖所示的圖案。
PrivateSubForm_Click()
Fori=1To4
PrintTab(8-i);
Forj=1To8
Print"*";
()
Nexti
EndSub
(11)下面程序的功能是利用隨機函數(shù)產生10個(1~100)之間的隨機整數(shù),打印其中能
被5整除的數(shù)并求其和,請用正確的內容填空。
PrivateSubForm_Click()
DimsumAsInteger,xAsInteger
Fori=1To10
x=Int(Rnd*100+1)
If()=0Then
sum=sum+x
Print"x=";x
EndIf
Nexti
Ifsum0Then
Print"sum=";sum
EndIf
EndSub
(12)用正確的內容填空,使得以下程序能夠找出50以內全部能構成直角三角形的整數(shù)。
PrivateSubForm_Click()
DimaAsInteger,bAsInteger
DimcAsSingle
Fora=1To50
Forb=aTo50
c=Sqr(a^2+b^2)
If()ThenPrinta,b,c
Nextb
Nexta
EndSub
(13)用正確的內容填空,使得以下程序能夠計算1+1/3+1/5+……+1/(2N+1),直到1/(2N+1)
小于10-5。
PrivateSubForm_Click()
sum=1:n=1
Do
n=n+2
temp=1/n
sum=sum+temp
Iftemp<0.00001Then()
Loop
Print"N=";n
Print"sum=";sum
EndSub
(14)某大獎賽,有7位評委給參賽選手打分。以下程序是輸入7位評委對某選手的打分后,去掉最高分和最低分后計算其平均值作為該選手的成果。請?zhí)羁帐沟贸绦蚰苷_運行。
PrivateSubForm_Click()
sum=0
Fori=1To7
cj=Val(InputBox("請輸入第""點浮現(xiàn)";a(i);"次"
Nexti
EndSub
六、編程題
(1)編寫程序將1~100自然數(shù)中能被3和5同時整除的數(shù)打印出來,并統(tǒng)計其個數(shù)。
(2)我國現(xiàn)有人口13億,設年增長率為0.75%,編寫程序,計算多少年后將超過16億。
(3)編寫程序輸出100~200之間不能被3整除的自然數(shù)。
(4)設計程序,求s=1+(1+2)+(1+2+3)+……+(1+2+3+……+n)的值。
(5)編寫程序計算S的近似值,直到最后一項的肯定值小于10-5為止。并用Print辦法輸出計算結果。其中:
KSk1)1(41312111+-++-+-
=KK
(6)假設某項稅收的規(guī)定如下:
●收入在500元以內,免征;●收入在500~1000元內,超過500元的部分納稅3%;
●收入超過1000元時,超過的部分納稅4%;
●收入超過2000元時,超過的部分納稅5%。
試編程實現(xiàn)上述操作。
(7)編寫程序,用InputBox函數(shù)輸入3個正整數(shù),打印其中最大的數(shù)。
(8)編寫程序,隨意輸入三個整數(shù)A,B,C,按由大到小挨次把它們打印出來。(9)編寫程序,計算
)!12()1(!5!3sin1
2153--+++-≈--nxxxxxnnΛ直到第n項的肯定值小于10-8
(10)分離編寫兩個程序,在窗體上分離打印出如下所示的圖形。
(11)編寫程序,輸出1000之內的全部完數(shù)?!巴陻?shù)”是指一個數(shù)恰好等于它的因子之
和,如6的因子為1、2、3,而6=1+2+3,因而6是完數(shù)。
(12)一只小球從10米高度上自由落下,每次落地后反彈回原高度的40%,再落下。
編程計算小球在第8次落地時,共計經過了多少米?
(13)編寫程序,求出全部小于或等于100的自然數(shù)對。自然數(shù)對是指
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請聯(lián)系上傳者。文件的所有權益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內容里面會有圖紙預覽,若沒有圖紙預覽就沒有圖紙。
- 4. 未經權益所有人同意不得將文件中的內容挪作商業(yè)或盈利用途。
- 5. 人人文庫網(wǎng)僅提供信息存儲空間,僅對用戶上傳內容的表現(xiàn)方式做保護處理,對用戶上傳分享的文檔內容本身不做任何修改或編輯,并不能對任何下載內容負責。
- 6. 下載文件中如有侵權或不適當內容,請與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準確性、安全性和完整性, 同時也不承擔用戶因使用這些下載資源對自己和他人造成任何形式的傷害或損失。
最新文檔
- 2024年包覆貴金屬金屬材料項目合作計劃書
- 2024年電池修復機項目建議書
- 上海市靜安區(qū)2020屆高三地理二??荚囋囶}含解析
- 2024年血液系統(tǒng)用藥項目發(fā)展計劃
- 2024年LED驅動電源項目合作計劃書
- 2024年動物胎盤蛋白項目發(fā)展計劃
- 七下生物第四章課件
- 速凍食品進口物流合同樣本
- 輕奢風格公寓樓裝修合同
- 機械設備維修配件運輸合同
- 2022年HJ1237版機動車定期排放檢驗作業(yè)指導書
- DBJT45∕T 030-2021 公路路面基層注漿加固技術指南
- 銅與稀硝酸反應生成一氧化氮氣體實驗的改進
- 在電力公司工作會議上的總結講話
- 松下伺服驅動器說明書
- 留守兒童問卷調查表調
- 故鄉(xiāng)人的變化(表格)
- 豐田A3報告示例
- 地下車庫設計標準規(guī)范及其布置方法
- MCA系列電梯故障檢測說明
- 碩士研究生入學登記表
評論
0/150
提交評論