用VB编写"求S=1!+2!+3!+``````+n!,其中N是任意输入的一个正整数。"的程序

Question

要考虑用单循环和多重循环两种方法来编写程序

Answer 1

多重循环
dim jiechengNumber
dim sum
dim i
dim j
dim n
jiechengNumber=1
sum=0
n=inputbox("请输入n:")
for i=1 to n
for j=1 to i
jiechengNumber=jiechengNumber*j
next
sum=sum+jiechengNumber
jiechengNumber=1
next
msgbox sum

单循环
dim sum
dim i
dim n
n=inputbox("请输入n:")
sum=1+n
for i=1 to n-1
sum=sum*(n-i)+1
next
sum=sum-1
msgbox sum

这个是VBS.我不会VB
应该差不多.你改一下就OK
单循环就是分解一下因式你就发现规律了