首页 > 编程知识 正文

求1到10的阶乘之和用vb怎么编程序,vb中1的阶乘到n的阶乘之和怎么求

时间:2023-05-03 19:48:23 阅读:242193 作者:1780

学习成就未来,知识改变命运!加油,各位正在学习VB编程的朋友!

VB算法编程

在VB编程中,我们可以根据算法,利用VB知识来开发各种实际的应用程序。

今天我们以求1/1!+1/2!+1/3!+.....+1/n!之和为例,讲解VB编程思想。这个程序非常类似于1+2+3+...+n 之和的程序代码,但是仔细一看,却有很大不同。

因为这是两个不同的算法,其实我们在VB的学习中,最主要的一个方面也是学习编程的思想,有了这个思想,我们就能写出相应的代码,从而完成既定的功能。

程序运行图

我们用输入对话框来确定N的值为多少,写出下列相应的代码:

Dim n As Integer '通过输入对话框得到N值Dim s As Double, jc As Double, i As Integer '定义变量Private Sub Command1_Click() n = InputBox("请输入N") jc = 1 For i = 1 To n jc = jc * i s = s + 1 / jc Next i Print "所求的" & n; "阶乘分之一和为:" & Format(s, "###.##########")End Sub

运行界面如下图;

有趣的是,在N达到某个值后,其和的值会稳定在某个值附近不变,我们可以看下图的程序截图,在N大于13后,随着N的增大,其值s会稳定在一个数不变。

其实这个与数学上的极限是一个道理。

在VB学习过程中有不懂的地方

可以长按下方二维码识别

添加老师微信

学习问题在线解答

版权声明:该文观点仅代表作者本人。处理文章:请发送邮件至 三1五14八八95#扣扣.com 举报,一经查实,本站将立刻删除。