代码语言
.
CSharp
.
JS
Java
Asp.Net
C
MSSQL
PHP
Css
PLSQL
Python
Shell
EBS
ASP
Perl
ObjC
VB.Net
VBS
MYSQL
GO
Delphi
AS
DB2
Domino
Rails
ActionScript
Scala
代码分类
文件
系统
字符串
数据库
网络相关
图形/GUI
多媒体
算法
游戏
Jquery
Extjs
Android
HTML5
菜单
网页交互
WinForm
控件
企业应用
安全与加密
脚本/批处理
开放平台
其它
【
Delphi
】
判断longint范围内的数是否为素数
作者:
嘉悦
/ 发布于
2014/10/10
/
1198
procedure getprime; var i, j: Longint; p: array[1..50000] of Boolean; begin FillChar(p, SizeOf(p), true); p[1] := false; i := 2; while i < 50000 do begin if p[i] then begin j := i * 2; while j < 50000 do begin p[j] := false; Inc(j, i); end; end; Inc(i); end; l := 0; for i := 1 to 50000 do if p[i] then begin Inc(l); pr[l] := i; end; end; function prime(x: Longint): Integer; var i: Integer; begin prime := false; for i := 1 to l do if pr[i] >= x then Break else if x mod pr[i] = 0 then Exit; prime := true; end;
试试其它关键字
素数
同语言下
.
多边形面积
.
限定软件使用时间
.
获取磁盘空间大小
.
窗口文字淡入淡出渐变效果
.
创建开机启动项
.
检测并枚举系统安装的打印机
.
实现保存和读取图片
.
字符串分隔函数
.
将BMP格式图形转化为JPG格式
.
解析FTP地址
可能有用的
.
C#实现的html内容截取
.
List 切割成几份 工具类
.
SQL查询 多列合并成一行用逗号隔开
.
一行一行读取txt的内容
.
C#动态修改文件夹名称(FSO实现,不移动文件)
.
c# 移动文件或文件夹
.
c#图片添加水印
.
Java PDF转换成图片并输出给前台展示
.
网站后台修改图片尺寸代码
.
处理大图片在缩略图时的展示
嘉悦
贡献的其它代码
(
3
)
.
给图片打马赛克
.
判断客户端是iOS还是Android等移动终端
.
判断longint范围内的数是否为素数
Copyright © 2004 - 2024 dezai.cn. All Rights Reserved
站长博客
粤ICP备13059550号-3