高中必修三的题 编写程序,输入正整数n,计算它的的阶乘n!（n!=n*（n-1）*.*3*2*1）

n 的阶乘：
dim n as single,i as single,s as single
n=inputbox(" 请输入整数n：")
s=1
for i=1 to n
s=s*i
next i
print "s=";s
计算下面n（n属于N）个数的和：2,3/2,4/3,5/4,.,n+1/n.
dim n as integer,i as integer ,s as single
s=0
n=inputbox("Please input number:")
for i=1 to n
s=s+(i+1)/i
next i
print "s=";s