資源簡介

算法與程序設計總復習測試題
一、分析并填寫程序運行結果
1、 Dim a, b, c AS Integer
a=15;b=60;c=38
if am=a
else
m=b
endif
if m>c then m=c end if
Print “M=”;m
End Sub 運行結果:_____________
2、 Dim X AS Integer，Y AS Interger
Text1.Text=””
X=99;Y=98; M=X
If XText1.caption=M
End Sub 運行結果:__________
3、分析程序，寫出計算結果
Dim i,S as integer
S=1
For i=1 to 4
S=S*i
Next i
Print “S=”;S
End Sub 運行結果:______________
4、分析程序，寫出計算結果
Dim I,S as integer
S=0
For I=2 to 6
S=S+I
Next I
Print “S=”;S
End Sub 運行結果:_____________
5．p=1
For i=1 to 5
p=p+i
next i
print “I,P 分別為：”; i,p
輸出：I，P 分別為：____,______
6．Sum=0
For i=1 To 100
sum=sum+2
Next i
print “Sum=”; sum
輸出：__________
7．a=1; b=0
Do while a<=5
b=b+a*a
a=a+1
Loop
Print a, b
屏幕上顯示的內容是：______ ，______
8. 題目中是一個求二次函數曲線頂點坐標的VB程序，在運行是Text1、Text2、Text3分別輸入3、6、9三個數，請問Text4、Text5輸出結果分別就應為多少？（每空4分，共8分）
9．寫程序結果：
Text2 = “34”
a = ( Val ( Text2 ) – 32 ) * 5 / 2
Print a
答案：____________
二、分析程序并補充完整
1、用程序實現函數：y=|x|
Dim X AS Integer，Y AS Interger
Text1.Text=””
X=InputBox(“X= ”)
if then
Y=X
Else
End If
Text1.Text=Y
End Sub
2、計算1+2+3+……+100的值。
Dim i, s AS Integer
s=0
For i=1 TO
s=
Next i
Print “S=”; s
End Sub
3、計算1+3+5+……+99的值。
Dim i, s AS Integer
s = 0
for i =1 to Step 2
s =
Next i
Print “S=”;s
End Sub
4、 計算1+1/2+……+1/50的值。
Dim i,s as integer
s=0
For i=1 to _______________
s=___________
Next i
Print “S=”;s
End Sub
5．完善程序，打印如下圖形
*
**
***
****
*****
******
For i=1 To 6
For j＝1 To ____
Print “*”
Next j
________________
6．執行下列程序段后，變量x 的值為：（ ）
x=3;y=77
DO WHILE xx=x+2
LOOP
7．p=0;n=5
For i=1 to n
p=p+i*2
IF p>=10 Then Exit for
Next I
Print p 答案：______
8．Ch=”DEF”
For i=1 to 3
ch=ch&mid(ch,i,1)
Next i
Print ch 答案：_______
9．下面是1+1/2+1/3+…+1/100 的和的程序，該程序循環終止時 i 的值是多少？（ ）
sum=0
For i=1 To 100
sum=sum+1/i
next i
10. 下面是用VB編寫的求1+1/2+1/3+……+1/100和的程序，在空缺部分填上相應的語句。
Dim i As Integer, sum As Integer
sum = 0
For i = 1 To 100
sum = sum + _______________
Next i
Print “sum=”; sum
End Sub
11. 填補程序：假設你從今年開始為“希望工程”存錢，今年存入100元錢，第二年存入200元錢，第三年存入300元錢……依此類推，問：20年時間你將為“希望工程”存入多少錢？
Dim n as integer, intsum as integer
intsum=0
For n=1 to ______________
intsum=intsum+n*100
_______________________
Lb1sum.caption=”兩年共存入：”& intsum & “元”
End Sub
y=2
Do while y<=8
y=y+y
Loop
程序結束時循環體執行（ ）次
A、1 B、2 C、3 D、4
三、算法題：
我們在用計算機解決問題時，常采用的算法有解析法、窮舉法、遞歸法、冒泡排序法、選擇排序法等，分析下列問題應采用哪種算法解決？
1、求解“百雞問題”：已知公雞每只3元，母雞每只5元，小雞每3只1元。用100元買100只雞，問每種雞應各買多少？
答案：___________________
2、國內特快專遞每200克為一個計費單位，200克以內20元，200克以上每續重200克（不足200克按200克計算）6元，現在要編寫一個程序輸入包裹重量自動計算出價格。
解決上述問題，哪種算法最合適？
答案：___________________
3、已知：f(1)=1,f(2)=3
當n>2時，f(n)=2f(n-1)+3f(n-2)
編程求f(100)的值。
解決上述問題，哪種算法最為合適？
答案：___________________
4、在學校舉辦的運動會中，要對運動員成績進行公布，現在要求寫一個程序自動完成成績編排，請問最好采用哪種算法解決？
答案：_______________________
PAGE
4

展開更多......

收起↑