2

Value (8): 1 2 2 2

 

2

Value (65536): 1 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2 2

    #include <iostream>

    #include <vector>

    

    void PrimeFactorization(unsigned int Value, std::vector<int> &Res) {

       unsigned int Div = 2, Div2 = 4;

       Res.push_back(1);

       while (Value > 1) {

          while (Value >= Div2 && Value % Div == 0) {

             Res.push_back(Div);

             Value /= Div;

          }

          if (Value < Div2) {

             Res.push_back(Value);

             Value = 1;

          }

          if (Div++ > 2) Div++;

          Div2 = Div * Div;

       }

    }

    

    int main() {

      unsigned int Value = 65536;

      std::vector<int> Res;

      PrimeFactorization(Value, Res);

      std::cout << "Value (" << Value << "): ";

      for(const auto &i: Res) std::cout << i << " ";

      std::cout << std::endl;

      return 0;

    }

Value (2147483647): 1 2147483647

#include <iostream>

#include <vector>

 

void PrimeFactorization(int Value, std::vector<int> &Res) {

  int Div = 2;

  Res.push_back(1);

  while (Value > 1) {

    while (Value % Div == 0) {

        Res.push_back(Div);

        Value /= Div;

    }    

    if (Div == 2) Div++;

    else Div += 2;

  }

}

 

int main() {

  int Value = 10111787;

  std::vector<int> Res;

  PrimeFactorization(Value, Res);

  std::cout << "Value (" << Value << "): ";

  for(const auto &i: Res) std::cout << i << " ";

  return 0;

}

Value (10111787): 1 7 7 17 61 199

{$S-,B-,R-,Q-}<br>Var<br>   N, i, j: DWord;<br>   Prime: Boolean;<br><br>Begin<br>   N := $FFFFFFFF;<br>   Repeat<br>      For i := 2 to Trunc(Sqrt(N)) do<br>      Begin<br>         Prime := True;<br>         For j := 2 to Trunc(Sqrt(i)) do<br>            If (i mod j) = 0 then<br>            Begin<br>               Prime := False;<br>               Break<br>            End;<br>         If Prime and ((N mod i) = 0) then<br>         Begin<br>            WriteLn(i);<br>            N := N div i;<br>            Break<br>         End<br>      End<br>   Until not Prime;<br>   WriteLn(N)<br>End.

{$S-,B-,R-,Q-}<br>Var<br>   N, i, j: DWord;<br>   Prime: Boolean;<br><br>Begin<br>   N := $FFFFFFFF;<br>   For i := 2 to Trunc(Sqrt(N)) do<br>   Begin<br>      Prime := True;<br>      For j := 2 to Trunc(Sqrt(i)) do<br>         If (i mod j) = 0 then<br>         Begin<br>            Prime := False;<br>            Break<br>         End;<br>      If Prime and ((N mod i) = 0) then WriteLn(i)<br>   End<br>End.

{$S-,B-,R-,Q-}<br>Var<br>   N, i: DWord;<br><br>Begin<br>   N := $FFFFFFFF;<br>   For i := 2 to Trunc(Sqrt(N)) do<br>      If (N mod i) = 0 then WriteLn(i)<br>End.