筛选质数-遍历

小白弟弟

1000000个数字，遍历找质数，一共耗时12901毫秒
100000个数字，遍历找质数，一共耗时312毫秒
10000个数字，遍历找质数，一共耗时0毫秒

这是数据，不过这种遍历，数字较大的话会很耗时，大佬可以做一下修改
代码有注释，新手都可以看懂~

这个速度还是有点慢的，不过数字在100000多或者以内都是一下处理完毕。
希望大佬优化一下，欢迎做改版，可以圈我一下。。


源码回复可见
附件下载： 筛选质数-遍历.e (3.46 KB, 下载次数: 8)

2022-9-30 23:54 上传

点击文件名下载附件
下载积分: 精币 -2 枚

源码：

  

窗口程序集名	保 留	保 留	备 注
程序集1
变量名	类 型	数组	备 注
开始时间	整数型

子程序名	返回值类型	公开	备 注
_启动子程序	整数型		本子程序在程序启动后最先执行

开始时间 ＝ 取启动时间 ()
筛选质数 ()
返回 (0)  ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备 注
筛选质数过程	整数型		遍历
参数名	类 型	参考	可空	数组	备 注
数字	整数型

变量名	类 型	静态	数组	备 注
i	整数型

如果真 (数字 ＝ 1 或 数字 ＝ 0)  ' 1和0不是素数
返回 (0)

i ＝ 2
判断循环首 (i × i ≤ 数字)
如果真 (数字 ％ i ＝ 0)
返回 (0)  ' 如果有因数，说明不是素数

i ＝ i ＋ 1
判断循环尾 ()
返回 (1)  ' 遍历完退出循环后 说明就是素数

子程序名	返回值类型	公开	备 注
筛选质数

变量名	类 型	静态	数组	备 注
总数量	整数型
t	整数型
i	整数型
质数	文本型

总数量 ＝ 100000
变量循环首 (0, 总数量, 1, i)
如果 (筛选质数过程 (i) ＝ 1)
质数 ＝ 质数 ＋ 到文本 (i) ＋ “|”



变量循环尾 ()
调试输出 (取文本左边 (质数, 取文本长度 (质数) － 1))
调试输出 (“耗时：” ＋ 到文本 (取启动时间 () － 开始时间) ＋ “毫秒”)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 程序集1<br /> .程序集变量 开始时间, 整数型<br /> <br /> .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行<br /> <br /> 开始时间 ＝ 取启动时间 ()<br /> 筛选质数 ()<br /> <br /> 返回 (0)  ' 可以根据您的需要返回任意数值<br /> <br /> <br /> .子程序 筛选质数过程, 整数型, , 遍历<br /> .参数 数字, 整数型<br /> .局部变量 i, 整数型<br /> <br /> .如果真 (数字 ＝ 1 或 数字 ＝ 0)  ' 1和0不是素数<br />     返回 (0)<br /> .如果真结束<br /> <br /> i ＝ 2<br /> .判断循环首 (i × i ≤ 数字)<br />     .如果真 (数字 ％ i ＝ 0)<br />         返回 (0)  ' 如果有因数，说明不是素数<br />     .如果真结束<br /> <br />     i ＝ i ＋ 1<br /> .判断循环尾 ()<br /> <br /> 返回 (1)  ' 遍历完退出循环后 说明就是素数<br /> <br /> <br /> .子程序 筛选质数<br /> .局部变量 总数量, 整数型<br /> .局部变量 t, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 质数, 文本型<br /> <br /> 总数量 ＝ 100000<br /> <br /> .变量循环首 (0, 总数量, 1, i)<br />     .如果 (筛选质数过程 (i) ＝ 1)<br />         质数 ＝ 质数 ＋ 到文本 (i) ＋ “|”<br />     .否则<br /> <br />     .如果结束<br /> <br /> .变量循环尾 ()<br /> 调试输出 (取文本左边 (质数, 取文本长度 (质数) － 1))<br /> 调试输出 (“耗时：” ＋ 到文本 (取启动时间 () － 开始时间) ＋ “毫秒”)

土豪购买：
筛选质数-遍历.e (3.46 KB, 下载次数: 2)

2022-9-30 23:55 上传

点击文件名下载附件
土豪购买
下载积分: 精币 -2 枚

就这样了~

超级奇点

向你学习，感谢你的分享，继续加油哦

来一手

谢谢分享！

孤城已故

瞅瞅看

yxl2008

谢谢分享！！！

pjm123

谢谢分享

wuqingg

你的头像真乖

shanyukun

谢谢分享！！！

15930887162

屌丝通道看看