自编函数实现判断n是否为素数，并在主函数中测试。

主要是函数调用的问题，忘得差不多了。最好写下函数调用的具体说明，谢谢。

'是素数返回 True;不是素数返回 False
Function isprime(Num As Long) As Boolean
If Num < 2 Then isprime = False: Exit Function

Dim i As Long

For i = 2 To Sqr(Num)
If (Num Mod i) = 0 Then
isprime = False
Exit Function
End If
Next i

isprime = True
End Function

Private Sub Command1_Click()
Dim i As Long
For i = 1 To 100
If isprime(i) Then
Print i
End If
Next i

End Sub

#include int f(int x) { if (x==1)return 0;//1不是素数。 else { for(int i=2;i<=x;i++) if(x%i==0)break;//被一个数整除后跳出。 if(i==x)return 1;//素数只能被1和自己整除。 else return 0; } } void main() { int m,n,sum=0; scanf("%d",&m);//输入m，对m以内的数进行判断。 for(n=1;n<=m;n++)//判断1到m的数。 if(f(n)==1)sum+=n;//判断是否为素数，是就叠加。 printf("%d\n",sum); }