题目

编写“素数查找”程序，实现如下功能：单击“生成”按钮，随机生成50个150至200（包括150和200）之间的正整数，显示在下方，每行显示10个，共5行。单击“筛选”按钮，从上面50个数中筛选出是素数的数，重复的只显示一次。程序运行界面如图所示。请根据算法将下列程序补充完整。Private Sub Command1_Click() Label3.Caption = For i = 1 To 50 a(i) = If i Mod 10 = 0 ThenLabel3.Caption = Label3.Caption + CStr(a(i)) + vbCrLf '换行 ElseLabel3.Caption = Label3.Caption + CStr(a(i)) + End If Next某研究小组在查阅资料中发现，常温下氯气可以氧化氨气获得氮气。该小组由此设计出制取氮气的思路，设计装置图如下。其中A、F分别为氨气和氯气的发生装置，C为纯净干燥的氯气与氨气反应的装置。请回答下列问题：（1）装置A中的烧瓶内固体不可以选用_________（填序号）。A．生石灰         B．碱石灰         C．五氧化二磷         D．烧碱（2）装置F发生反应的离子方程式是_____________________________________。（3）B装置的作用___________________；E装置的作用_______________________。（4）写出制取N2的化学方程式____________________________；反应生成0.5mol N2，转移的电子是_________mol。