判断一个整数是不是素数下载_Word模板_1

is_633423

暂无简介

判断一个整数是不是素数判断一个整数是不是素数 Delphiº?Êý?ºÅÐ?ÏÒ??öÕûÊýÊÇ??ÊÇËØÊý2007/11/26 ÏÂÎç 10:59function IsPrime(AInt: integer): boolean; var I : integer; begin Result := True; for I := 2 to Trunc(Sqrt(Abs(AInt))) do if AInt mod I = 0 then begin Result := False; Break; end; end; pr...

判断一个整数是不是素数 Delphiº?Êý?ºÅÐ?ÏÒ??öÕûÊýÊÇ??ÊÇËØÊý2007/11/26 ÏÂÎç 10:59function IsPrime(AInt: integer): boolean; var I : integer; begin Result := True; for I := 2 to Trunc(Sqrt(Abs(AInt))) do if AInt mod I = 0 then begin Result := False; Break; end; end; procedure TForm1.Button1Click(Sender: TObject); begin if IsPrime(-17) then Showmessage('True'); end; ÅÐ?ÏÊÇÆæÊý??ÊÇÅ?Êý if (temp mod 2)=0 then shomwessage('Å?Êý') else showmessage('ÆæÊý'??

本文档为【判断一个整数是不是素数】，请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑，图片更改请在作品中右键图片并更换，文字修改请直接点击文字进行修改，也可以新增和删除文档中的内容。

判断一个整数是不是素数

热门搜索

历史搜索