vb常用算法介绍.docxVIP

一、 累加算法 如果在设计过程中遇到求 1+2+3+,, +100 等连加问题时，就可以用累加算法来解决。 累加算法的一般做法是设一个变量 s,作为累加器使用，初值为 0,设一个变量用来保存 加数。一般在累加算法中的加数都是有规律可循，可结合循环程序来实现。 一个循环程序 的设计,如果以下三方面确定下来：变量的赋初值、循环体的内容、循环结束条件,那么根 据循环语句的格式,就很容易写出相应的循环程序。 例：求 1+2+3++100 的累加和,并打印输出 分析： 设累加器S，初值为0，加数用变量I表示 当1=1时，累加器 S= S+I = 0+仁1 当 I=2 时,累加器 S= S+I =1+2= 3 当 I=3 时,累加器 S=S+I =3+3 =6 当 I=4 时,累加器 S=S+I =6+4 =10 当 I=100 时,累加器 S=S+100=1+2+3+,, +99+100=5050 不难看出, I 的值从 1 变化到 100的过程中,累加器均执行同一个操作： S=S+I, S=S+I 的操作执行了 100 次,所以该程序段可写成： Dim I As Integer, S As Integer S = 0 给累加器s赋初值 For S = 1 To 100 S= S + I ‘ I 既作为循环变量,又作为加数 Next I Print 1+2+ ,, 100=; S 考虑一下：