vb大于一个数的最小素数

m1和m2就是要找的那两个数这里认为规定了m1

#include#includeintisprime(intn){intt,i;t=(int)sqrt(n);for(i=2;i

放置一个command1,一个text1,不用再做其它设定,程序会自行设定各个参数,代码如下：PrivateSubCommand1_Click()DimNAsLong,IAsLong,JAsLongI

判断n是否为素数,可用n除以2到根号n之间所有的整数,除不尽则n为素数Fora=2ToInt(Sqr(n))IfnModa0Then'余数不为0,则n为素数isprime=True'n为素数Elsei

判断素数的原理是：素数是只能被1和本身整除的数.例如3只能被1和3整除,17只能被1和17整除等等,想9就不是素数（能被1,3,9整除）.编程的算法是：穷举法,就是将需要判断的数除2、除3.一直除到这

思路与方法:1,输入一个大于等于6的偶数n.2,采用循环:Fori=2ton-2ifi是素数Andn-i是素数Then输出:i,n-iExitForEndIfNexti再问：这个思路我也知道，但具体到

dimiaslong,jaslongi=你的数dowhile(i

Fori=2Tox-1IfxModi=0ThenExitForNextiIfi=xThenPrintx;

privatesubcommand1_click()dimi,j,nn=val(inputbox("n="))ifIsPrime(n)thenprintn&"是素数."elsefori=n+1ton+

DimnAsInteger,iAsIntegerDimflgAsBooleann=Val(Text1.Text)n=n+1Fori=2ToSqr(n)IfnModi=0ThenExitForNexti

大于200的最小的一个自然数,该数既是素数,又是回文数:　　【313】再问：不好意思我没说清楚。。是编c语言程序再答：#include<stdio.h>intmain(){ &n

一般只能说一个数是不是素数,而不能说一个数的素数是什么.素数指在大于1的自然数中,除了1和此整数自身外,无法被其他自然数整除的数.只有两个正因数（1和自己）的自然数即为素数.如：2357111317等

素数中小学一般叫做质数最小的整数的素数就是最小质数,2

Dimi,j,nAsInteger,flagAsBooleanPrivateSubCommand1_Click()n=Text1.TextFori=2Ton/2flag=FalseForj=2ToSq

设两个素数分别为b,c,则b,c均为奇数a等于一个偶数加1所以a也是奇数,且最小为3a=3时,该偶数为2容易找到符合题意的两个素数为5和7故a=3

DimmAsIntegerPrivateSubCommand1_Click()a=InputBox("请输入数字")Fori=1ToVal(a)IfaModi=0Thenm=m+1NextIfm=2T

k=Val(InputBox("InputInteger:"))+1DoWhileTruetmp=Sqr(k)Fori=2TotmpIfkModi=0ThenExitForEndIfNextIfi>t

Modulemodule3SubMain()DimnumAsIntegerDimiAsIntegerConsole.Write("请输入一个正整数：")num=Integer.Parse(Consol

subformclick_()dimnasintegern=inputbox("请输入数")k=int(spr(n))i=2swit=0‘令swit=0接下来的意思是N除以小于N的输如果能被整除SWI

2和4