vb中怎么判断100以内素数
用vb定义一个函数子程序，判断某一个数是否是素数，然后调用该子程序求出3~100间所有的素数？
用vb定义一个函数子程序，判断某一个数是否是素数，然后调用该子程序求出3~100间所有的素数？
代码如下：
Private Sub Command1_Click()
Dim i As Integer
For i 2 To 500
If SS(i) True Then
i
End If
Next i
End Sub
Function SS(Num As Integer) As Boolean 定义该过程返回值为Boolean型
SS True 初始化素数的真假
For i 2 To Sqr(Num) 用循环语句执行以下操作
If Num Mod i 0 Then 能被大于两个小于该数的数整除，则
SS False 素数为假
Exit For 提前退出循环
End If
Next i
End Function
用VB6.0找出100以内的素数（质数）？
下面是用VB6.0找出100以内的素数的方法。
1、启动VB6.0，新建一个标准exe工程。
2、在窗体上绘制一个命令按钮，名称为Command1。
3、双击命令按钮Command1，进入代码窗口。
4、假设有一个名为a的函数过程进行调用，从1到100逐一查找。可以选择计数循环语句。
5、编写命令按钮的单击事件。（详细过程请看代码中的绿色注释）。
6、按F5运行测试即可。
VB编程利用判素数函数,完成100到200之间所有素数平均值的输出？
#include stdio.h
int isPrime(unsigned int n)//定义素数函数
{
int i;
if(n 0 || n 1)
return 0;
for(i 2; i * i n; i )
{
if(n i 0)
return 0;
}
return 1;
}
int main(void)//主函数
{
int i,count0;
for(i 100; i 200; i )
{
if(isPrime(i))
{
printf(],i);
count ;
if(count50)//满五个换行
printf(
);
}
}
printf(
);
return 0;
}