编程语言应用

首页 » 常识 » 问答 » VB编程实际算法之求解11213
TUhjnbcbe - 2020/11/29 16:10:00

今天是年12月20日,距年还有11天时间!

年仅剩最后的11天时间了,加油,各位学习VB的朋友!

VB算法编程

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

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

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

程序运行图

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

DimnAsInteger

PrivateSubCommand1_Click()

n=InputBox("请输入N")

DimsAsDouble,jcAsDouble,iAsInteger

jc=1

Fori=1Ton

jc=jc*i

s=s+1/jc

Nexti

Print"所求的"n;"阶乘分之一和为:"Format(s,"###.##########")

EndSub

运行界面如下图;

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

其实这个可以用数学上的极限来考虑。

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

或者需要学习资料

可以长按下方

1
查看完整版本: VB编程实际算法之求解11213