水仙花数c++语言程序 VB编程水仙花数？

VB编程水仙花数？

所谓水仙数（梅花数）是指百、十、一的三位数整数（100到999）的立方和，如153=1^3 5^3^3。程序代码如下：private sub command1uclick（）dim I as integer，s as integer dim a as integer，B as integer，C as integer print“100到999所有水仙花（也称梅花数）：“for I=100到999 a=I100”take数百B=I10 mod 10”或B=I mod 10010 take tens C=I mod 10”take single digits s=a^3 B^3 C^3“水仙花数根据s=I判断，然后打印I end if next iend sub运行结果：100到999所有水仙花数（也称梅花数）：153 370 371 407

1。首先启动VB6.0并创建一个新的标准exe项目。

2. 在窗体上绘制命令按钮（名称：command1），双击命令按钮进入代码窗口。

3. 接下来，让我们为command按钮编写click事件。首先，设置三个变量a、B、C，然后给这三个变量赋值。假设我们判断150，那么a=150 mod 10，那么a=0。类似地，B=15010 mod 10，所以B=5。等等。如果它等于它自己，那么它就是水仙数（梅花数），否则它就不是水仙数。

4. 接下来，我们可以按F5运行测试，单击命令按钮，并输出所需的结果。

水仙花数c++语言程序 vb编写100至999的水仙花数 判断输入的数是否是水仙花数

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。