2015-2016學年浙江省溫州市平陽二中高二（上）期中信息技術試卷
發布：2024/4/20 14:35:0
一、選擇題（本題共15小題，每題2分，共30分）
-
1．下列是用VB編程解決問題時的三個步驟
①在VB編程環境中設計界面，編寫程序代碼
②分析問題，確定解決問題的算法
③調試，運行程序
正確的順序是（ ）組卷：9引用：2難度：0.9 -
2．算法中的輸入，是指算法在執行時需要從外界（如：鍵盤）取得數據信息，其目的是為算法的某些階段建立初始狀態，一個算法的輸入可以0個，是因為（ ）
組卷：7引用：1難度：0.5 -
3．溫州地區居民生活用電 從2012年7月1日開始執行階梯電價。具體實施方案是：將居民每月用電量劃分為三檔，電價實行分檔遞增。第一檔為每月不超過220度的電量，電價保持每度0.49元不變；第二檔為每月221至400度之間的電量，電價每度0.54元，比第一檔提高0.05元；第三檔為每月超過400度的電量，電價每度0.79元，比第一檔提高0.3元；居民階梯電價以年度為周期結算。該問題算法的結構屬于（ ）
組卷：0引用：1難度：0.5 -
4．要使窗體Form1的標題欄中顯示“計算扇形的面積”，以下語句正確的是（ ）
組卷：7引用：2難度：0.9 -
5．下列關于“控件”屬性的說法正確的是（ ）
組卷：8引用：4難度：0.9 -
6．在Visual Basic中，下列能作為變量名的是（ ）
組卷：8引用：4難度：0.9 -
7．下列屬于Visual Basic數值常量的是（ ）
組卷：9引用：1難度：0.4
二、非選擇題（每空2分，共20分）
-
20．某企業在第1年初購買一臺價值為120萬元的設備，該設備的價值在使用過程中逐年減少。從第2年到第6年，每年初的價值比上年初減少10萬元；從第7年開始，每年初的價值為上年初的75%．問第n年初該設備的價值是多少？下面的Visual Basic程序用于解決此問題，運行程序，在文本框Text1中輸入年數n,單擊“計算”按鈕Command1，則在標簽Label1中顯示此年初的價值a。程序運行界面如圖1所示，流程圖如圖2所示。
程序代碼如下：
Private Sub Command1_Click （ ）
Dim n As Single,a As Single
n=Val（Text1．Text）
If n=Int（n） And n＞=1 Then
If n＜=6 Then
a=①
Else
a=70*0.75^（n-6）
End If
Label2．Caption=“第“+Str（n）+“年初價值：“+② +“萬元“
Else
Label2．Caption=“輸入的年數不符合要求！“
End If
End Sub
在程序①和②橫線處，填入適當的語句或表達式，把程序補充完整：
程序中①橫線處應填入。程序中②橫線處應填入。組卷：1引用：1難度：0.6 -
21．求完數（完美數）。一個數恰好等于除它本身外的因子之和，這個數就稱為完數。例如28除本身之外的因子是1，2，4，7，14，且1+2+4+7+14=28，則28是完數。下列Visual Basic程序用于查找2～10000中的所有完數，并將結果顯示在列表框List1中，程序運行界面如圖1所示。其中方框內程序對應的流程圖如圖2所示
程序代碼如下：
Private Sub Command1_Click （ ）
Dim i As Integer,t As Integer,s as integer
（1）該程序的算法是
For x=2 To 10000
s=0
For i=1 To x\2
If x Modi=0 Then
s=②
End If
Next i
If s=xThen
List1．AddItem①
End If
Next x
End sub。 （選填：解析算法/枚舉算法）
（2）在程序①和②橫線處，填入適當的語句或表達式，把程序補充完整：
程序中①橫線處應填入。
程序中②橫線處應填入。組卷：8引用：1難度：0.2