求100以内的所有质数(素数) 要求:用VB的for语句写
Posted
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了求100以内的所有质数(素数) 要求:用VB的for语句写相关的知识,希望对你有一定的参考价值。
参考技术A Private Sub Command1_Click()For n = 2 To 100 '2到100循环
For i = 2 To Int(Sqr(n)) 'sqrt(n)求开方用int取整
If n Mod i = 0 Then Exit For '如果2到100中的有数字满足不能被2到该数字开方的自然数除尽,它就是你要的素数!
Next i
If i > Int(Sqr(n)) Then '从2到int(sqrt(n))没有找到可以除尽的数字,[循环到i=int(sqrt(n))+1,不满足范围,推出循环]n就是素数!
textbox1.text+=n.tostring+" "
End If
Next n
End Sub 参考技术B Private Sub Command1_Click()
For n = 2 To 100 '2~100
For i = 2 To Int(Sqr(n))
If n Mod i = 0 Then Exit For
Next i
If i > Int(Sqr(n)) Then
Print n & "是素数"
End If
Next n '2~100
End Sub本回答被提问者采纳
c语言使用循环找出100之内的所有质数
c语言使用循环找出100之内的所有质数c语言使用循环找出100之内的所有质数
#include "stdio.h"#define N 100
int main()
int i,j;
int flag;
printf("100 以内的质数有:\\n");
for(i=2;i<101;i++)
flag = 1;
for(j=2;j<=i/2;j++)
if(i%j==0)
flag = 0;
break;
if(flag)
printf("%d ",i);
printf("\\n打印完毕\\n");
return 0;
追问
没有1呢?
质数还有1
参考技术A 什么追问就是使用二重循环或者一重循环找出100以内的质数
老师布置的作业
不会弄
以上是关于求100以内的所有质数(素数) 要求:用VB的for语句写的主要内容,如果未能解决你的问题,请参考以下文章