Excel公式技巧之如何判断素数
时间:2023-05-01 16:34:59
在列A中给定一个整数值,例如单元格A2,并且2 <= A2 <= 100,要在列B中(例如单元格B2)使用公式进行判断:如果列A中的值是素数,则返回“素数”,如下图1所示。
![Excel公式技巧之如何判断素数](https://img.aspxhome.com/file/2023/4/a142754_0.jpg)
图1
素数也称质数,是指在大于1的自然数中,除了1和它本身外不再有其他因数的自然数。
先不看答案,自已动手试一试。
公式
公式1:=IF(SUM(–ISERR(FIND(“.”,A2/ROW(INDIRECT(“A1:A”&A2)))))=2,”素数”,””)
其原理为,将值除以1至其本身的各个数,然后查找结果中的小数。如果是素数的话,那么结果中只有两个不是小数。
例如,如果A2中的值为11,则公式1可转换为:=IF(SUM(–ISERR(FIND(“.”,A2/ROW(INDIRECT(“A1:A”&11)))))=2,”素数”,””)
转换为:=IF(SUM(–ISERR(FIND(“.”,A2/ROW(INDIRECT(“A1:A11″)))))=2,”素数”,””)
转换为:=IF(SUM(–ISERR(FIND(“.”,A2/ROW($A$1:$A$11))))=2,”素数”,””)
转换为:=IF(SUM(–ISERR(FIND(“.”,11/{1;2;3;4;5;6;7;8;9;10;11})))=2,”素数”,””)
转换为:=IF(SUM(–ISERR(FIND(“.”,{11;5.5;3.66666666666667;2.75;2.2;1.83333333333333;1.57142857142857;1.375;1.22222222222222;1.1;1})))=2,”素数”,””)
转换为:=IF(SUM(–ISERR({#VALUE!;2;2;2;2;2;2;2;2;2;#VALUE!}))=2,”素数”,””)
转换为:=IF(SUM(–{TRUE;FALSE;FALSE;FALSE;FALSE;FALSE;FALSE;FALSE;FALSE;FALSE;TRUE})=2,”素数”,””)
转换为:=IF(SUM({1;0;0;0;0;0;0;0;0;0;1})=2,”素数”,””)
转换为:=IF(2=2,”素数”,””)
转换为:=IF(TRUE,”素数”,””)
得到:素数
公式2:=IF(SUM(–(MOD(A2,A$2:A2)=0))=1,”素数”,””)
其原理为,求值与2至其本身的各个数的余数,如果只有一个余数为0,说明是素数。
![](/images/zang.png)
![](/images/jiucuo.png)
猜你喜欢
怎样设置excel的小数点位数
Mac imovie剪辑完后怎么保存?Mac imovie剪辑完保存方法教学
![](https://img.aspxhome.com/file/2023/5/a216735_0s.jpg)
excel的if公式的使用方法
Win7电脑唤醒时拒绝访问怎么办 Win7电脑唤醒时拒绝访问解决方法
![](https://img.aspxhome.com/file/2023/28/a247695_0s.jpg)
WinXP系统怎么彻底禁止启动项加快电脑开机速度
![](https://img.aspxhome.com/file/2023/2/a287541_0s.jpg)
自明排课系统如何打印?教你打印课表的方法
![](https://img.aspxhome.com/file/2023/7/a332121_0s.jpg)
Win10如何关闭高对比度模式?
![](https://img.aspxhome.com/file/2023/26/a226037_0s.jpg)
excel和word中的自动恢复文件保存位置在哪儿
![](https://img.aspxhome.com/file/2023/0/18980_0s.jpg)
Win10系统桌面位置如何修改?Win10系统桌面位置还原介绍
![](https://img.aspxhome.com/file/2023/4/52384_0s.jpg)
word表格格式统一设置宽度教程
windows7连接wifi表明有限的访问权限怎么解决?
![](https://img.aspxhome.com/file/2023/30/a270779_0s.jpg)
电脑版WPS演示文稿怎么使用水彩笔进行标记
![](https://img.aspxhome.com/file/2023/3/a183173_0s.png)
Win10系统怎么生成dump蓝屏文件?
![](https://img.aspxhome.com/file/2023/25/a219087_0s.jpg)
Win8系统下电脑显示屏自动关闭的解决方法
![](https://img.aspxhome.com/file/2023/3/a293360_0s.jpg)
MathType怎么快速编辑常用矩阵?
![](https://img.aspxhome.com/file/2023/7/a329411_0s.jpg)
Win10安全中心通知怎么关闭?关闭Win10安全中心通知的方法
![](https://img.aspxhome.com/file/2023/27/a238909_0s.jpg)
Windows 10系统升级 惹怒一大堆人
![](https://img.aspxhome.com/file/2023/4/a305515_0s.jpg)
Win8系统如何设置允许程序通过防火墙
![](https://img.aspxhome.com/file/2023/29/a257054_0s.jpg)
Win7看电影时出现黑屏却有声音的解决办法
![](https://img.aspxhome.com/file/2023/27/a232536_0s.jpg)
加快WPS表格数据录入速度的两则技巧
![](https://img.aspxhome.com/file/2023/9/a164239_0s.gif)