算始 正整数的质因子分解(n)
    n := 整数(n)

    若始 (n < 2)
        返回 []
    若另 (n < 4)
        返回 n
    若终

    factors := []

    k := 2
    当始 (k <= n)

        若始 (n % k == 0)
            flag := 真
            i := 2
            当始 (i * i <= k)
                若始 (k % i == 0)
                    flag := 假
                    跳出
                若终
                i := i + 1
            当终

            若始 (flag == 真)
                factors := factors + [k]
            若终
        若终

        k := k + 1
    当终

    返回 factors
算终