第五章节作业.pptVIP

Visual Basic 程序设计 * * 累加和、平均值 求素数 求数的质因数 穷举法 递推法 §5.3 程序示例 5 1.累加、连乘 例1：编写一个大奖赛统计选手得分的程序。 要求单击“得分显示”按钮，则可以利用随机函数产生10个80～100分之间的随机整数，输出在窗体上，并将计算选手的最后得分也在窗体上显示。 思考题： 如果在评委的给分中，去掉一个最高分和一个最低分，然后计算最后得分 分析：由随机函数生成80～100之间的10个数据 连续求和 求平均值 2.求阶乘 例2：求任一给定整数的阶乘，n！ 分析：对于任意整数n，有三种可能： 若 :n=0：提示数据输入错 否则若:n=0:n!=1 则 :n0:用循环实现乘运算 输出结果 思考题： 1.已知n，求1! ～ n!之和 2.给定条件1! ～ n!之和=5000，求最大n值 3.求近似值 例3：利用级数和求cos(x)函数的近似值(误差 10-6) 分析：应用前面的累加和连乘的知识 想到用循环计算各项之和,和初值=1 找到后项与前项的关系： f(n)=(-1)n*(X2/2*n)*f(n-1) x2 x4 (-1)n+1x2(n-1) Cos(x)=1 - ---- + ---- - …… + -------------------- +…（n=1,2,…) 2! 4! (2(n-1))! 思考题：  求下列数列的和，规定计算到第k项的值≤10-6为止。 （输入X=2测试程序，正确结果为S=0.9985868）。 ∞ k! S=∑ ------------------ k=1 (x+1)(x+2)…(x+k) 4.求素数 素数(质数)：一个大于等于2的整数，并且只能被1和自身 整除，而不能被其他整数整除的数 分析：用穷举法 用2~n-1逐个去除整数n. 若余数不为0，用下一个整数去除，直到n－1为止 否则进行标记，或退出循环 输出结果 例3：判断一个正整数n是否为素数 思考题： 找出100～200之间的所有素数,并添加在窗体的文本框中 5.求数的质因子 将一个正整数分解为质因数乘积。如36＝2×2×3×3 分析： 当x=I时 如果x mod I＝0 ，I是一个因子 否则I加1 思考题：判断一个正整数n是否是完数 即一个数恰好等于它的因子之和 如：28＝1＋2＋4＋7＋14 4. 穷举法 穷举法：就是将可能出现的各种情况一一测试，判断是否 满足条件 For x = 0 To 100 For y = 0 To 100 For z = 0 To 100 If x + y + z = 100 And _ 3 * x + 2 * y + 0.5 * z = 100 Then Print x, y, z End If Next z Next y Next x 例：百钱买百鸡 假设：小鸡5角/只，公鸡2元/只，母鸡3元/只，现有100元钱要买100只鸡，编程列出所有可能的购鸡方案 分析：设母鸡、公鸡、小鸡分别买X、Y、Z只 X+Y+Z=100 3*X+2*Y+0.5*Z=100 For x = 0 To 33 For y = 0 To 50 If 3 * x + 2 * y + 0.5 * (100 - x - y)_ = 100 Then Print x, y, z End If Next y Next x 4. 字符转换 例：将一个二进制的原码转换成反码 分析： 循环语句—决定转换的次数 Mid函数－－获取一个二进制位 If语句－－判断该位0?1,1?0 思考题：输入一个十进制整数，输出其原码和反码