Visual Basic 6.0程序设计 教学课件 作者 黄学平 主编 Ⅲ 06 normal algorithms.pptVIP

常用算法 一累加、累乘 累加就是在原来的和的基础上一次又一次地再加上一个数 2.1累乘 又叫连乘是在原来积的基础上一次又一次地再乘上一个数。 最大值或最小值 二、用辗转相除法求两自然数m，n的最大公约数和最小公倍数。 算法：(1)对于已知两数m，n，使得mn； (2) m除以n得余数r； (3)若r=0，则n为最大公约数结束；否则执行(4)； (4)m? n，n? r，再重复执行(2)。 三、穷举法 穷举法（又称“枚举法”）的基本思想是： 一列举各种可能的情况，并判断哪一种可能是符合要求的解 这是一种“在没有其它办法的情况的方法”，是一种最“笨”的方法，然而对一些无法用解析法求解的问题往往能奏效，常常采用循环来处理穷举问题。 求所有的两位数AB 穷举法采用循环实现 递推法 当得到问题规模为i-1的解后，能从已求得的规模为 1，2，……，i-1的一系列解，构造出问题规模为i的解。 * 算法是指解决问题的一种方法或者一个过程 程序被认为是使用某种程序设计语言对一种算法的具体实现 例：求1～100的整数之和 。 Sum = 0 For i = 1 To 100 Sum = Sum + i Next i Print Sum 例1 1.累加 例：求1～100的整数之乘积 A = 1 For i =1 To 100 A = A* i Next i Print A 编写一个函数实现m到n的乘积,m=n 编写一个函数实现m的阶乘m! 例：求1～100的整数之乘积 A = 1 i = 1 do while i=100 A = A* i i = i+ 1 loop Print A 例2 i = 1 i = 1 结束后i为101 例3 e = 1 : A = 1 Do Until 1 / A 0.01 ‘A 100 Loop A = A * i i = i + 1 e = e + 1 / A Picture1.Print i; i - 1 Picture1.Print e; e i = 1 Max = 100 For i = 1 To 10 x = Int(Rnd * 101 + 100) Next i Print 最大值=; Max 在若干个数中求最大值： 一般先假设这些数中的一个数为最大值的初值 方便起见都取第一个数为最大值的初值 求最大值：初值不在其中，则应该偏小 求最小值：初值不在其中，则应该偏大。 If x Max Then Max = x 例4 设输入m=28,n=20 循环 m n r 赋好初值时：28 20 8 第一次结束：20 8 4 第二次结束： 8 4 0 If m n Then t = m: m = n: n = t r=m mod n Do While (r 0) m=n n=r r= m mod n Loop Print 最大公约数=, n 例5 For A = 1 To 9 For B = 0 To 9 data1 = A * 10 + B Print data1 Next B Next A 例6 [例3- 28]数字灯谜。设有算式 ABCD -） CDC ABC A、B、C、D分别为非负一位数字，算式中的ABCD为4位数，CDC为3位数，ABC为3位数，找出满足以上算式的A、B、C、D。 算法——穷举法： 对4位数字的所有可能的组合，检测以上算式是否成立 采用了四重循环 由于A、C为最高位，取值不为0 ABCD -） CDC ABC For A = 1 To 9 For B = 0 To 9 For C = 1 To 9 For D = 0 To 9 S1 = A * 1000 + B * 100 + C * 10 + D S2 = C * 100 + D * 10 + C S3 = A * 100 + B * 10 + C If S1 - S2 = S3 Then Print A; B; C; D En