问题 单项选择题

阅读程序:
Function Fun(a As Integer)
Static C
b=0:b=b+2:c=c+2
Fun=a*b*c
End Function
Private Sub Command1_Click()
Dim a As Integer
a=2
For i=1 To 2
Print Fun(A):
Next
End Sub
运行上面的程序,单击命令按钮,输出结果为( )。

A) 8 16
B) 9 18
C) 10 20
D) 7 14

答案

参考答案:A

解析: 本题的难点是子函数调用过程和Static变量。子函数有Static变量c,在第1次子函数调用时其值为2,局部变量b为2,但在第2次子函数调用时c=2+2=4,b=0+2=2。表达式a*b*c的结果通过子函数名Fun返回。

问答题

如图甲所示是一种自动测定油箱内油量多少的装置.R是滑动变阻器,它的金属滑片连在杠杆的一端.从油量表(将某电流表的刻度进行重新标注改装而成)指针所指的刻度,就可以知道油箱内油量的多少,司机王师傅发现他的汽车油量表坏了,打开一看是电阻R'坏了,想了解它的参数,只看到变阻器的铭牌上标有“50Ω 1A”的字样,为确定坏了的电阻R'的阻值,他只拆下车上的油量表(量程:0~50L),另外找来电源、滑动变阻器R1、定值电阻R2=5Ω和电压表、开关等器材,用导线连接了如图乙所示的电路进行了实验,调节变阻器R1的阻值,得到下表所记录的数据:

电压表示数/V0.500.600.751.001.503.00
油量表示数/L01020304050
试求:

(1)观察分析图甲可知,油量增加时,电路甲的R将______,油量表指针偏转______(选填“增大”或“减小”);

(2)当油量表的示数为0L时,通过油量表的电流是______A;当油量表的示数为50L时,通过油量表的电流是______A;

(3)如图甲所示,已知油箱无油时,金属滑片在b端:油箱装满油时,金属滑片在a端(油箱容积为50L).请你分析计算出图甲中损坏的电阻R'的阻值是多大?

(4)如果油量表有电阻(记作r)但未知,王师傅按照用上述方法测得的阻值去更换电阻R'后,油量表的示数与真实值相比,会______填“偏多”、“偏少”或“仍然正确”).

单项选择题