PCDVD數位科技討論區
第7頁 共10頁 « 第一 上一頁 4 5 6 7 8 9 10 下一頁
每頁顯示此主題的 10 個文章

PCDVD數位科技討論區 (https://www.pcdvd.com.tw/index.php)
-   七嘴八舌異言堂 (https://www.pcdvd.com.tw/forumdisplay.php?f=12)
-   -   能看出這個簡單程式有什麼問題的人絕對是個高手 (https://www.pcdvd.com.tw/showthread.php?t=816594)

a8592036 2008-09-22 04:59 AM
simulation後就知道有沒有問題了
若結果沒問題 也不用想程式有沒有問題

山賊 2008-09-22 05:39 AM
嗯! 既然 int() 是無條件捨去小數點以下位數, 那麼整個程式架構應該無誤沒有問題, 因為 int(rnd()*num)+1 產生的亂數, 是挑選數字的位置, 等於是將剩下的數取其一, 就算拿字母代替數字填入各位址也可.

ps: 我沒用過 vb, 我最後跟 basic 有關係的是 qb.....哈!..... :laugh:

八豆妖 2008-09-22 07:14 AM
引用:
作者山賊
嗯! 既然 int() 是無條件捨去小數點以下位數, 那麼整個程式架構應該無誤沒有問題, 因為 int(rnd()*num)+1 產生的亂數, 是挑選數字的位置, 等於是將剩下的數取其一, 就算拿字母代替數字填入各位址也可.

ps: 我沒用過 vb, 我最後跟 basic 有關係的是 qb.....哈!..... :laugh:

沒想到山賊兄除了玩天線, 對於寫程式也小有成就啊.. :eek:

M35G35 2008-09-22 08:08 AM
引用:
作者MrHermes
大樂透是49 選 6 吧.... :unbelief: 我已經槓到快脫褲子了別想唬弄我.




:cry:
大樂透連小獎都沒中過半次... :think:

=風= 2008-09-22 09:39 AM
這個程式看來是我多慮了 :ase
早上模擬了好幾次
機率上是沒問題的
不好意思了
:)

有夠呆 2008-09-22 10:05 AM
很久沒寫程式了
所以我只是大約看了一下
我也沒VB

不過我記得rnd 亂數好像是常態分佈
所以本身的机率就不公平
要用另一種才對

a9607 2008-09-22 10:07 AM
引用:
作者=風=
要今天公佈答案 還是明天 讓高手可以挑戰一下 :)

答案很不容易看出來 我一開始是對它的程式感到不可思議
樂透程式碼比我寫的足足少了一半 讓我大開眼界
仔細研究了好久 才發現樂透程式根本就不能這樣寫 :)



引用:
作者=風=
樂透的理論值
機率一定要一樣 只是這個程式
跑出來的機率是不是符合理論值
我沒把握 請大家說明一下
謝謝 :)


引用:
作者=風=
我一開始有把握 現在又變成沒把握
這個程式到底可不可跑出理論值的機率
:)


QUOTE==風=]這個程式看來是我多慮了 :ase
早上模擬了好幾次 機率上是沒問題的 不好意思了
:)[/QUOTE]

1.說要公佈答案的人自己其實是沒答案的... :ase

2.搞了半天 是要別人trace其他人的程式...這種「標題殺人法」還真是有心機啊∼∼∼∼ :o

passerx 2008-09-22 10:14 AM
引用:
作者lemming
你應該沒看清楚喔
迴圈裡有兩行是
ball(b1) = ball(num)
num = num - 1

這兩行會解決你提出的問題


對,少看了一行.
:ase

高橋炎介 2008-09-22 10:34 AM
引用:
作者=風=
要今天公佈答案 還是明天 讓高手可以挑戰一下

答案很不容易看出來 我一開始是對它的程式感到不可思議
樂透程式碼比我寫的足足少了一半 讓我大開眼界
仔細研究了好久 才發現樂透程式根本就不能這樣寫


請問原本要公佈的答案是什麼?樂透程根本要怎麼寫?
公布出來讓大家見識見識也不錯阿

PCVCD 2008-09-22 10:45 AM
那個亂數表沒用時間常數

會不會照成選了20

20換39

之後4次選到20的機率降低


亂數表相同的數字應該不會很接近


所有的時間均為GMT +8。 現在的時間是11:53 AM.
第7頁 共10頁 « 第一 上一頁 4 5 6 7 8 9 10 下一頁
每頁顯示此主題的 10 個文章

vBulletin Version 3.0.1
powered_by_vbulletin 2025。