請各位大哥大姐們,叔叔阿姨們,帥哥美女們幫我用vb程式設計下面的「魔術師的祕密」,感激不盡,急用

2021-03-31 21:35:21 字數 3045 閱讀 8080

1樓:匿名使用者

sub ***()

dim i as integer, n as integer, p as integer, m as integer

dim arr(1 to 13) as integer

dim brr(1 to 54) as boolean

arr(1) = 1

p = 0  '用來定位開始記牌的位置

for i = 1 to 13

n = 0

m = 1

do while m < 55

if p + m > 54 then p = 0: m = 1   '當54張牌數完,重新回到第一張牌

if brr(p + m) = false then   '判斷這張牌是否是已經挑出來的牌,如果是已經挑出來的牌,則跳過

n = n + 1    'n用來數第幾張牌

if n = i then

arr(i) = p + m     '定位每張黑桃i的位置

brr(p + m) = true  '已經挑出來的牌,則標記為true

p = p + m  '將定位變數p,定位到p+m

exit do    '退出do迴圈

end if

end if

m = m + 1

loop

next

dim s as string

s = "牌號 - " & "位置" & chr(10)

for m = 1 to 13

s = s & "  " & m & "  -  " & arr(m) & chr(10)

next

msgbox s

end sub

呵呵,我的答案是:

a   2   3   4   5   6   7   8   9   10   j   q   k

1   3   6  10  15 21 28 36 45  2   17  31 46

順過來就是:a,10,2,3,4,5,j,6,7,q,8,9,k

1,8,2...什麼的順序肯定是錯的,1+2+3+4...+7=28,一副牌有54張,數到7的時候數了28張牌,所以數第8張牌的時候,是第36張牌,所以,怎麼可能黑桃8跑到黑桃a和黑桃2之間呢!?

2樓:匿名使用者

原始順序是:1.8.2.5.10.3.12.11.9.4.7.6.13 希望採納

3樓:混世也逍遙

紅桃方塊梅花黑桃黑桃最上或者最下,並依次排好,其實他並沒有洗亂牌

大哥大姐們..幫幫我~

4樓:百度使用者

你知道嗎? 我和我的他也是一樣,我也很內向,每次都是他主動跟我說話,我跟我的朋友在一起的時候,有說不完的話,可是一面對他的時候 就不知道說什麼好!他老叫我找點話題,可是我就不知道說什麼!!

哎, 其實這個是性格的問題吧!!或者你面對他的時候,就會這樣,慢慢的溝通就行了,我想你會慢慢的開朗,不要去改變什麼,因為最好的還是真正的自己!!加油吧!!

5樓:匿名使用者

如果你不善於語言表達,也可以換一種方式.把你心理的想法表達出來.讓他感覺到就可以了啊

6樓:冰封de心事

你這樣是自信心不足!

給自已一點信心,你一定可以的!

要相信自已!

7樓:匿名使用者

交往三個月,應該對於他的喜惡瞭解了些吧,除非你本來對他就不感冒,否則,他的一言一行都是你的話題啊!

8樓:

他嫌你不講話,無非是想改變你,希望你變的開朗些.如果你覺得他值得你為他改變,就嘗試一下,讓自己變的有魄力些.如果你們之間的感情因為沒有話題而愈加緊張的話,還不如提早放手~~尋找一段真正用心交流的情感~~

祝你好運!

9樓:匿名使用者

要大膽哦 我也是個膽小的人 但是把你想說的說出來以後你就不會怕了

10樓:匿名使用者

這個很簡單啊,不善於口頭表達就寫信,寫紙條好了。交流要從心開始,說話有什麼,有戀愛一輩子的人都沒說句話,一個眼神就ok了。心,中國電信廣告語怎麼來著?

溝通從心開始。。。

一個動漫的問題 請各位大哥幫我解決一下 謝謝啦

11樓:匿名使用者

你大概bai對動漫有些錯誤的du意識 日本的動漫不像是zhi中國的動漫自己dao寫劇本自己內

做(這種容型別在日系動漫中極少) 一般都是改編自熱賣的***和漫畫 打個比方說旋風管家是小學館的作品 說到小學館大家都知道多啦a夢 但是多啦a夢是小學館做的嗎? 不是 小學館只是類似於出版社 多啦a夢的作者大家都知道是藤子·f·不二雄的作品 至於人物畫風什麼的一般來自漫畫或者***中的插圖

魔術:兩個碗,每個碗中蓋一個雞蛋,魔術師用手一指,一個碗裡雞蛋變到了另一個碗裡!誰知道其中奧祕?

12樓:魔術先生

這招叫「三仙歸洞」,中國傳統戲法魔術,屬手法類魔術,魔術奧祕就在於那雙手,道具沒有毛病。具體的不做揭祕,這招手法要苦練,才能出師。

13樓:烏鴉男人應該壞

雞蛋是海綿做的假雞蛋

14樓:匿名使用者

如果你看了三仙歸洞,那這個就算不了什麼了.

15樓:匿名使用者

其實很簡單就是兩個雞蛋.在不經意的時候放到要變的碗裡.另外一個碗用抽拉器弄走了.

馬上就要小學畢業了,我們即將與朝夕相處了六年的夥伴們分別了,臨別之前,我想對他

16樓:或許yuan夢

你是學霸,就說:長風破浪會有時,直掛雲帆濟滄海!

你是逗比,就說:苟富貴,勿相忘!

17樓:匿名使用者

莫愁前路無知己,天下誰人不識君。同桌不要傷心吶,快點高興起來吧,雖然離開了我們,但在深入初中的時候,你會驚喜的發現你身邊還有這麼多好朋友。

大哥大姐們

8000mb?不是吧 那不連8gb都不到?呵呵 這是很正常的 我家裡說是80gb可用起來只有78g左右的空間 告訴你 你把一些大的檔案全部移動到一個盤 讓這個盤的空間低於200mb 然後它就會跳出一個框是清理磁碟歷史檔案的 清一下就好了 以前我也覺得苦惱 有一次無意中這樣弄就好了 本來我家的e盤還剩...

收集好歌,各位大哥,大姐,叔叔,阿姨,把你們最喜歡的歌說出來,越多越好

如果愛能早些說出來 one love you make me wanna lonely no more 邊走邊愛 nobady wonder girl的 那個男人的謊言 blue的歌 我說的可都是精品呀 我還有一個月就當爸爸了,可是現在起的名字都不喜歡,希望各位大哥,大姐,叔叔,阿姨幫忙起個好聽有意...

各位大哥大姐叔叔阿姨,我要裝逼!我要在吃的方面裝逼!跟北京烤鴨,法國紅酒,義大利麵,美國牛排等等

佛跳牆,馬卡龍,天婦羅 澳洲龍蝦,俄羅斯魚子醬 紅酒做的美食,你試過幾種 紅酒搭配美食,消解油膩,豐富人的口感。其實紅酒不光可以喝,還可以烹飪美食,我推薦幾款與紅酒相關的美食。1.紅酒燉牛肉。是一款經典系列菜餚,紅葡萄酒可以軟化肉質,增香添色,紅葡萄酒本身的養顏 美容效果是保養身體的必備品。牛肉中富...