古典數學問題:白錢買百雞,公鷄1錢值5,母雞1錢值3,小雞3只錢值1.何以白錢買百雞?
代碼如下:
dim i as integer,j as integer,z as integer
print
for i =1 to 20 step 1
for j =1 to 33 step 1
for z = 1 to 100 step 1
if (i+j+z=100 and 5*i+3*j+z/3=100) then
print "公鷄數為：":i, "母雞數為：":j, "小雞數為：":z
end if
next z
next j
next
但怎麽都做不出。。。
他說我缺少子程序，函數或屬性....

終于弄好了.原來是我弄錯符號了....現在可以了.謝謝大家啊
6樓的李家奇，你的那些百分號有什麽用的啊？
學VB真的好難，上次老師出了一道題，是要反推的。我想了很久都不知道怎麽做好

題目：小猴子摘了許多桃，第一天吃了一半；第二天又吃了一半，覺得還不夠又多吃了一個；第三天也這樣。到了第十天，桃子只剩下一個了。問小猴子一共摘了幾個桃？


麻煩大家幫我解解

你寫得好複雜...
首先:Function ss(ByVal i As Integer)
ss = (i + 1) * 2
End Function
這些我都沒學...老師也沒什麽詳細講過...
雖然我看不懂，但答案還是有了。 1534
高手就是高手
謝謝高手的指點。

這年頭高手特別多...說的都是天書,叫我這個凡人怎麽看得懂~

自學又學不會看不懂,老師又說點不說點的.簡直就不用學了...

交了學費卻學不了東西,白白浪費學費了.