当前位置: 源码素材网 » VB源码 » 算法相关 » 详情页

VB 求1!+2!+3!+4!+5!…+20!阶乘的和

VB 求1!+2!+3!+4!+5!…+20!的和,求阶乘,这在数学领域,是个不稀罕的求解问题,不过有不少人觉得难啊,不过用程序写下来,基本上没几行代码就可实现,尤其是在VB下,表现要更简单些,下面来看代码:
  Dim n As Integer, i As Integer, sum As Double
  Dim k As Double
  i = 1
  k = 1
  While i <= 15
   k = k * i
   sum = sum + k
   i = i + 1
  Wend
  Print "1!加到15!="; sum

  • 相关标签:阶乘 求和
  • 调试环境:VB6.0
  • 文件大小:1.85K
  • 资源评级:
  • 更新时间:2020-07-14
  • 相关链接:暂无演示

源码测试截图:

VB 求1!+2!+3!+4!+5!…+20!阶乘的和运行截图

相似源码:阶乘 求和 VB源码下载:VB 求1!+2!+3!+4!+5!…+20!阶乘的和 测试截图

下载声明:

本站资源仅供学习参考,禁止用于非法途径。若“VB 求1!+2!+3!+4!+5!…+20!阶乘的和”源代码侵犯了您的权益,请尽快告诉我们。