j202036 發表於 12-5-13 08:55

Dropbox解謎遊戲Dropquest 2012,完成永久增加1GB空間

http://steachs.com/archives/2606看解答 還花了快一小時




shiyee 發表於 12-5-13 11:15

浪費時間 投資報酬率太低

akqjt 發表於 12-5-13 11:56

沒創意的題目
那就用暴力來解決
fori=0 to99999
   A=right("0000" & string(i),5)
   a1=mid(A,1,1)
   a2=mid(A,2,1)
   a3=mid(A,3,1)
   a4=mid(A,4,1)
   a5=mid(A,5,1)
   ifa1*a2=24anda4=a2/2   and (a1+a3)=(a4+a5)and (a1+a2+a3+a4+a5)=26and a2>a5 then
         msgbox(A)
   end if
next

pandaleaderbert 發表於 12-5-14 02:50

感謝 順利取得空間啦!!!!!!!~~~

Evil 發表於 12-5-14 03:19

akqjt 發表於 12-5-13 11:56 http://www.coco-in.net/static/image/common/back.gif
沒創意的題目
那就用暴力來解決
fori=0 to99999


小弟對excel vba蠻有興趣的,
好奇拿大大寫的來試Run,
但這一句 A=right("0000" & string(i),5)出了問題,以致程式無法執行
我猜應該是在string(i)這裡出了狀況,
不過我也不知道為什麼@@....



jgds897 發表於 12-8-7 04:18

{:4_621:}我也要試試看!
頁: [1]
查看完整版本: Dropbox解謎遊戲Dropquest 2012,完成永久增加1GB空間