0016 将大数分解出质因数-控制台程序-极语言教程

小程序 初始启动
写格式("请只输入大于 1 并且小于等于 2147 483 647 的正整数进行质因数分解: \r\n")
循环
{
    整数 输入数,计数,序号=1,开始时间=0,结束时间=0,需要时间=0
    读格式("%d",&输入数)
    开始时间=开机毫秒
    循环于(计数=2;输入数 != 1;)
        {
            如果(输入数 % 计数=0)
            {
                输入数=输入数 / 计数
                写格式("第 %d 个质因数: %d \r\n",序号,计数)
                序号++
            }
            否则
                计数++
        }
    结束时间=开机毫秒
    需要时间=结束时间-开始时间
    写格式("耗时: %d 毫秒 \r\n\r\n",需要时间)
}
结束