填空题
下列程序是判断一个整数(>=3)是否为素数,请补充完整。 Dim n As Integer n=InputBox("请输入一个整数(>=3)") k=Int(Sqr(n)) i=2 swit=0 While i<=k And swit=0 If n Mod i=0 Then 【 】 Else 【 】 End If Wend If swit=0 Then Print n;"是一个素数。" Else Print n;"不是一个素数。" End If
【参考答案】
swit=1
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
填空题
在关系模型中,把数据看成是二维表,每一个二维表称为一个_________。
点击查看答案&解析
填空题
在E盘当前目录文件夹下建立一个名为“Student.txt’’’的顺序文件,要求用InputBox函数输入5个学生的姓名(StuName)、年级(StuGrade)和年龄(StuAge)。Private Sub Form _ Click( )【 】 For i=1 To 5StuName=InputBox( 请输入姓名 )StuGrade=InputBox( 请输入年级号 )StuAge=InputBox( 请输入年龄 )【 】 Next i 【 】 End Sub
点击查看答案&解析
相关试题
每一个窗体或者控件都有一个名字,为提高程...