> 数学 >
用VB验证哥德巴赫猜想,任何一个大于6的偶数,均表示为两个素数之和,
要求从键盘输入一个大于6的偶数,打印出分解的结果.
人气:111 ℃ 时间:2019-12-13 02:01:27
解答
Dim i,j,n As Integer,flag As BooleanPrivate Sub Command1_Click()n = Text1.TextFor i = 2 To n / 2flag = FalseFor j = 2 To Sqr(i)If i Mod j = 0 Thenflag = TrueEnd IfNext jFor j = 2 To Sqr(n - i)If i Mod...
推荐
猜你喜欢
© 2024 79432.Com All Rights Reserved.
电脑版|手机版