Delphi可以寫一個比較準的樂透程式碼嗎? |
答題得分者是:RaynorPao
|
flyup
資深會員 發表:280 回覆:508 積分:385 註冊:2002-04-15 發送簡訊給我 |
||||
Skyer
高階會員 發表:43 回覆:111 積分:120 註冊:2002-04-04 發送簡訊給我 |
||||
RaynorPao
版主 發表:139 回覆:3622 積分:7025 註冊:2002-08-12 發送簡訊給我 |
||||
flyup
資深會員 發表:280 回覆:508 積分:385 註冊:2002-04-15 發送簡訊給我 |
||||
領航天使
站長 發表:12216 回覆:4186 積分:4084 註冊:2001-07-25 發送簡訊給我 |
以前在學校唸書時,
一個從未來學校找我的親戚,
突然到宿舍來找我,
來時還帶一大群人,
說是要來看我,
結果:
最後,來出一疊資料,就是六合彩的計算公式,
叫我用這個公式寫一個程式,
算出下一期的明牌,
我看了半天,說:這些公式都是放馬後砲,
將各期的數據,硬是用數學運算式關連起來,
宣稱好幾期都很準,所以下一期一定準,
但親戚不信,硬是要我寫,
我只好照辦,寫一寫算出下一期號碼交給他們時,
說:不中不要怪我,
親戚很高興,還給我3000元才走人! 後來有沒有中,我跟本也懶得去看! ~~~Delphi K.Top討論區站長~~~
------
~~~Delphi K.Top討論區站長~~~ |
|||
RaynorPao
版主 發表:139 回覆:3622 積分:7025 註冊:2002-08-12 發送簡訊給我 |
引言: 思考方向:(不知道是否可以完成?) 樂透有它自己的開獎方式和已開出的資料---列為已知的資料。 再找尋相關已知的資料做相關交叉比對,不知是否可行, 例如: 1.一般國曆日期:年月日星期 2.農民曆上相關數字(如:赤七),可查詢關於7 要間格多少次,可開出相關號碼。flyup你好: 你舉的兩個例子都很不錯 我之前在實作的時候也都沒有想到 除了這兩個例子以外 有時候也會聽到別的方法 例如~~以數字的位置所排列出來的圖形 來預測下一次會開獎的號碼...等 不過~~話又說回來了 不管是使用什麼方法來產生號碼 只要能夠先推導出該方法的「演算法」 變成程式碼應該就不難了 --
------
-- 若您已經得到滿意的答覆,請適時結案!! -- -- 欲知前世因,今生受者是;欲知來世果,今生做者是 -- -- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 -- |
|||
flyup
資深會員 發表:280 回覆:508 積分:385 註冊:2002-04-15 發送簡訊給我 |
flyup你好:
你舉的兩個例子都很不錯
我之前在實作的時候也都沒有想到
除了這兩個例子以外
有時候也會聽到別的方法
例如~~以數字的位置所排列出來的圖形
來預測下一次會開獎的號碼...等
不過~~話又說回來了
不管是使用什麼方法來產生號碼
只要能夠先推導出該方法的「演算法」
變成程式碼應該就不難了
---------------------------------------
這個方法是可以,但會增加問題的複雜度。 不知道可否有:
1.各期數字出現的統計程式。
2.將出現最多次的數字,比對前五期,相同的表示,最有可能開,
一般可中2-3個碼。不知道比對的程式如何完成?
思考方向:(不知道是否可以完成?)
樂透有它自己的開獎方式和已開出的資料---列為已知的資料。
再找尋相關已知的資料做相關交叉比對,不知是否可行, 例如:
1.一般國曆日期:年月日星期
2.農民曆上相關數字(如:赤七),可查詢關於7 要間格多少次,可開出相關號碼。 發表人 - flyup 於 2002/11/22 00:35:16
|
|||
RaynorPao
版主 發表:139 回覆:3622 積分:7025 註冊:2002-08-12 發送簡訊給我 |
引言: 這個方法是可以,但會增加問題的複雜度。 不知道可否有: 1.各期數字出現的統計程式。 2.將出現最多次的數字,比對前五期,相同的表示,最有可能開, 一般可中2-3個碼。不知道比對的程式如何完成? flyup你好: (1)要算出各期數字出現的統計程式,只需要一個 database 和一個 integer array 就可以實現了吧 ( > > --
------
-- 若您已經得到滿意的答覆,請適時結案!! -- -- 欲知前世因,今生受者是;欲知來世果,今生做者是 -- -- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 -- |
|||
flyup
資深會員 發表:280 回覆:508 積分:385 註冊:2002-04-15 發送簡訊給我 |
||||
RaynorPao
版主 發表:139 回覆:3622 積分:7025 註冊:2002-08-12 發送簡訊給我 |
引言: 是不是要這樣: integer array :=1,2,........42 database以網路現有的資料表格 flyup你好: (1)以現行的樂透開獎號碼 1~42 來看 的確像你所說的~~只需要 42 個 element 的 integer array 就可以統計所有號碼開出的次數了 (2)至於 database 並不一定是某種格式 可以是 access, SQL, Oracle, txt, ini, xml...都可以 其實都無所謂~~但是~~如果只是要儲存每一期的歷史號碼的話 我是比較傾向使用較小型的 database (比較不麻煩) 除非~~你要連結的 database 是某一個網頁所提供的話 那就必須 follow 他的格式不可了 > --
------
-- 若您已經得到滿意的答覆,請適時結案!! -- -- 欲知前世因,今生受者是;欲知來世果,今生做者是 -- -- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 -- |
|||
flyup
資深會員 發表:280 回覆:508 積分:385 註冊:2002-04-15 發送簡訊給我 |
||||
flyup
資深會員 發表:280 回覆:508 積分:385 註冊:2002-04-15 發送簡訊給我 |
||||
flyup
資深會員 發表:280 回覆:508 積分:385 註冊:2002-04-15 發送簡訊給我 |
號碼大於平均數者,代表出現之機率越高,若選號碼出現機率高的組別中獎,相對得中獎的人數也會提高,獎金相對減少,此演算法為正統的機率統計法! 1 號出現 5 次 2 號出現 6 次 3 號出現 1 次 4 號出現 6 次 5 號出現 7 次 6 號出現 6 次
7 號出現 8 次 8 號出現 3 次 9 號出現 6 次 10 號出現 6 次 11 號出現 2 次 12 號出現 7 次
13 號出現 5 次 14 號出現 4 次 15 號出現 9 次 16 號出現 5 次 17 號出現 5 次 18 號出現 3 次
19 號出現 3 次 20 號出現 9 次 21 號出現 7 次 22 號出現 3 次 23 號出現 4 次 24 號出現 3 次
25 號出現 7 次 26 號出現 6 次 27 號出現 6 次 28 號出現 5 次 29 號出現 9 次 30 號出現 6 次
31 號出現 4 次 32 號出現 6 次 33 號出現 5 次 34 號出現 7 次 35 號出現 5 次 36 號出現 10 次
37 號出現 7 次 38 號出現 2 次 39 號出現 8 次 40 號出現 3 次 41 號出現 2 次 42 號出現 3 次 平均數 5.33333333333333 次
|
|||
flyup
資深會員 發表:280 回覆:508 積分:385 註冊:2002-04-15 發送簡訊給我 |
千里虎樂透網展示的電腦選號程式http://www.luckstar.com.tw/lotto在亂數取號完成後,必須要按照號碼的順序排列.當時示範的排序程序大致如下:
'排序
For i1 = ciMax - ciSelect 1 To ciMax
For i2 = i1 1 To ciMax
If iaList(i1) < iaList(i2) Then
i = iaList(i2)
iaList(i2) = iaList(i1)
iaList(i1) = i
End If
Next
Next
這個排序方法雖然效率不好(固定為O(n2),但是只是排六個數,影響不大.可是如果您有比較多的數要排序,可不能還是這樣寫, 不然會等很久 發表人 - flyup 於 2002/11/24 16:59:47
|
|||
dllee
站務副站長 發表:321 回覆:2519 積分:1711 註冊:2002-04-15 發送簡訊給我 |
哈!哈!哈!
我在剛學會寫 Basic 時(十幾年前),就已經開始寫六合神算了,
因為家父正是用眼睛找明牌的高手,那時他幾乎大部分的時間都在「找明牌」...
而我想用眼睛找總是比較慢, 我就寫一個用電腦找的吧, 那時我的電腦才 286...
寫了約二週,總算是完成,演算法就是用所謂的「拖牌法」,即 1. 本期第x球為 n 時, 後 m 期會出 y
2. 本期第x1球為 n1 第x2球為 n2 時, 後 m 期會出 y
3. 本期出 n1 , 後 m 期會出 y
4. 本期出 n1,n2 , 後 m 期會出 y
5. 本期出 n1,n2,n3 , 後 m 期會出 y
6. 本期第x1球為 n1 下 k 期第x2球為 n2 , 後 m 期會出 y
7. 本期出 n1 下 k 期出 n2 , 後 m 期會出 y
... 而找出這類所謂的「牌路」,再由下一期反推, 將各 y 累計...
以當時的 286 而我還不是很會寫程式, 找一期的明牌約要跑半天... 我的結論是「不準」!!!
而且這個不準與用什麼電腦語言無關
可以寫來騙錢就是 沒空更新的網頁...<><>< src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=6939849&CC=155211"> C及指標教學,計算機概論,資訊管理導論...
http://coolsite.to/dllee | | 介紹Shells,LiteStep,GeoShell....
http://coolsite.to/ushells | |
引言: 哈!哈!哈! 我在剛學會寫 Basic 時(十幾年前),就已經開始寫六合神算了, 因為家父正是用眼睛找明牌的高手,那時他幾乎大部分的時間都在「找明牌」... 而我想用眼睛找總是比較慢, 我就寫一個用電腦找的吧, 那時我的電腦才 286... 寫了約二週,總算是完成,演算法就是用所謂的「拖牌法」,即 1. 本期第x球為 n 時, 後 m 期會出 y 2. 本期第x1球為 n1 第x2球為 n2 時, 後 m 期會出 y 3. 本期出 n1 , 後 m 期會出 y 4. 本期出 n1,n2 , 後 m 期會出 y 5. 本期出 n1,n2,n3 , 後 m 期會出 y 6. 本期第x1球為 n1 下 k 期第x2球為 n2 , 後 m 期會出 y 7. 本期出 n1 下 k 期出 n2 , 後 m 期會出 y ... 而找出這類所謂的「牌路」,再由下一期反推, 將各 y 累計... 以當時的 286 而我還不是很會寫程式, 找一期的明牌約要跑半天... 我的結論是「不準」!!! 而且這個不準與用什麼電腦語言無關 可以寫來騙錢就是 沒空更新的網頁...<><>< src="http://delphi.ktop.com.tw/loadfile.php?TOPICID=6939849&CC=155211">C及指標教學,計算機概論,資訊管理導論... http://coolsite.to/dllee 介紹Shells,LiteStep,GeoShell.... http://coolsite.to/ushells 有程式碼可參考嗎?重點部分亦可!
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |