vb.net如何判断素数 vb中如何判断素数
VB判断是否为素数
写程序太麻烦。告诉你方法吧。设i=2.先判断输入的整数是否为1和2
成都创新互联专注于天元企业网站建设,响应式网站建设,商城网站制作。天元网站建设公司,为天元等地区提供建站服务。全流程按需求定制网站,专业设计,全程项目跟踪,成都创新互联专业和态度为您提供的服务
。如果是1,直接反回索数。如果是2反回非素数。如果不是1,2。则进入循环把整数除i
,判断余数0并且i整数,i++。一旦出现余数=0侧为反回非素数,如果循环完了还没有,反回素数。原理:是素数只1与自身整除。
vb判断素数需要添加哪些控件
vb判断素数需要添加的控件有button和listbox。
1、打开vb工程,在上面建一个窗体,然后创建button和listbox
2、在findPrime上写入如下代码:
Private Sub CommandButton1_Click()
Dim flag As Boolean
flag = True
ListBox1.AddItem (1) '默认1和2都是素数
ListBox1.AddItem (2)
For i = 1 To 1000
For J = 2 To i - 1
If (i Mod J = 0) Then
flag = True
Exit For
Else
flag = False
End If
Next
If flag = False Then
ListBox1.AddItem (i)
End If
Next i
End Sub
3、运行结果,列出了1-1000内的所有素数。
vb判断素数
这得通过对循环
For i = 2 To n - 1
If n Mod i = 0 Then Text2.Text = n "不是素数": Exit For
Next i
分析说起;
For i = 2 To n - 1
就是 i 从2开始,逐步递增1,循环到 n - 1 结束,中间每一次循环通过 If 语句一 一 判断。
循环里,执行 If 语句
If n Mod i = 0 Then Text2.Text = n "不是素数": Exit For
注意到,这里有退出循环的语句Exit For
从而,最后循环结束有两种可能;
1,只要有 i 能整除 n,循环就执行Exit For使得循环结束;此时i=n - 1
2,所有的 i 都不能整除 n,这样结束循环的时候;i = n - 1
所以,在最后根据是否能满足i = n - 1,来确定 n 是不是素数。
新闻标题:vb.net如何判断素数 vb中如何判断素数
分享URL:http://cdiso.cn/article/ddogpsd.html