vb输入一个正整数,若该数不是一个素数,则找出一个大于它的最小素数

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/14 14:09:21

Module module3
Sub Main()
Dim num As Integer
Dim i As Integer
Console.Write("请输入一个正整数：")
num = Integer.Parse(Console.ReadLine())
While IsPrimeNumber(num) = False
num += 1
End While
Console.WriteLine(num)
End Sub
'判断一个整数是否是素数
Function IsPrimeNumber(ByVal num As Integer) As Boolean
Dim i,k As Integer
If num < 2 Then
Return False
End If
If num = 2 Then
Return True
End If
k = Math.Sqrt(num)
For i = 2 To k
If num Mod i = 0 Then
Return False
End If
Next
Return True
End Function
End Module
再问：怎么跟我学的不一样啊,好多看不懂啊

VB求输入任意一个正整数,若该数不是一个素数,则找出一个大于它的最小素数. VB输入任意一个正整数,若该数不是一个素数,则找出一个大于它的最小素数 vb输入一个正整数,若该数不是一个素数,则找出一个大于它的最小素数输入一个正整数,找出大于该数的最小素数 c语言编程输入一个正整数输出各位数字的反向排列和输入一个大于等于一的正整数,判断该数是否为素数求大于200的最小的一个自然数,该数既是素数,又是回文数. 编写一个判断某数是否为素数的应用程序.输入任意一个正整数,输出显示该数是否为素数. 一个数a等于一个偶数加1,最小但大于a的一个素数减该偶数仍得一个素数. 证明：分解{1+p+.+p^2k}的素数中一定有一个数大于p 或找出反例.（p为素数,k为正整数） c语言中判断一个正整数是否为素数,若是素数则输出该素数,若不是则输出该数所有的因子求一道程序设计题的代码编写：输入一个正整数,判断该正整数是否为素数改正程序中的错误,判断一个数是否是素数.素数就是只能被1和自身整除的正整数,1不是素数,2是素数.