程式設計數字中，有數字的和是6666，如何找出這

1樓：匿名使用者

'這是單邊演算法，也可已將

指標定位到兩頭

dim i(15) as long : dim j(5) as long : dim sum as long

for m1 as integer = 0 to 10j(0) = i(m1)

for m2 as long = m1 + 1 to 11j(1) = i(m2)

for m3 as integer = m2 + 1 = 2 to 12

j(2) = i(m3)

for m4 as integer = m3 + 1 to 13j(3) = i(m4)

for m5 as integer = m4 + 1 to 14j(4) = i(m5)

for m6 as integer = m5 + 1 to 15j(5) = i(m6)

dim temp as string = ""

for m7 as integer = 0 to 5sum += j(m7)

temp &= j(m7).tostringnext

if sum = 6666 then

msgbox("找到一個：" & temp)end if

一唱一和一呼百應一乾二淨一舉兩得一落千丈一模一樣一暴十寒一心一意一敗塗地一本正經一臂之力一塵不染一見如故一箭雙鵰一脈相承一目瞭然一竅不通一視同仁一瀉千里一草一木一成不變一帆風順一鼓作氣一鬨而散一如既往一絲不苟一言難盡一衣帶水一朝一夕一針見血 ...

含有數字的成語的十全十美七上八下三心二意一心一意九。牛一毛九死一生五湖四海七零八落九九歸。一五花八門六神無主五光十色八仙過海四面八方。1 十全十美是一個漢語成語，讀音為sh qu n sh m i，意思是指十分完美，毫無欠缺。周禮天官冢宰下醫師歲終，則稽其醫事，以制其...

一五一十二龍戲珠三心二意四面八方五花八門五顏六色七手八腳十拿九穩十全十美賊眉鼠眼九牛一毛虎虎生風狡兔三窟龍爭虎鬥虎頭蛇尾馬到成功亡羊補牢殺雞儆猴雞犬不寧狼奔豕突狗尾續貂有數字和有動物的成語大全一馬當先一石二鳥二龍戲珠三羊開泰五牛六馬五馬分屍五虎上將...