看板 Visual_Basic 關於我們 聯絡資訊
3n+1是一個經典題目,用VB寫還滿有趣的 這涉及一些麻煩的宣告,我寫過以後覺得這也不太容易,應該給你點提示 基本上程式會長得像這個樣子 ' 命名:3n+1 === 3n plus 1 === 3np1 Function r3np1(n As Integer, k As Integer, ByRef stages() As Integer) As Integer ... if ... then ... else if ... then r3np1 = r3np1( ... ) else r3np1 = r3np1( ... ) end if end if end function sub r3np1main() dim v(500) as integer rctarget = r3np1(27, ?, ?) ... end sub 想辦法把裡面的 ... 和 ? 填上去,就寫好了   -- Google 關鍵字 : MPFC-TCP / 殺人笑話 / 包租婆也有過當羅莉的時候 Youtube關鍵字 : 脫衫脫褲 / 傻蛋奧運 / 宗教審訊 / 買張床 / 單車超人 / 謳歌金錢 *美髮師登山隊 http://tinyurl.com/dm6lh3 *Ypres 1914 http://tinyurl.com/b432jb [蒙帝派松正體中文計畫] http://www.youtube.com/user/JamesBondXD -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 59.120.168.228
AA64:謝謝m大 不過我還是不太懂 那個2n和2n+1只是偶數跟奇數 08/14 19:30
AA64:應該不需要再多一個變數n吧 麻煩你了 08/14 19:31
MOONRAKER:這個n不是算式中的n 我可以告訴你k是用來計算步數的 08/14 20:54
MOONRAKER:判斷是否偶數用mod就可以了 這個n是主要參數 08/14 20:54