这个程序怎么运行不对?求大神, 题目是 陈景润哥德巴赫猜想想 从6开始。。

VB 验证哥德巴赫猜想,写的代码总是出错,急需大神帮我看一下我的代码。-中国学网-中国IT综合门户网站-提供健康,养生,留学,移民,创业,汽车等信息
> 信息中心 >
VB 验证哥德巴赫猜想,写的代码总是出错,急需大神帮我看一下我的代码。
来源:互联网 发表时间: 17:33:20 责任编辑:王亮字体:
为了帮助网友解决“VB 验证哥德巴赫猜想,写的代码总是出错,急需大神帮我看一下我的代码。”相关的问题,中国学网通过互联网对“VB 验证哥德巴赫猜想,写的代码总是出错,急需大神帮我看一下我的代码。”相关的解决方案进行了整理,用户详细问题包括:要么就是不报错,但是什么都不显示;要么就是报错,各种错误我都晕了,哪位大神能够帮帮忙。。Private Sub Command1_Click() Dim a As Integer Dim b As String Dim i, j, n, x As Integer: Dim fact As Boolean a = InputBox$(&请输入一个大于2小于1000的偶数&) c1$ = Chr(13) + Chr(10) msg$ = &输入的数字为:& & a & c1$ & &请确认该数为偶数& & c1$ & &请确认该数大于2小于1000& Title$ = &数据核查&b = MsgBox(msg$, 36, Title$)If a / 2 = a \ 2 And a & 2 And a & 1000 Then Form1.Print fact(b) End IfElse b = MsgBox(&输入错误&, 48, &警告&)End IfEnd SubPublic Function fact(b As Integer) As Long For i = 2 To a - 1 For j = 2 To a - 1 x = a - y If x Mod i = 0 Then Exit For End If Next i If y Mod j = 0 Then Exit For End If Next j
If缉涪光皇叱郝癸酮含捆 i &= x Then If j &= y Then fact(b) = a & &=& & x & &+& & yEnd IfEnd Function,具体解决方案如下:解决方案1:
源代码错误挺多,看一下下面的代码吧:Private&Sub&Command1_Click()&&&&Dim&a&As&Integer&&&&&&&&a&=&InputBox(&请输入一个大于2小于1000的偶数&)&&&&c1$&=&Chr(13)&+&Chr(10)&&&&msg$&=&&输入的数字为:&&&&a&&&c1$&&&&请确认该数为偶数&&&&c1$&&&&请确认该数大于2小于1000&&&&&Title$&=&&数据核查&&&&&MsgBox&msg$,&36,&Title$&&&&If&a&/&2&=&a&\&2&And&a&&&2&And&a&&&1000&Then&&&&&&&&Print&fact(a)&&&&Else&&&&&&&&MsgBox&&输入错误&,&48,&&警告&&&&&End&IfEnd&SubPublic&Function&fact(a&As&Integer)&As&String&&For&x&=&2&To&a&/&2&&&&For&j&=&2&To&x&-&1&&&&&&&&If&x&Mod&j&=&0&Then&GoTo&NextX&&&&Next&j&&&&y&=&a&-&x&&&&For&j&=&2&To&y&-&1&&&&&&&&If&y&Mod&j&=&0&Then&GoTo&NextX&&&&Next&j&&&&fact&=&a&&&&=&&&&x&&&&+&&&&y&&&&Exit&FunctionNextX:Next&xEnd&Function
解决方案2:
你这个错误实在太多,你看看我的附件吧!
2个回答2个回答2个回答1个回答1个回答2个回答1个回答2个回答1个回答
相关文章:
最新添加资讯
24小时热门资讯
Copyright © 2004- All Rights Reserved. 中国学网 版权所有
京ICP备号-1 京公网安备02号数学问题1+2是谁证明的 证明过程是什么求大神帮助
小王子04732
哥德巴赫猜想 :(Goldbach Conjecture) 是不是所有的大于2的偶数,都可以表示为两个素数的呢?这个问题是德国数学家哥德巴赫(C.Goldbach,)于日在给大数学家欧拉的信中提出的,所以被称作哥德巴赫猜想.同年6月30日,欧拉在回信中认为这个猜想可能是真的,但他无法证明.从此,这道数学难题引起了几乎所有数学家的注意.哥德巴赫猜想由此成为数学皇冠上一颗可望不可及的“明珠”.“用当代语言来叙述,哥德巴赫猜想有两个内容,第一部分叫做奇数的猜想,第二部分叫做偶数的猜想.奇数的猜想指出,任何一个大于等于7的奇数都是三个素数的和.偶数的猜想是说,大于等于4的偶数一定是两个素数的和.”(引自《哥德巴赫猜想与潘承洞》) 哥德巴赫猜想貌似简单,要证明它却着实不易,成为数学中一个著名的难题.18、19世纪,所有的数论专家对这个猜想的证明都没有作出实质性的推进,直到20世纪才有所突破.直接证明哥德巴赫猜想不行,人们采取了“迂回战术”,就是先考虑把偶数表为两数之和,而每一个数又是若干素数之积.如果把命题"每一个大偶数可以表示成为一个素因子个数不超过a个的数与另一个素因子不超过b个的数之和"记作"a+b",那么哥氏猜想就是要证明"1+1"成立.1900年,20世纪最伟大的数学家希尔伯特,在国际数学会议上把“哥德巴赫猜想”列为23个数学难题之一.此后,20世纪的数学家们在世界范围内“联手”进攻“哥德巴赫猜想”堡垒,终于取得了辉煌的成果.到了20世纪20年代,有人开始向它靠近.1920年,挪威数学家布爵用一种古老的筛选法证明,得出了一个结论:每一个比6大的偶数都可以表示为(9+9).这种缩小包围圈的办法很管用,科学家们于是从(9十9)开始,逐步减少每个数里所含质数因子的个数,直到最后使每个数里都是一个质数为止,这样就证明了“哥德巴赫猜想”.1920年,挪威的布朗(Brun)证明了 “9+9 ”.1924年,德国的拉特马赫(Rademacher)证明了“7+7 ”.1932年,英国的埃斯特曼(Estermann)证明了 “6+6 ”.1937年,意大利的蕾西(Ricei)先后证明了“5+7 ”,“4+9 ”,“3+15 ”和“2+366 ”.1938年,苏联的布赫 夕太勃(Byxwrao)证明了“5+5 ”.1940年,苏联的布赫 夕太勃(Byxwrao)证明了 “4+4 ”.1948年,匈牙利的瑞尼(Renyi)证明了“1+c ”,其中c是一很大的自然数.1956年,中国的王元证明了 “3+4 ”.1957年,中国的王元先后证明了 “3+3 ”和“2+3 ”.1962年,中国的潘承洞和苏联的巴尔巴恩(BapoaH)证明了 “1+5 ”,中国的王元证明了“1+4 ”.1965年,苏联的布赫 夕太勃(Byxwrao)和小维诺格拉多夫(BHHopappB),及 意大利的朋比利(Bombieri)证明了“1+3 ”.1966年,中国的陈景润证明了 “1+2 ”[用通俗的话说,就是大偶数=素数+素数*素数或大偶数=素数+素数(注:组成大偶数的素数不可能是偶素数,只能是奇素数.因为在素数中只有一个偶素数,那就是2.)].其中“s + t ”问题是指:s个质数的乘积 与t个质数的乘积之和 20世纪的数学家们研究哥德巴赫猜想所采用的主要方法,是筛法、圆法、密率法和三角和法等等高深的数学方法.解决这个猜想的思路,就像“缩小包围圈”一样,逐步逼近最后的结果.由于陈景润的贡献,人类距离哥德巴赫猜想的最后结果“1+1”仅有一步之遥了.但为了实现这最后的一步,也许还要历经一个漫长的探索过程.有许多数学家认为,要想证明“1+1”,必须通过创造新的数学方法,以往的路很可能都是走不通的.参考资料:/view/1808.htm
为您推荐:
其他类似问题
扫描下载二维码跳出6种囚笼,才可能出现解决歌德巴赫猜想的曙光!_哥德巴赫猜想吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名:今日本吧第个签到,本吧因你更精彩,明天继续来努力!
本吧签到人数:0成为超级会员,使用一键签到本月漏签0次!成为超级会员,赠送8张补签卡连续签到:天&&累计签到:天超级会员单次开通12个月以上,赠送连续签到卡3张
关注:3,016贴子:
跳出6种囚笼,才可能出现解决歌德巴赫猜想的曙光!收藏
1、“数值逼近”法----只能解决一些中等难度的不定方程特例,如”1+2“,“费马大定理”;歌德巴赫猜想是不定方程的一个高难度特例,目前除了采用“数值逼近”(微积分,代数,几何,复变等)方法外,还没发现普通的有效方式。由于大多函数不可积,或者说大多数函数的反函数不存在有理表达式,因此“数值逼近”只能解决一些中等难度的不定方程,多数专业数学家采用此方法;2、“整数法”----解决不定方程范围更加有限,因为“整数法”本质上是“剩余法”,只能解决最简单的不定方程,几乎对非线性不定方程无能为力,多数初等数学爱好者采用此方法;3、“递推归纳法”-----由于整数的不连续性,“递推归纳法”也仅能解决极少数不定方程问题;4、“数理逻辑法”-----本质上任何问题都可变换到“数理逻辑”,但“数理逻辑”不是解决问题的工具,只是解决问题的一座桥梁而已,最终还是要回到数值计算上来;5、”反证法“-----“反证法”离不开“中介体”,“中介体”实际上就是一种数值参量,因此“反证法”也被包含在上述方法之内;6、”综合法“----综合上述所有方法进行论证,综合法则效果最好,但仍然不不能解决所有不定方程问题;
从以上6点可知,要想解决-----歌德哥德巴赫猜想----就要寻找新的数学方法,不要在上述六种方法上打主义,实际上多数业余爱好者都在“整数,逻辑,反正,递推”上打转转“,这无利于解决歌德巴赫猜想等类似超级难题,而专业数学家采用的“数值逼近”法也是无法求解歌德巴赫猜想的;7、由歌德尔定理可知,很多数学问题是不可证的,而歌德巴赫猜想不存在证明的大于概率在(2^100-1)/2^100;8、当然,若谁能证明“歌德巴赫猜想”不可证,也就等于证明了“歌德巴赫猜想“是成立的;因此,真正的天才也不会被歌德尔定理吓倒;
证明哥德巴赫猜想,要有符合客观规律的计算公式,需要计算出无穷的偶数是不是存在素对。不会计算的人,都是胡猜胡扯。在越来越大的整数x²以内存在的素数个数越来越大于10x,所以越来越大的偶数存在的素数素对越来越多。因为:(10x)²/2/x²>1,证明:哥德巴赫猜想正确。10000以内有1229个素数,1229²/2/1;1,所以越来越大的偶数存在的素数素对越来越多
从数的客观构成规律、形式研究才能及解决。
你不想想1楼的2与8不矛盾吗?《整数论》的证明结论:是指【哥毕费】被归入了《二元整数和差积结构的运算合同》,属于【合同公理】,只能用运算规律展示哥解存在于费解不存在。不能用人为的因素去搞【凑数证明】。
2与8并不矛盾,因为能证明“歌德巴赫猜想”不可证使用的逻辑系统并非是歌德尔定理中使用的逻辑系统!
为什么不能用“整数法”解决歌德巴赫猜想?答: 整数条件的问题并不一定能用整数方法求解,需要引进无理数,有的问题甚至也不能用无理数表达。例如整系数二次方程的根就无法用整数表达,而整系数三,四次方程的根甚至不能用无理数表达,需要引进复数,整系数五次方程的根甚至不能用无理数及复数表达。
&歌德巴赫猜想&的条件虽然是整数的,但解决的答案实际上隐藏着深刻的无理数,复数或者更加复杂的虚数概念,但最关键的问题是“无理数”及“多变量变换”,任何虚数都可用“多变量”表示。
因此,千万不要用“整数法”在“歌德巴赫猜想”上打转转!
回复7楼与8楼:,《整数论》的前提是以1为公度的“公度原则”。运算首先是要执行“顺序公理”、”连续公理“与“平行公理”。对于“平行公理”来说,就是要执行“方程”与“公式”中的“=”号,要求“=”号两端都是正整数。没有“二元整数和差积结构”(即“结合公理”)所产生的“运算法则”,构建为“运算合同”(称“合同公理”),是执行不了“公度原则”的。&合同公理“的数理运算法则,不需要“哥德尔定理中使用的逻辑系统”,您认为行吗?
歌德尔不完备性定理原理:设Th(N,+,*)表示皮亚诺运算所有为真论述的集合(N有加法和乘法运算),N的一阶理论,则(1)
Th(N,+,*)不是可计算枚举的。(2)
皮亚诺运算中至少一个为真论述不能被证明。
歌德巴赫猜想很可能就是一个在此“皮亚诺运算”上不可证明的超级难题,但若能跳出“皮亚诺运算”,也不排除是可证的;
20年前的ps游戏全新复刻驾临pc端
歌德巴赫猜想不定方程刻画:1、当且仅当下述两个同余方程同时成立时,(2a-b)与不b才同时为素数,||表示同余除号mod
(2n-m)! || (2n-m+1)=-1
m! || (m+1)=-12、看看这个阶乘不定方程,就可以预知歌德巴赫猜想有多难了;3、看了歌德巴赫猜想同余方程表达后,你还想用整数思维去解决歌德巴赫猜想吗?
1、当且仅当下述两个同余方程同时成立时,(2n-m)与不m才同时为素数,||表示同余除号mod
若[(p-1)!+1]可被p整除,且[(p-1)!(2n-2p)!+1]还可被(2n-p)所整除,则p与(2n-p)都是奇素数,就是哥德巴赫所猜想的【偶数2n&6都可表为两个不同奇素p1&p2&2之和】所求之解。——其中,【若】是威尔逊定理,【且】是我推导出的威尔逊定理动态化。供参考。
笔误修正为---------歌德巴赫猜想不定方程刻画:1、当且仅当下述两个同余方程同时成立时,(2n-m)与m才同时为奇素数,||表示同余除号mod
(2n-m)! || (2n-m+1)=-1
m! || (m+1)=-12、看看这个阶乘不定方程,就可以预知歌德巴赫猜想有多难了;3、看了歌德巴赫猜想同余方程表达后,你还想用整数思维去解决歌德巴赫猜想吗?
哈代()大师,已经为我们指出破解哥德巴赫猜想的方法:HARDY(N)~C2(N)*N/LOG(N)^2这里C2(N)=2*C(N)C(N)=PI(1-1/(P-1)^2)*PI((P-1)/(P-2))
≥6的2n都能用P1+P2来表示这就是哥德巴赫猜想。这是祖辈计算不完的命题(我称无穷命题)【1】这是一道无穷命题,必定要有客观存在的无穷数理才能证明它。【2】展示出统一公式、统一方法证哥猜。这是目的。【3】我们要给后人留下的就是行之有较的、前人没有的数理、统一公式、统一方法…【4】我们要的是现实能验证,∞用数理通来达到。之路就是理实合一。!
之路就是理实合一。!
1742 = 619 + 1123 19
1742 = 673 + 1069 20
1742 = 691 + 1051 21
1742 = 709 + 1033 22
1742 = 733 + 1009 23
1742 = 751 + 991 24
1742 = 823 + 919 25
1742 = 859 + 883
b= .660203
d= 1.107692
c1= .7313018(拉曼纽扬系数)
c2= 1.462604PI( 1742 )= 271log( 1742 )= 7.46279log( 1742 )^2= 55.69323log(log( 1742 )= 2.009929O =log(log( 1742 ))/log( 1742 )=
.2693268D( 1742 )= 25 HARDY( 1742 )= 45.74803
har( 1742 )= 82.99211 %(哈代公式)D( 1742 )= 25 Dselberg( 1742 )= 464.5536
Selberg( 1742 )=
%D( 1742 )= 25 Dwan( 1742 )= 232.2768
Wa( 1742 )= 829.1072 %(王元公式)D( 1742 )= 25 Dpan( 1742 )= 348.4152
pa( 1742 )=
%D( 1742 )= 25 Chen1( 1742 )= 179.1996
Ch1( 1742 )= 616.7984 %(陈景润公式)D( 1742 )= 25 Vun( 1742 )= 41.73728
Vn( 1742 )= 66.9491 %D( 1742 )= 25 Chen( 1742 )= 30.83096
Zuo( 1742 )= 23.32384 %(陈君佐公式)Ok 看来,还是哈代公式,与我的公式,比较可靠。
我的公式:ZUO(N)~C(N)*PI(N)^2/N当N=1742ZUO(1742)~C(1742)*PI(2=.^2/1742=.41/1742=..15901= 30.83096(精确值D(1742)=25)百分误差:Zu( 1742 )=( 30.83096-25)/25*100%= 23.32384 %(陈君佐公式)我的渐近公式,在七条公式中,是最渐近于精确值的。
回14楼之2、3:是的!这个方程涉及大数据的应用,除了15楼提出的哈代公式(实际上是15楼的筛法程序表述)之外,还有另外的公式与筛法程序。如果16楼写出四条之后,只许他的数理通,就没法交流了。
哈代公式:HARDY(N)~C2(N)*N/LOG(N)^2当N=1742HARDY(1742)~C2(1742)*1742/LOG(1742)^2=2*C(1742)*1742/LOG(1742)^2=2*0.2/ 55.69323= 1..27849= 45.74803(精确值D(1742)=25)百分误差:HAR(1742)=( 45.74803-25)/25*100%= 82.99211 %(哈代公式)当对原始的哈代公式乘以优选系数“0.618”,HARDY0.618(1742)~0.618*C2(1742)*1742/LOG(1742)^2=0.618*2*C(1742)*1742/LOG(1742)^2=0.618*2*0.2/ 55.69323= 0.618*1..27849=0.618* 45.28(精确值D(1742)=25)经我修改后的哈代公式的百分误差:HAR0.618(1742)=(28.27228-25)/25*100%=13.08912%(精确度大大地提升)证实哈代生前所说:“我的工作,方向是正确的,如果有错误,就只出在细节上。”是有理有据的!!
如何把你的歌德巴赫猜想证明推荐给读者评判?1、为了清晰明了,也可把歌德巴赫猜想表为标准的不定方程,或称歌德巴赫方程;
(2n-m)! = (2n-m+1)x-1=0
m!= (m+1)y-1=02、还存在若干筛法表达式,都与此等价,就不必一一列出;3、首先把自己的方法与此方程反复比对分析是否等价,若不等价就立马弃之,再寻求新的方法,不要纠缠在无味的数值验证和公式推导之中;4、如果你的方法跳出了6个囚笼,而又与歌德巴赫方程等价,并确信无误,你就可以正式让读者来评判你的大作了!
陈景润的筛选法呢
取前人之精毕,用后人之创新,才能理想解决≥6的2n都能用P1+P2来表示。
陈景润数使用的筛选法------------是一次筛---------只能筛出N=P1+殆素数(即合数)不能筛出N=P1+P2,
只要解决了≥6的2n及奇Pn的客观统一来路、数理。就完成了解决哥猜证明的曙光!
南通王老师,我看了:“只要解决了≥6的2n及奇Pn的客观统一来路、数理。就完成了解决哥猜证明的曙光“的论断,但是,比如,要验证一百万,1000000这个偶数就比较难办了。当偶数越大,就不知道M/2以后偶数有哪些了。哥猜证明方式有很多,证明在于验证。大家都否定了归纳推理法的证明方式。比如:10=3+712=5+714=7+716=5+1118=5+13.............100=3+97.............以此类推,任意偶数M=P+P。从你的说明、证明表述上,你的“只要解决了≥6的2n及奇Pn的客观统一来路、数理。就完成了解决哥猜证明的曙光“达不到证明目的。 如果你有兴趣,尊请你在百度上看一下”1+1证明奇妙破解“。
要验证一百万,1000000这个偶数就比较难办了。---------------N=? 1000000A=? 1001
1+99896922
9+99895123
1+99890924
3+99889725
1+99881926
7+99881327
3+99871728
9+99868129
7+99863330
9+99856131
7+99851332
1+99842933
1+99839934
9+99838135
7+99821336
9+99811137
1+99806938
3+99802739
7+99797340
9+99796141
1+99788942
7+99779343
3+99772744
1+99764945
1+99758946
7+99758347
7+99755348
9+99754149
9+99739150
1+99737951
7+99734352
3+99730753
1+99725954
3+99724755
7+99716356
9+99712157
7+99710358
3+99709759
9+99709160
7+99704361
3+99703762
9+99700163
9+99688164
1+99662965
9+99655166
1+99653967
9+99646168
3+99640769
1+99632970
7+99632371
3+99619772
3+99616773
1+99611974
9+99601175
3+99598776
3+99592777
1+99590978
7+99578379
3+99574780
7+99566381
9+99565182
9+99559183
1+99554984
7+99536385
3+99532786
9+99508187
3+99499788
9+99499189
1+99494990
7+99491391
9+99490192
7+99485393
9+99481194
1+99476995
9+99469196
3+99466797
7+99458398
1+99455999
3+994307100
陈君佐老师 :厉害!0000=P+P=?
G3J《 计算连续50个偶数的表法数 》=================================
D(N) : N = p1 + p2 , p1 &= p2请输入偶数:1000000100% 完成D ( 1000000 ) = 5402D ( 1000002 ) = 8200(多)D ( 1000004 ) = 4160D ( 1000006 ) = 4871D ( 1000008 ) = 9380(多)D ( 1000010 ) = 5951D ( 1000012 ) = 4375D ( 1000014 ) = 8133(多)D ( 1000016 ) = 4042D ( 1000018 ) = 4061D ( 1000020 ) = 12984(多)D ( 1000022 ) = 4071D ( 1000024 ) = 4119D ( 1000026 ) = 8120(多)D ( 1000028 ) = 4059D ( 1000030 ) = 5421D ( 1000032 ) = 9035(多)D ( 1000034 ) = 4855D ( 1000036 ) = 4295D ( 1000038 ) = 8869(多)D ( 1000040 ) = 5696D ( 1000042 ) = 4386D ( 1000044 ) = 8100(多)D ( 1000046 ) = 4298D ( 1000048 ) = 4921D ( 1000050 ) = 11095(多)D ( 1000052 ) = 4073D ( 1000054 ) = 4566D ( 1000056 ) = 8113(多)D ( 1000058 ) = 4062D ( 1000060 ) = 5573D ( 1000062 ) = 9717(多)D ( 1000064 ) = 4420D ( 1000066 ) = 4121D ( 1000068 ) = 8095(多)D ( 1000070 ) = 5393D ( 1000072 ) = 4161D ( 1000074 ) = 8075(多)D ( 1000076 ) = 5796D ( 1000078 ) = 4085D ( 1000080 ) = 10811(多)D ( 1000082 ) = 4032D ( 1000084 ) = 4294D ( 1000086 ) = 8431(多)D ( 1000088 ) = 4080D ( 1000090 ) = 7105D ( 1000092 ) = 8045(多)D ( 1000094 ) = 4336D ( 1000096 ) = 4052D ( 1000098 ) = 8979(多)D ( 1000100 ) = 5421凡能被“3‘整除的偶数,大多数D(N)就比较多!!这是心算怪杰,拉曼纽扬(),在近一百年前所预言了的结论。
登录百度帐号推荐应用
为兴趣而生,贴吧更懂你。或VB 验证哥德巴赫猜想,写的代码总是出错,急需大神帮我看一下我的代码。_百度知道
VB 验证哥德巴赫猜想,写的代码总是出错,急需大神帮我看一下我的代码。
要么就是不报错,但是什么都不显示;要么就是报错,各种错误我都晕了,哪位大神能够帮帮忙。。Private Sub Command1_Click()
Dim a As Integer
Dim b As String
Dim i, j, n, x As Integer: Dim fact As Boolean
a = InputBox$(&请输入一个大于2小于1000的偶数&)
c1$ = Chr(13) + Chr(10)
msg$ = &输入的数字为:& & a & c1$ & &请确认该数为偶数& & c1$ & &请确认该数大于2小于1000&
Title$ = &数据核查&b = MsgBox(msg$, 36, Title$)If a / 2 = a \ 2 And a & 2 And a & 1000 Then Form1.Print fact(b)
End IfElse b = MsgBox(&输入错误&, 48, &警告&)End IfEnd SubPublic Function fact(b As Integer) As Long For i = 2 To a - 1 For j = 2 To a - 1
If x Mod i = 0 Then Exit For
If y Mod j = 0 Then Exit For
If缉涪光皇叱郝癸酮含捆 i &= x Then
If j &= y Then
fact(b) = a & &=& & x & &+& & yEnd IfEnd Function
提问者采纳
源代码错误挺多,看一下下面的代码吧:Private&Sub&Command1_Click()&&&&Dim&a&As&Integer&&&&&&&&a&=&InputBox(&请输入一个大于2小于1000的偶数&)&&&&c1$&=&Chr(13)&+&Chr(10)&&&&msg$&=&&输入的数字为:&&&&a&&&c1$&&&&请确认该数为偶数&&&&c1$&&&&请确认该数大于2小于1000&&&&&Title$&=&&数据核查&&&&&MsgBox&msg$,&36,&Title$&&&&If&a&/&2&=&a&\&2&And&a&&&2&And&a&&&1000&Then&&&&&&&&Print&fact(a)&&&&Else&&&&&&&&MsgBox&&输入错误&,&48,&&警告&&&&&End&IfEnd&SubPublic&Function&fact(a&As&Integer)&As&String&&For&x&=&2&To&a&/&2&&&&For&j&=&2&To&x&-&1&&&&&&&&If&x&Mod&j&=&0&Then&GoTo&NextX&&&&Next&j&&&&y&=&a&-&x&&&&For&j&=&2&To&y&-&1&&&&&&&&If&y&Mod&j&=&0&Then&GoTo&NextX&&&&Next&j&&&&fact&=&a&&&&=&&&&x&&&&+&&&&y&&&&Exit&FunctionNextX:Next&xEnd&Function
提问者评价
谢谢大神指导!!谢谢谢谢!!
来自团队:
其他类似问题
为您推荐:
哥德巴赫猜想的相关知识
其他1条回答
你这个错误实在太多,你看看我的附件吧!
等待您来回答
下载知道APP
随时随地咨询
出门在外也不愁证明:任何大于或等于6的偶数,都可以表示成两个奇素数之和这是老师告诉我的,叫哥德巴赫猜想吧,他说能证明这个定理就成大数学家了。可是我不会,求大神解答。
树皮降临0042
既然你知道“能证明这个定理就成大数学家了。”你在这儿能找到答案吗?即使有哪位大数学家能证明(这个定理简称1+1),陈景润证明1+2的稿纸就用了几麻袋。这儿能写下吗?
12=11+5这就是例子
为您推荐:
扫描下载二维码}

我要回帖

更多关于 哥德巴赫猜想吧 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信