藍藍
latest #78
掰噗~
12 years ago
你說得真是太對了!
* Lan :
12 years ago
嗯?
你知道如何用VB6寫倍數和的程式嗎
立即下載
* Lan :
12 years ago
倍數和 (?)
* Lan :
12 years ago
要求是什麼 (?)
求倍數出來
例:1~1000中求5的倍數和
* Lan :
12 years ago
用迴圈 ((思考
迴圈
有質數的程式但沒有倍數的
廢物少女果凍炭
12 years ago
藍藍果然是問數學的好對象(艮
* Lan :
12 years ago
呃呃我的想法喔
sun_100: 這是寫電腦程式(?(yay)老師說下課之前沒寫出來不能下課
* Lan :
12 years ago
Dim k as long
k = 0
For i = 1 to 200
Otaku_Lan: 嗯我試試
* Lan :
12 years ago
k = k + 5i
* Lan :
12 years ago
Next i
* Lan :
12 years ago
如果說你要印出過程的話...
我可以直接跟你說題目嗎?
* Lan :
12 years ago
在k = k +5i
插入這條 -> point (K)
再打Next i
廢物少女果凍炭
12 years ago
果斷!
* Lan :
12 years ago
噴 ((表圖
* Lan :
12 years ago
請說(?)
1000~2000中求2的倍數和
* Lan :
12 years ago
雙迴圈辦的到 ((思考...
* Lan :
12 years ago
我寫寫看 ,等我一下
* Lan :
12 years ago
啊 好像單回圈就夠了 ((抓抓
* Lan :
12 years ago
這是個很荒謬的想法
* Lan :
12 years ago
Dim a as integer
For i = 1000 to 2000
If i mod 2 = 0 Then
* Lan :
12 years ago
a = a + i
Else
a = a
End If
* Lan :
12 years ago
Next i
* Lan :
12 years ago
要印出運算結果,最後面+一條
Debug.Print(a)
* Lan :
12 years ago
不過這回圈總共執行了1000次... 算慢呢...
恩卸卸我試試
* Lan :
12 years ago
啊我是笨蛋
* Lan :
12 years ago
改簡短一點
* Lan :
12 years ago
Dim a As Integer
a = 0
* Lan :
12 years ago
For i = 1000 to 2000 step 2
* Lan :
12 years ago
a = a + i
Next i
Debug.Print(a)
* Lan :
12 years ago
結果應該是 751500 (?)
* Lan :
12 years ago
OTZ 噴爛..
* Lan :
12 years ago
* Lan :
12 years ago
這回圈跑了500次 ((擦汗
* Lan :
12 years ago
這是運算式 paste.plurk.com/show/683...
* Lan :
12 years ago
sun_100: 一切都是邏輯問題 (?)
廢物少女果凍炭
12 years ago
我眼睛瞎了@@
* Lan :
12 years ago
:-o怎麼瞎了 ((愣
* Lan :
12 years ago
拉K好慢...
廢物少女果凍炭
12 years ago
我的腦子已經和你們是不同世界的了XD
* Lan :
12 years ago
sun_100: 擅長的領域不一樣而已... 我英文應該差你一大截
謝謝你
因為下課了
恩,用單就可以了>
* Lan :
12 years ago
好久沒碰程式語言了呢 ((搔頭
VB6的
藍藍你計概很好(?
* Lan :
12 years ago
計概還可以吧.. 很簡單,雖然我這屆工科沒休
程式語言有時我會搞混
目前計概老師教的還ok但後面可能就....
* Lan :
12 years ago
程式語言很簡單的 學一招打天下 (?? 看你怎麼用他而已。
跟老師說的話一樣
* Lan :
12 years ago
而且要得到相同答案有很多做法
(gyay)老師好
有些題目我會搞錯,而且有陷阱
* Lan :
12 years ago
越精簡越好,就像我第一個像太多讓迴圈執行了1千次,第二次的想法把它改良到只執行500次,對電腦的執行效率是有差別的(?
恩,謝謝(筆記
下禮拜他要考這個
* Lan :
12 years ago
(gym)
限時3分鐘(做的玩嗎?
* Lan :
12 years ago
(bringit)OK的
藍藍玩線上遊戲嗎?
* Lan :
12 years ago
目前找不到喜歡的所以沒玩 ((思考
喔....落乾糧上課一直說你們玩的巴托市再玩甚麼要玩也要玩星海爭霸2~完那個才@#$%^&*()_
反正他的重點就是星海爭霸
* Lan :
12 years ago
都沒興趣(1s
星海爭霸我看不懂怎麼玩感覺也很難
back to top