作业帮vb求n!(n!=1*2*3*...*n),n是自然数.编程要求:1.单击窗体时用InputBox()输入n的值.2.结果存在变量Term中.3.在窗体中输出Term的结果.4.程序编译通过后,输入n=10进行测试
来源：学生作业帮助网 编辑：作业帮 时间：2024/04/29 04:47:26
xR]KQ+"ȵ՞
54⣅fJX Vjgk(A4wf93gv? ֞ϰņ->q1n!`k!w\_,kMҭfkω uEnDK B)OV=JZAt*QtѻdX&ÜcqøF
_
SNɊI+!d/GO$B8 ⱣcXZbK\d|Bq̱$K UyAV tHQU
F* s $Zxۿo3B<h3bŋ"oAd^`L pi@982;יB?>
vb求n!(n!=1*2*3*...*n),n是自然数.编程要求:1.单击窗体时用InputBox()输入n的值.2.结果存在变量Term中.3.在窗体中输出Term的结果.4.程序编译通过后,输入n=10进行测试
vb求n!(n!=1*2*3*...*n),n是自然数.
编程要求:1.单击窗体时用InputBox()输入n的值.2.结果存在变量Term中.3.在窗体中输出Term的结果.4.程序编译通过后,输入n=10进行测试
vb求n!(n!=1*2*3*...*n),n是自然数.编程要求:1.单击窗体时用InputBox()输入n的值.2.结果存在变量Term中.3.在窗体中输出Term的结果.4.程序编译通过后,输入n=10进行测试
Private Sub Command1_Click()
Dim n As Integer
n = Val(InputBox("亲输入一个大于零的整数", "提示"))
Dim Term As Long
Term = 1
For i = 1 To n
Term = Term * i
Next i
Print Term
End Sub