VBS 正則判別素數(shù)(質(zhì)數(shù))
來源：易賢網(wǎng) 閱讀：1169 次 日期：2014-05-09 16:35:45
溫馨提示：易賢網(wǎng)小編為您整理了“VBS 正則判別素數(shù)(質(zhì)數(shù))”,方便廣大網(wǎng)友查閱！

代碼如下:

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

看到標題你一定會不屑一顧，枚舉質(zhì)數(shù)誰不會？

代碼如下:

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

更多信息請查看IT技術(shù)專欄

更多信息請查看腳本欄目
易賢網(wǎng)手機網(wǎng)站地址：VBS 正則判別素數(shù)(質(zhì)數(shù))

2025國考·省考課程試聽報名

  • 報班類型
  • 姓名
  • 手機號
  • 驗證碼
關(guān)于我們 | 聯(lián)系我們 | 人才招聘 | 網(wǎng)站聲明 | 網(wǎng)站幫助 | 非正式的簡要咨詢 | 簡要咨詢須知 | 加入群交流 | 手機站點 | 投訴建議
工業(yè)和信息化部備案號：滇ICP備2023014141號-1 云南省教育廳備案號：云教ICP備0901021 滇公網(wǎng)安備53010202001879號 人力資源服務(wù)許可證：（云）人服證字（2023）第0102001523號
聯(lián)系電話：0871-65099533/13759567129 獲取招聘考試信息及咨詢關(guān)注公眾號：hfpxwx
咨詢QQ：526150442（9:00—18:00）版權(quán)所有:易賢網(wǎng)