const NUM int = 100

創(chuàng)新互聯(lián)建站服務(wù)項目包括鎮(zhèn)雄網(wǎng)站建設(shè)、鎮(zhèn)雄網(wǎng)站制作、鎮(zhèn)雄網(wǎng)頁制作以及鎮(zhèn)雄網(wǎng)絡(luò)營銷策劃等。多年來,我們專注于互聯(lián)網(wǎng)行業(yè),利用自身積累的技術(shù)優(yōu)勢、行業(yè)經(jīng)驗、深度合作伙伴關(guān)系等,向廣大中小型企業(yè)、政府機構(gòu)等提供互聯(lián)網(wǎng)行業(yè)的解決方案,鎮(zhèn)雄網(wǎng)站推廣取得了明顯的社會效益與經(jīng)濟效益。目前,我們服務(wù)的客戶以成都為中心已經(jīng)輻射到鎮(zhèn)雄省份的部分城市,未來相信會繼續(xù)擴大服務(wù)區(qū)域并繼續(xù)獲得客戶的支持與信任!
for i := 0; i NUM; i += 1 {
梁辯rand.Seed(int64(i))
fmt.Printf("%d\t", rand.Int63n(int64(NUM)))
}
其實在循環(huán)橡閉缺里面這點時間間隔,納秒也是跟不上的。
還有,你用sleep的方法肯定是不能接受的!!態(tài)檔!
純粹使用EXCEL公式,是不可能的,用VBA編個自動生成程序倒還可以。如果不想用VBA的話,只能配合手工操作了。
如果想1至10的每個數(shù)字都出來的話,直接在A列填上1至10,然后再復制一次。湊足20個數(shù)了,然后在B列輸入公式,=RAND(),將A列和B列選中,按B列排序。A列的順序就亂了,1至10的每個數(shù)正好是出現(xiàn)兩次啊。
還有一個辦法,就是先在A列輸入公式=INT(1+RAND()*10),向下拖至你需要的隨機數(shù)的一半,產(chǎn)生了大約10個隨機數(shù)姿旦兄之后,將這幾個隨機數(shù)選中,復跡襲制,在原位進行數(shù)值方式的選擇性粘帖(目的是去掉公式),然后將重復的去掉,剩下的只保留能被20整除的個數(shù),如保留4個、5個、或10個,然后將這幾個數(shù)復制至20個,這樣得出來的隨機數(shù)肯定次數(shù)遲大相同。然后在B列輸入公式=RAND(),選中AB列,按B列排序,A列的隨機數(shù)就亂序了,A列數(shù)據(jù)就是你想要的。
Dim arr(1 To 20) As Integer, sum As Integer, max As Integer, min As Integer, avg As Single, i As Integer, j As Integer
Private Sub Form_Click()
Print "20個隨機數(shù)是:"
For i = 1 To 20
Randomize
arr(i) = Int((99 - 10 + 1) * Rnd + 10) '生成10到99的兩位數(shù)
Print arr(i);
If i Mod 10 = 0 Then Print '每行輸出10個隨機數(shù)
sum = sum + arr(i)
Next
avg = sum / 20
For i = 1 To 19
For j = i + 1 To 20
If arr(i) arr(j) Then
t = arr(i): arr(i) = arr(j): arr(j) = t '由小到大彎猛排序
End If
Next
Next
max = arr(20): min = arr(1)
Print "最大答鬧御值:" max
Print "最小值清巖:" min
Print "平均值:" avg
End Sub
math/rand 中的所有整數(shù)函數(shù)都租脊生成非負數(shù).
示例 main.go
執(zhí)行
同理,需要int64 int32類型的隨機數(shù)只要修改隨機函數(shù)
但是需要注意 math/rand 幾個函數(shù)的取值區(qū)間!如Intn的范圍[0, n)。[0,20),20會納凳取不到
我自己的需求洞型旅這樣寫已足夠
名稱欄目:go語言生成20位隨機數(shù) go生成隨機字符串
文章轉(zhuǎn)載:http://www.chinadenli.net/article6/ddpsdog.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站改版、做網(wǎng)站、電子商務(wù)、定制網(wǎng)站、網(wǎng)站導航、面包屑導航
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)