SCL编程实例100例-022-自守数

>

1 | 题目

自守数是指一个数的平方的尾数等于该数自身的自然数。例如：5² = 25 , 25² = 625 , 76² = 5776 , 9376² = 87909376。设计一个程序求1000以内的自守数。

2 | 设计分析

不断分离给定自然数及其平方的个位，十位，百位，千位……，判断给定自然数是否等于其平方的尾数，循环直到没有可比的数位。

3 | 创建功能或功能块

创建功能块FB，命名为“AutomorphicNumber”。

4 | 定义接口变量

具体接口变量定义见下图：

预定义含有10个元素的一维数组来保存结果，为了方便监控数值，大部分变量被定义成Static变量。给定的自然数及其平方的数据类型定义为LINT类型，否则会数据溢出，得到错误结果。

5 | 程序代码

编写程序代码。如下图：

先比较个位，再比较十位，然后比较千位，以此类推直到没有可比较的数位即已经比较完，如果相等则为自守数，否则不是。

6 | 代码测试

在循环OB中调用FB- “AutomorphicNumber”，调用时会自动创建背景数据块，命名为“InstAutomorphicNumber”，该背景数据块可以用来监视和修改数据。转至在线并监控程序。如下图：

得到1000以内的自守数共7个，分别是：1、5、6、25、76、376、625。

7 | 总结

学习使用WHILE循环语句；

学习使用FOR循环语句；

学习使用IF..ELSE语句；

学习 EXIT语句的作用。

-