作业帮 > 综合 > 作业

易语言:把一个整数分解成三个整数乘积

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/08/31 05:52:23
易语言:把一个整数分解成三个整数乘积
我现在在写一个计算产品装外箱的程序,中间出了点问题,就是当输入任意一个数量时,会自动分成三个整数的乘积,比如:当我输入:12时,会显示如下装法:
1x12x1=12
1x2x6=12
1x3x4=12
2x3x2=12
2x6x1=12
3x2x2=12
3x4x1=12
.等等,必须是三个整数,这个算法怎么实现?
我大致写了一个,把长,宽,高都限制在100以内 可以更大但是程序就慢了.你可以参考着写,网速慢,图片传不上.
------------------------------------------------begin---------------------------------------------------------------
.版本 2
.程序集 窗口程序集1
.子程序 子程序1
.局部变量 长, 整数型
.局部变量 宽, 整数型
.局部变量 高, 整数型
.局部变量 乘积, 整数型
乘积 = 到数值 (编辑框1.内容)
.计次循环首 (100, 长)
.计次循环首 (100, 宽)
.计次循环首 (100, 高)
.如果 (长 × 宽 × 高 = 乘积)
列表框1.加入项目 (到文本 (长) + “x” + 到文本 (宽) + “x” + 到文本 (高) + “=” + 到文本 (乘积), )
.否则
.如果结束
.计次循环尾 ()
.计次循环尾 ()
.计次循环尾 ()
.子程序 _按钮1_被单击
列表框1.清空 ()
子程序1 ()
-----------------------------------------------------end-----------------------------------------------------------
复制中间代码到易语言然后粘贴就OK了,创建一个文本框 一个 列表框和一个按钮 就能正常使用了,不明白的 百度HI我
再问: 谢谢,但是还有一个问题:我想将其分列写入到列表框,怎么实现? 如: 列1 列2 列3 1 1 6 1 2 3 1 3 2 1 6 1
再答: 界面如下:程序如下:-----------------------------------------begin-----------------------------------------------------------------
.版本 2.支持库 iext.程序集 窗口程序集1.子程序 子程序1.局部变量 长, 整数型.局部变量 宽, 整数型.局部变量 高, 整数型.局部变量 乘积, 整数型.局部变量 索引, 整数型乘积 = 到数值 (编辑框1.内容).计次循环首 (100, 长)    .计次循环首 (100, 宽)        .计次循环首 (100, 高)            .如果 (长 × 宽 × 高 = 乘积)                索引 = 超级列表框1.插入表项 (, , , , , )                超级列表框1.置标题 (索引, 0, 到文本 (长))                超级列表框1.置标题 (索引, 1, 到文本 (宽))                超级列表框1.置标题 (索引, 2, 到文本 (高))                超级列表框1.置标题 (索引, 3, 到文本 (乘积))            .否则            .如果结束        .计次循环尾 ()    .计次循环尾 ().计次循环尾 ().子程序 _按钮1_被单击超级列表框1.全部删除 ()子程序1 ()
--------------------------------------------------end------------------------------------------------------------用法跟上面的一样  创建一个文本框 一个超级列表框 和一个按钮