※ 引述《LordofDark (自信的色彩)》之銘言：
: 要算sum=(1-1/2)(1-1/3)(1-1/4).....(1-1/N)
: 一開始要用InputBox讓人輸入N值
: 請問一下,怎麼寫啊?
Dim sum,innum
innum=inputbox("Input N")
sum=1 //這個很重要..不然怎麼乘都是0
for i = 2 to innum
sum=sum*(1-(1/i))
next i
print "The Ans =>" & sum
PS.應該沒錯吧@@"
--
※ 發信站: 批踢踢實業坊(ptt.csie.ntu.edu.tw)
◆ From: 61.221.15.86