土壤胶体是一类粒径在（）的颗粒物质

A:a、0-1毫微米 B:b、1-50毫微米 C:c、1-100毫微米 D:d、100-500毫微米

产生一个int数组，长度为100，并向其中随机插入1-100，并且不能重复。

金黄色葡萄球菌肠毒素定性检测作业指导书-胶体金免疫层析法为定性检测，金黄色葡萄球菌肠毒素什么的检出限是（）。

A:A型1-10μg/kg B:C型1-100μg/kg C:C型1-10μg/kg

将居民小区共4000户居民按1-4000编号，在1-100号中随机抽取1个号码为3，则3、103、203……3903构成抽样调查样本，这种获取样本的方法为（）。

A:简单随机抽样 B:系统随机抽样 C:分层随机抽样 D:整群抽样

运动会上100名运动员排成一列，从左向右依次编号为1-100，选出编号为3的倍数的运动员参加开幕式队列，而编号为5的倍数的运动员参加闭幕式队列。问既不参加开幕式又不参加闭幕式队列的运动员有多少人

A:46 B:47 C:53 D:54

下列程序的功能是求出所有的1-100之间的孪生素数。孪生素数是指两个素数的差为 2，如3和5，11和13等，请填空。
Private Sub Form_Click（　）
Dim i As Integer
For i = 3 To 97 Step 2
If 【9】 Then
Print i, i + 2
End If
Next i
End Sub
Public Funtion Prime (ByVal n As Integer) As Boolean
Dim i as Integer
For i = 2 To n - 1
If 【10】 Then
Exit For
End If
Next i
If i = n Then
Prime = True
Else
Prime = False
End If
End Function

Prime(i)And Prime(i+2) n Mod i=0

在窗体上画一个名称为Command1的命令按钮和一个名称为List1的列表框。如下图所示程序的功能是：单击命令按钮后，程序用“筛选法”求出1-100之间的全部素数。并将素数在列表框中显示出来。根据题意，填空处应选择 Option Base 1 Dim a(100)As Integer Private Sub Command1_Click（　） n = 100 For i = 2 To Sqr(n) For j = i + 1 To n If j Mod i = 0 And a(j)＜＞ 0 Then a(j)= 0 Next j Next i For i = 1 To n If a(i)＜＞ 0# Then Next i End Sub Private Sub Form_Load （　） For i = 1 To 100 a (i)=i Next i End Sub

A:List1.Text=Str（a（i))+ vbCrLf B:List1.Text=Str（a（i))+ vbCrLf C:List1.AddItem a（i) D:List1.AddItem=a（i)

下列程序的功能是求出所有的1-100之间的孪生素数。孪生素数是指两个素数的差为 2，如3和5，11和13等，请填空。 Private Sub Form_Click（　） Dim i As Integer For i = 3 To 97 Step 2 If 【9】 Then Print i, i + 2 End If Next i End Sub Public Funtion Prime (ByVal n As Integer) As Boolean Dim i as Integer For i = 2 To n - 1 If 【10】 Then Exit For End If Next i If i = n Then Prime = True Else Prime = False End If End Function

Prime(i)And Prime(i+2) n Mod i=0

将自然数1-100分别写在完全相同的100张卡片上，然后打乱卡片，先后随机取出4张，问这4张先后取出的卡片上的数字呈增序的几率是多少

A:1/16 B:1/24 C:1/32 D:1/72