[VB6 ] 一個問題

看板Visual_Basic作者 (盡全力。)時間16年前 (2009/04/01 00:03), 編輯推噓0(0012)
留言12則, 2人參與, 最新討論串1/1
我是自修初學者 遇到一個問題解不出來... 想請大家指點迷津 編寫程式 求出1000之內所有完數,完數是指一個數恰好等於它的因數之合,例如6的因數為2.3 而6=1+2+3,即六是完數 這題是26這邊的書上的題目... 我一點頭緒也沒有... 謝謝各位幫忙了... -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 218.58.35.134

04/01 00:30, , 1F
什摸是 26
04/01 00:30, 1F

04/01 00:34, , 2F
大陸...阿陸仔..
04/01 00:34, 2F

04/01 00:36, , 3F
這題目其實很普通 首先你要(1)開一個夠大的陣列來存因數
04/01 00:36, 3F

04/01 00:37, , 4F
基本上開100項絕對夠(2)是用一個for迴圈從x跑到2
04/01 00:37, 4F

04/01 00:38, , 5F
其中每一個數可整除x的就是x的因數
04/01 00:38, 5F

04/01 00:39, , 6F
(3)每找出一個因數就放進陣列,找完累加起來看是否等於x
04/01 00:39, 6F

04/01 00:40, , 7F
我現在就可以想到3種難度和速度不等的方法
04/01 00:40, 7F

04/01 00:52, , 8F
那如果是還沒學到怎麼用陣列呢?因為我是才剛開始看到
04/01 00:52, 8F

04/01 00:53, , 9F
前幾章。不過的確是在說for沒錯。
04/01 00:53, 9F

04/01 10:05, , 10F
不用陣列就是每看到一個因數就拿來加到sum裡面
04/01 10:05, 10F

04/01 10:06, , 11F
這樣你只需要兩層迴圈就好,i=1..1000; j=1..i; check j
04/01 10:06, 11F

04/01 15:31, , 12F
thanks^^
04/01 15:31, 12F
文章代碼(AID): #19qZw-gd (Visual_Basic)