算阶乘的vbs小程序
2016-07-21来源:

保存为.vbs文件即可

dim n,ans,i

n=inputbox("n(0<=n<=170)=")

ans=1

for i=1 to n

ans=ans*i

next

msgbox(ans)

推荐信息
Baidu
map