一个小练习，判断素数

gb57

一个小练习，和大家交流一下，素数判断
=IF(SUM(--(MOD(F10,ROW(INDIRECT("2:"&ROUNDDOWN(F10^0.5,0))))=0)),IF(OR(F10=2,F10=3),"素数","合数"),"素数")
素数.rar (1.48 KB, 下载次数: 35)

2010-5-19 10:13 上传

点击文件名下载附件

我想到了一个更好的办法，可以少浪费资源
=IF(SUM((MOD(A1,2)=0)+(MOD(A1,2*ROW(INDIRECT("1:"&ROUNDDOWN(A1^0.5*0.5,0)+1))+1)=0)),IF(OR(A1=2,A1=3,A1=5),"素数","合数"),"素数")
但是能判断的范围和第一次的方法是一样的 2^28-1=268435455

[ 本帖最后由 gb57 于 2010-6-7 10:18 编辑 ]

davidhawk

可惜GCD()函数不支持数组运算,否则=IF(SUM(GCD(A1,ROW(INDIRECT("1:"&A1-1))))<A1,"素数","合数") 这样会简单很多....


我也写一个简单逻辑的公式:
=IF(SUM(--(A1/ROW(INDIRECT("1:"&A1))=INT(A1/ROW(INDIRECT("1:"&A1)))))<3,"素数","合数")

[ 本帖最后由 davidhawk 于 2010-5-19 10:41 编辑 ]

gb57

原帖由 davidhawk 于 2010-5-19 10:26 发表
可以GCD()函数不支持数组运算,否则=IF(SUM(GCD(A1,ROW(INDIRECT("1:"&A1-1))))

你这个好像稍微大一点的数就不能算了，我例子里面那个524287就算不了

davidhawk

原帖由 gb57 于 2010/5/19 10:35 发表


你这个好像稍微大一点的数就不能算了，我例子里面那个524287就算不了

GCD不能用于数组计算,所以这个公式是无效的.
你用另外一个试试看

davidhawk

哈哈,超过65536了,我的另外一个公式也不支持.....

晚枫

原帖由 gb57 于 2010-5-19 10:35 发表


你这个好像稍微大一点的数就不能算了，我例子里面那个524287就算不了

MOD函数的参数不能大于524287（=2^19-1）

晚枫

原帖由 davidhawk 于 2010-5-19 10:44 发表
哈哈,超过65536了,我的另外一个公式也不支持.....

ROW()只能到65536，2007有更多的行数，不知道2007怎么样？

山桑弓

我也来写一个，1非质非合，数组输入
=IF(A1<2,"非质非合",IF(SUM(IF(MOD(A1,ROW(INDIRECT("1:"&A1)))=0,1))<3,"质数","合数"))
非原创，书上学来的。

[ 本帖最后由 山桑弓 于 2010-5-20 22:23 编辑 ]

davidhawk

原帖由 晚枫 于 2010/5/19 10:47 发表

ROW()只能到65536，2007有更多的行数，不知道2007怎么样？

我用的就是2007, 不过素数去除的时候应该可以除到自身的一半就能判断是否为素数了.
就能判断到65536*2的范围了...

gb57

已经更新方法