易语言如何分解一个数的因数?不是质因数,是所有因数

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 09:05:04
易语言如何分解一个数的因数?不是质因数,是所有因数
xT]N@>֤3=!zJ Tb# h˃7!+ĸ/|3|Ɠ lnoHy&d3S^ 9?r>lx

易语言如何分解一个数的因数?不是质因数,是所有因数
易语言如何分解一个数的因数?
不是质因数,是所有因数

易语言如何分解一个数的因数?不是质因数,是所有因数
.版本 2
.程序集 窗口程序集1
.程序集变量 因数, 整数型
.程序集变量 变量, 整数型
.子程序 _按钮1_被单击
变量 = 到整数 (编辑框1.内容)
.如果真 (变量 ≤ 1)
信息框 (“你输入的数小于1”, 0, )
返回 ()
.如果真结束
.如果真 (变量 ≠ 到数值 (编辑框1.内容))
信息框 (“你输入的数不是自然数”, 0, )
返回 ()
.如果真结束
标签1.标题 = “1×”
求因子 ()
.子程序 求因子
.变量循环首 (2, 变量, 1, 因数)
.如果真 (变量 % 因数 = 0)
标签1.标题 = 标签1.标题 + 到文本 (因数)
跳出循环 ()
.如果真结束
.变量循环尾 ()
变量 = 变量 ÷ 因数
.如果真 (变量 ≠ 1)
标签1.标题 = 标签1.标题 + “×”
求因子 ()
.如果真结束