c語(yǔ)言 VB編程當(dāng)輸入一個(gè)正整數(shù)n時(shí)，判斷n是否為素?cái)?shù)，輸出n為素?cái)?shù)或合數(shù)？
VB編程當(dāng)輸入一個(gè)正整數(shù)n時(shí)，判斷n是否為素?cái)?shù)，輸出n為素?cái)?shù)或合數(shù)？Private Sub Command1u Click（）Dim i%，n%n=Val（InputBox（“”）For i=2 To
VB編程當(dāng)輸入一個(gè)正整數(shù)n時(shí)，判斷n是否為素?cái)?shù)，輸出n為素?cái)?shù)或合數(shù)？
Private Sub Command1u Click（）
Dim i%，n%
n=Val（InputBox（“”）
For i=2 To n/2
If n Mod i=0 Th
int isPrime（int num）{
int divisor=3
int testLimit=num
If（num< 2）
return 0
If（num< 4）
return 1
If（num 2==0）
return 0
while（testLimit>）除數(shù)）
{
if（num%divisor==0）
返回0
testLimit=num/除數(shù)
除數(shù)=2
}
返回1
}