快上网专注成都网站设计 成都网站制作 成都网站建设
成都网站建设公司服务热线:028-86922220

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

VBS中如何使用正则判别素数-创新互联

这篇文章主要为大家展示了“VBS中如何使用正则判别素数”,内容简而易懂,条理清晰,希望能够帮助大家解决疑惑,下面让小编带领大家一起研究并学习一下“VBS中如何使用正则判别素数”这篇文章吧。

创新互联专注于企业营销型网站建设、网站重做改版、商河网站定制设计、自适应品牌网站建设、H5响应式网站成都商城网站开发、集团公司官网建设、外贸网站制作、高端网站制作、响应式网页设计等建站业务,价格优惠性价比高,为商河等各大城市提供网站开发制作服务。

复制代码 代码如下:


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

以上是“VBS中如何使用正则判别素数”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!


名称栏目:VBS中如何使用正则判别素数-创新互联
网页URL:http://6mz.cn/article/ccsogc.html

其他资讯