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

其他资讯