永发信息网

用VB验证哥德巴赫猜想,任何一个大于6的偶数,均表示为两个素数之和,要求从键盘输入一个大于6的偶数,

答案:2  悬赏:60  手机版
解决时间 2021-02-14 01:50
用VB验证哥德巴赫猜想,任何一个大于6的偶数,均表示为两个素数之和,要求从键盘输入一个大于6的偶数,
最佳答案
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 j = 0 Thenflag = TrueEnd IfNext jIf flag = False ThenText1.Text = n & = & i & + & n - iExit ForEnd IfNext iEnd Sub
全部回答
我学会了
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
为什么跟女友接吻后,她老是把头埋在我肩膀上
美格形象烫染店地址在什么地方,想过去办事
哈曼jbl汽车音响如何,这个问题有什么好的解决
漫时光轰趴馆高档二店(别墅店)怎么去啊,有知
阿郎美发养生地址好找么,我有些事要过去
铝材料弯了能否恢复
【课时特训答案】...小学五上课时特训答案一
方圆金相技术有限公司怎么去啊,有知道地址的
流速与压力的关系
丝域造型地址在什么地方,想过去办事
世嘉左后轮异响怎么解决
求几款可以支持双屏的游戏,不用教我如何设置
中国移动通信韩洋三星级特约代理点地址在什么
临夏专业理发地址有知道的么?有点事想过去
【领导致辞主持词开场白】英语角主持人台词当
推荐资讯
芜湖卡尔机电有限公司这个地址在什么地方,我
A、B两地之间的公路长540千米.客货两车同时
某小学四五六年级共有615名学生,已知六年级
开县到重庆准确算要几小时?票价多少?几点发
索尼psp3000多少钱?
楼梯间采用常开风口,当地上的楼梯间为15层以
我女友叫邱磊。性格活泼。。求一小名。。突显
sky在英文里是什么意思?
对下面语段理解分析最恰当的一项是目前,世界
为什么最近下半身的皮肤特别痒臀部和大腿?
中国农业银行24小时自助银行(钱圩支行怎么去
半挂车车头一般什么价格
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?