简单的阶乘
2016-04-15 16:37
246 查看
Private Sub Command1_Click()
Cls
Print 阶乘(10)
End Sub
Private Function 阶乘(n As Integer) As Long
If n = 1 Then
阶乘 = 1
Else
阶乘 = n * 阶乘(n - 1)
End If
End Function
还可以,自己能接受
Cls
Print 阶乘(10)
End Sub
Private Function 阶乘(n As Integer) As Long
If n = 1 Then
阶乘 = 1
Else
阶乘 = n * 阶乘(n - 1)
End If
End Function
还可以,自己能接受
相关文章推荐
- 第七周&第八周周记
- 软件工程课堂练习
- percona
- 分类添加属性,运行时添加对象属性和基本类型属性
- Spring MVC国际化的总结
- 如何实现一个原质化菜单项或按钮HTML5动画效果
- eclipse无法启动的各种解决方法
- markdown语法整理
- egret第一步
- MongoDB与物联网应用讲座
- 计算机网络常见面试题
- 使用tomcat_1——配置
- Excel数据大量导入MySQL--MySQL数据换行符回车符替换处理
- 如何查看真机的沙盒(图文教程)
- Web Uploader
- JavaScript创建对象的几种方式
- 【POJ 2029】 Get Many Persimmon Trees(DP)
- HDU 2665 Kth number(划分树)
- 骑士周游问题(马踏棋盘问题)DFS
- c#实验5.3:物体类的扩展