【文件属性】：
文件名称：Delphi 判断是不是素数.rar
文件大小：4KB
文件格式：RAR
更新时间：2022-07-30 04:36:51
Delphi源码-算法实例
Delphi 判断是不是素数，一个简单的数字问题吧，数学 学的好的，肯定知道什么是素数了，了解本代码，首先需要知道什么是素数，然后才知道怎么判断素数，本代码就是其中一种判断素数的方法，不是太复杂，核心代码部分如下：
if (edit1.Text='1')or(edit1.Text='2')or(edit1.Text='3') then
begin
label2.Caption:='是素数';
end
else
begin
for i:=2 to trunc(sqrt(p)) do
begin
if frac(p/i)=0 then
begin
label2.Caption:='不是素数';
break;
end
else
begin
label2.Caption:='是素数';
end;
end;
end;
【文件预览】：
codesc.net
----判断是否为素数()
--------Unit1.ddp(51B)
--------Project1.res(876B)
--------Unit1.dfm(1KB)
--------Project1.cfg(434B)
--------Project1.dpr(188B)
--------Project1.dof(2KB)
--------Unit1.pas(1KB)