VB程序 求100内所有素数的和.
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/13 06:09:51
VB程序 求100内所有素数的和.
将下面求100内所有素数的VB语言改一下,改成求100内所有素数的和.
For m=2 to100
Do While m mod i0
i=i+1
Loop
If i=m then print m
next i
将下面求100内所有素数的VB语言改一下,改成求100内所有素数的和.
For m=2 to100
Do While m mod i0
i=i+1
Loop
If i=m then print m
next i
Dim m As Integer
Dim i As Integer
Dim sum As Integer
sum = 0
For m = 2 To 100
For i = 2 To m - 1 '判断是否是素数
If m Mod i = 0 Then
Exit For
End If
Next i
If i = m Then '如果是,相加
sum = sum + m
End If
Next m
Print sum
另外楼主的代码有误,按你那个思路,代码如下
Dim sum As Integer
For m = 2 To 100
i = 2
Do While m Mod i 0
i = i + 1
Loop
If i = m Then sum = sum + m
Next m
Print s
Dim i As Integer
Dim sum As Integer
sum = 0
For m = 2 To 100
For i = 2 To m - 1 '判断是否是素数
If m Mod i = 0 Then
Exit For
End If
Next i
If i = m Then '如果是,相加
sum = sum + m
End If
Next m
Print sum
另外楼主的代码有误,按你那个思路,代码如下
Dim sum As Integer
For m = 2 To 100
i = 2
Do While m Mod i 0
i = i + 1
Loop
If i = m Then sum = sum + m
Next m
Print s
VB程序输出100内所有差为二的素数.
Vb编程:求100-999之间的所有素数
编写一个程序,其功能是判断某个整数是否为素数,且程序中能够调用该函数,以实现求1000内的所有素数和.
求100-500内所有素数的个数?
C语言 求2到100内的所有素数和
编写程序:找出四位整数(1000至9999)之间的所有素数,求这些素数的和,
编写程序,求 30 以内的所有素数之和 .(素数是只能被1和其自身整除的数
VB;编写一个判断素数的通用函数,计算1350到2460内所有素数的和 下星期要交了
mathematica求助!求1到1000之间的所有素数,并输出这些素数及其和.(利用素数的定义编写程序)
VB程序求1-40之间能被5整除得所有数的和.
用pascal编写程序 求1000内的素数(素数就是只能被1和它自己本身整除,素数比如:2、3、5、7……)
求1-1000内所有奇数和的程序框图