奇数：奇数：1，3，5，7，9回文数：回文数：11、99、424、858、737相亲数：相亲数：220和和284、1184与与1210完美数完美数：6、28、496、8128偶数：偶数：2，4，6，8，10素数（质数）：素数（质数）：2，3，5，7，11水仙花数与水仙花数与 四叶玫瑰数四叶玫瑰数水仙花数与四叶玫瑰数属于自幂数又称阿姆斯特朗数）是指一个是指一个 n n 位正整数位正整数 (n3(n3)，它的每个位上的数字的它的每个位上的数字的 n n 次幂之和等于次幂之和等于它本身当n=3时，又称水仙花数，其各位数之立方和立方和等于该数例如：13+53+33=153）当n=4时，又称四叶玫瑰数，其各位数之四次方和四次方和等于该数例如：1634=14+64+34+44）在给定范围范围内，对所有符合条件条件的答案按顺序逐一枚举的解题方法叫“穷举穷举法法”穷举法”在密码破解、数据恢复等方面有着广泛的应用怎样找到罪犯？怎样找到罪犯？一、分析问题一、分析问题由水仙花数的概念可知：找出水仙花数1、它们是_位数的正整数设变量i i用于存放每一个需要判断的数，则i由_变到_,故需要用到_结构三三100999循环循环一、分析问题：一、分析问题：由水仙花数的概念可知：2、水仙花数是各位数各位数的立方之和，故首先需得到每位上的数。
设变量g g、s s、b b分别存放个位、十位、百位上的数，则：g=_g=_s=_s=_b=_b=_3、找到各位上的数后，判断其是否为水仙花数的条件条件为：_i mod 10i 10 mod 10i 100或者或者(i mod 100）10g3+s3+b3=ii=100i=g3+s3+b3g=i mod 10Print i开始i=999s=(i Mod 100)10b=i 100是否是结束否i=i+1二、用流程图描述算法二、用流程图描述算法Private Sub Form_Click()Rem 此程序用于找出水仙花数ClsPrint 水仙花数有：“Dim i As IntegerDim g As Integer,s As Integer,b As IntegerFor i=100 To 999 g=i Mod 10 s=(i Mod 100)10 b=i 100 If g 3+s 3+b 3=i Then Print i End IfNextEnd Sub三、编写代码三、编写代码演示演示找出四叶玫瑰数一、分析问题一、分析问题由四叶玫瑰数的概念可知：1、它们是_位数的正整数设变量i i用于存放每一个需要判断的数，则i由_变到_,故需要用到_结构。
一、分析问题一、分析问题由四叶玫瑰数的概念可知：2、四叶玫瑰数是各位数各位数的四次方之和，故首先需得到各位上的数设变量g g、s s、b b、q q分别存放个位、十位、百位、千位上的数，则：g=_ s=_g=_ s=_b=_ q=_b=_ q=_3、找到各位上的数后，判断其是否为四叶玫瑰数的条件条件为：_二、用流程图描述算法二、用流程图描述算法开始i=i=g=s=b=i=Print ii=i+1结束是是否否q=三、编写代码三、编写代码Private Sub Form_Click()Dim i As IntegerDim g As Integer,s As IntegerDim b As Integer,q as integerFor i=_To _ g=_ s=_ b=_ q=_ If _=i Then Print i End IfNext End Sub演示演示课堂检测利用多重循环实现Private Sub Form_Click()ClsPrint 水仙花数有：水仙花数有：“Dim g As Integer,s As Integer,b As IntegerFor b=_ To _ For s=_ To _ For g=0 To 9 If g 3+s 3+b 3=_Then Print b&s&g End If Next _ Next _Next _End Sub1909b*100+s*10+ggsb自我巩固自主学习P124，阅读问题2的程序。
通过对自幂数概念的理解和算术运算符的应用，完成了用“穷举法”对数的查找课堂小结。