VBS 正则判别素数(质数)
程序员文章站
2022-07-06 12:58:24
利用正则判别素数，来源于网络，神人！
复制代码 代码如下:set regex = new regexpregex.pattern = "^1?$¦^(11+...
利用正则判别素数，来源于网络，神人！
复制代码 代码如下:
set regex = new regexp
regex.pattern = "^1?$¦^(11+?)\1+$"
for i = 1 to 100
if not regex.test(string(i,"1")) then
wscript.echo i
end if
next
看到标题你一定会不屑一顾，枚举质数谁不会？
复制代码 代码如下:
for i = 1 to 100
for j = 2 to i
if i mod j = 0 then exit for
next
if j = i then wscript.echo i
next
几行代码就能搞定，如此简单。那就看看下面这个程序吧！
复制代码 代码如下:
set regex = new regexp
regex.pattern = "^1?$|^(11+?)\1+$"
for i = 1 to 100
if not regex.test(string(i,"1")) then
wscript.echo i
end if
next
用正则表达式判断质数，神一样的人物。
来源：
http://demon.tw/programming/vbs-prime-number.html
http://www.enun.net/?p=533