问题 填空题

下列程序用于在带垂直滚动条件的文本框Text1中输出3~100字间的全部素数。请填空。
Privat Sub Command1_Click()
Text1.Text=""
For n=3 To 100
k=Int(Sqr(n))
i=2
Flag=0
Do While I<=______And Flag=0
If n Mod i=0 Then
Flag=1
Eise
i=i+1
Else
loop
If ______ Then
Text1.Text=text1. Text & Str(n) & Chr(13) & Chr(10)
End If
Next n
End Sub

答案

参考答案:k Flag=0

解析: 判断一个数是不是素数,其算法是:从2开始到该数的平方根的下限(即为题中k的值)去除这个数,如果没有可以整除的数则说明该数是素数。本题中设置了一个标志变量Flag,默认值为0,如果在整除的循环中,检查出该数不是素数,则设置Flag为1,也就是循环后Flag为0的数表示该数是素数,并把它显示在Text1文本框中。

实验题

在探究动能定理的实验中,某实验小组组装了一套如图所示的装置,拉力传感器固定在小车上,一端与细绳相连,用拉力传感器记录小车受到拉力的大小。穿过打点计时器的纸带与小车尾部相连接,打点计时器打点周期为T,实验的部分步骤如下:

① 平衡小车所受的阻力:不挂钩码,调整木板右端的高度,用手轻推小车,直到打点计时器在纸带上打出一系列________的点。

②测量小车和拉力传感器的总质量M ,按图组装好仪器,并连接好所需电路,将小车停在打点计时器附近,先接通拉力传感器和打点计时器的电源,然后             ,打出一条纸带,关闭电源。

③在打出的纸带中选择一条比较理想的纸带如图所示,在纸带上按打点先后顺序依次取O、A、B、C、D、E等多个计数点,各个计数点到O点间的距离分别用hA、hB、hC、hD、hE……表示,则小车和拉力传感器在计时器打下D点时的动能表达式为                 ,若拉力传感器的读数为F,计时器打下A点到打下D点过程中,细绳拉力对小车所做功的表达式为            

④某同学以A点为起始点,以A点到各个计数点动能的增量为纵坐标,以A点到各个计数点拉力对小车所做的功W为横坐标,得到一条过原点的倾角为45°的直线,由此可以得到的结论是                            

单项选择题