看板 [ Visual_Basic ]
討論串[VB6 ] 利用遞迴產生數列
共 3 篇文章
內容預覽： 開啟 | 關閉 | 只限未讀
首頁
上一頁
1
下一頁
尾頁
#3
Re: [VB6 ] 利用遞迴產生數列
推噓0(0推 0噓 0→)留言0則，0人參與, 最新作者salagadoola (南瓜)時間16年前 (2009/08/15 05:17), 編輯資訊
0
0
0
內容預覽:
首先，因為陣列 X 宣告在 Sub 裡面而且又不是 Static，. 所以每一層遞迴看到的都是全新的陣列。. 解決方法是宣告成 Static 或直接在 Sub 外面宣告它。. 假設陣列宣告的問題已經解決了，那麼現在還有另一個問題。. 當我們用 rec(1) 開始這個遞迴時，. 它設定 X(1) 之後
(還有817個字)
#2
Re: [VB6 ] 利用遞迴產生數列
推噓1(1推 0噓 3→)留言4則，0人參與, 最新作者MOONRAKER (㊣八點了！全體集合！)時間16年前 (2009/08/14 18:04), 編輯資訊
0
0
3
內容預覽:
3n+1是一個經典題目，用VB寫還滿有趣的. 這涉及一些麻煩的宣告，我寫過以後覺得這也不太容易，應該給你點提示. 基本上程式會長得像這個樣子. ' 命名：3n+1 === 3n plus 1 === 3np1. Function r3np1(n As Integer, k As Integer, B
(還有416個字)
#1
[VB6 ] 利用遞迴產生數列
推噓1(1推 0噓 3→)留言4則，0人參與, 最新作者AA64 (蘇軍最高指揮部)時間16年前 (2009/08/14 15:39), 編輯資訊
0
0
0
內容預覽:
這是一個使用遞迴函數的問題. 小弟想了三,四天了 但是一直寫不出來或是寫錯. 題目是 X(k+1)= X(k)/2 if X(k)=2n. 3*X(k)+1 if X(k)=2n+1. 條件:1.須利用遞迴函數(副程式). 2.當 X(k)=1 或 k>500 時停止. 3.所建立的數據構成一個陣列
(還有287個字)
首頁
上一頁
1
下一頁
尾頁