1樓：匿名使用者
哦，對了vbs中好像是沒有陣列這個資料型別。那就要用scripting.dictionary物件了
randomize
set d = createobject("scripting.dictionary")
for i=1 to 5
d.add cstr(i), int(rnd*10)+1 '隨機數存入物件中
next
same_count=0
a = d.keys
for i = 1 to 3
for j = i+1 to 4
if d.item(a(i)) = d.item(a(j)) then
same_count=same_count+1
end if
next
next
if same_count<>0 then msgbox "相同次數=" & same_count
liukui2157@sohu.***
2樓：匿名使用者
我以前做過這個程式。。。
還是同花、順子等。。。
先要判斷他的型別（一對、兩對、三條、四條、順子、同花、同花順……）然後同型別的還要比大小
思路要清晰，這個程式設計有點點難度。
m n 用c語言怎麼寫程式
1 寫一個計算x 的子函式，採用遞迴的思路，具體如下 int fun int x 用的時候只要在主函式中呼叫fun m fun n 就可以了，這樣不管加幾項都可以通過呼叫這個函式實現。2 遞迴是很有用的演算法，lz可以多看下，像這種求階乘的用遞迴有助於你理解，可以翻翻書，一般書上都有 3 最後祝學業...
5的C語言程式怎麼寫,用C語言編寫程式,計算表示式112131415的結果線上等。
incude void main printf f n s 你會寫bai1 2 3 4 5吧,如下 du float s 0 for float i 1 i 5 i zhi那麼你會寫 1 1 2 1 3 1 4 1 5吧,如dao下 float s 0 for float i 1 i 5 i 那麼你...
怎麼判斷原子半徑的大小，原子半徑大小如何判斷
在同一個族裡，從上到下，原子半徑一般是增大的，因為從上到下電子層數增多，所以，原子半徑增大。主族元素與副族元素的變化情況很不一樣。主族元素由上到下，半徑毫無例外地增大，只是增大的幅度逐漸減小。但是在副族裡，下面兩個屬於第五和第六週期的元素，如zr與hf，nb與ta mo與w，它們的原子半徑非常接近，...