用VB验证歌德巴赫猜想：一个大偶数可以分解为两个素数之和.

来源：学生作业帮编辑：拍题作业网作业帮分类：数学作业时间：2024/04/26 11:30:38

用VB验证歌德巴赫猜想：一个大偶数可以分解为两个素数之和.
验证歌德巴赫猜想：
一个大偶数可以分解为两个素数之和.
试编成将500~1000之间的全部偶数表示为两个素数之和.
---

我试试,OK了!但是单击完窗体要等待几秒,因为机器在进行运算,不要着急,等5秒就可以!

Private Sub Form_Click()

Dim Num As Integer‘控制Num个算式换行

Dim n As Integer '大偶数

Dim Pr1 As Integer '两个小素数只需定义一个 Pr2 =n=Pr1

For n = 500 To 1000

For Pr1 = 2 To n / 2 'Pr1是小素数

If IsPrime(Pr1) And IsPrime(n - Pr1) Then '同时成立

Num = Num + 1

Print Tab(20 * Num); n; "="; Pr1; "+"; n - Pr1; " ";

If Num Mod 7 = 0 Then Print:Num=0'7个换行

End If

Next Pr1

Next n

End Sub

Private Function IsPrime(x As Integer) As Boolean '定义函数

’过程求素数

Dim i%,Flag As Boolean

Flag = True '假设是素数

If x >= 3 Then '最小的素数是3把1、2排除素数范围

For i = 2 To x / 2 '从2开始不是从1开始谢谢!

If x Mod i = 0 Then Flag = False:Exit For

Next i

IsPrime = Flag

End If

End Function
我不知道为什么修改答案时会出现那么多
总之你就假装没有看见就行了呵呵!

用VB验证歌德巴赫猜想：一个大偶数可以分解为两个素数之和. 编写VB程序验证歌德巴赫猜想：一个大于等于6的偶数可以表示为两个素数之和. 编程验证歌德巴赫猜想.即一个大于等于6的偶数可以表示为两个素数之和用pascal 急求：VB编程验证歌德巴赫猜想.即一个大于等于6的偶数可以表示为两个素数之和. 编程验证歌德巴赫猜想：一个大于等于六小于等于一千的偶数,总是可以分解为两个素数之和用C语言验证歌德巴赫猜想（任何充分大的偶数都可以由两个素数之和表示）. 第四题：编写程序验证歌德巴赫猜想：一个大于等于6的偶数可以表示为两个素数之和. 编程：歌德巴赫猜想指出：任何一个充分大的偶数都可以表示为两个素数之和. 验证歌德巴赫猜想：证明2000以内的正偶数都能分解成两个素数之和. 用C++编写程序验证歌德巴赫猜想：一个不小于6的偶数可以表示为两个素数之和,如6=3+3,8=3+5. 用VB编程序验证哥德巴赫猜想,即一个大于等于6的偶数可以表示为两个素数之和验证哥德巴赫猜想,一个大于4的偶数,可以分解成两个素数之和,要求判断素数用函数实现