浙江计算机三级考试单片机试题,浙江省计算机三级单片机考试试卷.doc

文档介绍：

附录二 2007年浙江省计算机等级考试试卷

说明:⑴考生应将所有试题的答案填写在答卷上。其中试题1~试题6,请在答卷上各小题正确选项的对应位置处打“√”;

⑵请将你的准考证号的后五位填写在答卷右下角的指定位置内;

⑶考试时间为90分钟。

试题一(每小题3分,共12分)

阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。

【程序说明】单击窗体后输入1个不小于6的正整数,然后输出该数所有的质数因子(如输入6则输出“ 2 3”,输入60则输出“ 2 2 3 5”,等等)。

【程序】

Private Sub f( (1) )

Dim i As Integer

i = 2

Do While (2)

If (3) Then k = k /i: Print i; Else i = i + 1

Loop

End Sub

Private Sub Form_Click()

Dim n As Integer

Do

n = InputBox("n=")

Loop (4)

Call f(n)

Print

End Sub

【供选择的答案】

(1) A、n As Integer B、k As Integer

C、Byval n As Byte D、I As Integer

(2) A、k>1 B、k>=1 C、k=1 D、k Mod i=0

(3) A、k\i=0 B、k\i*i=0 C、n Mod i=0 D、(k\i)*i=k

(4) A、Until n>6 B、While n>=6 C、Until n>=6 D、While n>6

试题二(每小题3分,共15分)

阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案。

【程序说明】

统计鼠标单击图片框控件P1中两个同心圆所围成黑色区域的次数:mand1将统计结果请零、P1可用,再次单击则以消息框显示统计结果、P1不可用。

Dim n As Integer

Private mand1_Click()

mand1.Caption = "开始" Then

Command1.Caption = "显示"

P1.Enabled = True: n = 0

Else

Command1.Caption = (5)

P1.Enabled = False: MsgBox("单击该区域" + (6) + "次")

End If

End Sub

Private Sub Form_Activate()

P1.Width = P1.Height

P1.Scale(-3, 3) - (3, -3)

P1.FillStyle = (7)

P1.FillColor = (8) : P1.Circle(0, 0), 2

P1.FillColor = vbwhite: P1.Circle(0, 0), 1

End Sub

Private Sub Form_Load()

Command1.Caption = "开始": P1.Enabled = False

End Sub

Private Sub P1_MouseDown(Button A

内容来自淘豆网www.taodocs.com转载请标明出处.