=3)")k=Int(Sqr(n))i=(1)__________prime=0While i=3)是否为素数,请补充完整。 _ 自考,成考学习,学历提升,考前押密,考前答题,选笔果题库就对了">
自考笔果题库
笔果题库
历年真题
  • 上海市
  • 四川省
  • 广东省
  • 湖南省
  • 湖北省
  • 江苏省
  • 浙江省
  • 安徽省
  • 福建省
  • 江西省
  • 山东省
  • 河南省
  • 甘肃省
  • 澳门特别行政区
  • 青海省
  • 内蒙古自治区
  • 广西壮族自治区
  • 新疆维吾尔自治区
  • 西藏自治区
  • 宁夏回族自治区
  • 中国台湾省
  • 香港特别行政区
  • 北京市
  • 陕西省
  • 云南省
  • 贵州省
  • 海南省
  • 黑龙江省
  • 吉林省
  • 辽宁省
  • 山西省
  • 河北省
  • 重庆市
  • 天津市
押密题库
本科
专科
视频题库
考证通关
笔果题库返回
VB程序设计
历年真题
下列程序是判断一个整数(>=3)是否为素数,请补充完整。
Private Sub Command1_Click()
Dim n As Integer, i, k, prime As Integer
 
n=InputBox("请输入一个整数(>=3)")
k=Int(Sqr(n))
i=(1)__________
prime=0
While i<=k And prime=0
If n Mod i=0 Then
(2)__________
End If
i=(3)__________
Wend
If prime=1 Then
Print n;"不是素数"
Else
Print n;"是素数"
End If
End Sub
 

下列程序是判断一个整数(>=3)是否为素数,请补充完整。
深圳市笔果教育科技有限公司
粤ICP备17094429号-1
自考笔果题库APP
更优刷题体验,尽在笔果APP!
立即下载