Verified answer

En C++ no me meto porque es horrible, pero en Logo es así:

porcada [escribe ?] impon [expon [[expon [mismo divisores] multi junta duplica] mismo]] combiconj lista 2 [2 3 5 7 11 13 17 19]

[36 [1 2 3 4 6 9 12 18 36]] [2 3]

[100 [1 2 4 5 10 20 25 50 100]] [2 5]

[196 [1 2 4 7 14 28 49 98 196]] [2 7]

[484 [1 2 4 11 22 44 121 242 484]] [2 11]

[676 [1 2 4 13 26 52 169 338 676]] [2 13]

[1156 [1 2 4 17 34 68 289 578 1156]] [2 17]

[1444 [1 2 4 19 38 76 361 722 1444]] [2 19]

[225 [1 3 5 9 15 25 45 75 225]] [3 5]

[441 [1 3 7 9 21 49 63 147 441]] [3 7]

[1089 [1 3 9 11 33 99 121 363 1089]] [3 11]

[1521 [1 3 9 13 39 117 169 507 1521]] [3 13]

[2601 [1 3 9 17 51 153 289 867 2601]] [3 17]

[3249 [1 3 9 19 57 171 361 1083 3249]] [3 19]

[1225 [1 5 7 25 35 49 175 245 1225]] [5 7]

[3025 [1 5 11 25 55 121 275 605 3025]] [5 11]

[4225 [1 5 13 25 65 169 325 845 4225]] [5 13]

[7225 [1 5 17 25 85 289 425 1445 7225]] [5 17]

[9025 [1 5 19 25 95 361 475 1805 9025]] [5 19]

[5929 [1 7 11 49 77 121 539 847 5929]] [7 11]

[8281 [1 7 13 49 91 169 637 1183 8281]] [7 13]

[14161 [1 7 17 49 119 289 833 2023 14161]] [7 17]

[17689 [1 7 19 49 133 361 931 2527 17689]] [7 19]

[20449 [1 11 13 121 143 169 1573 1859 20449]] [11 13]

[34969 [1 11 17 121 187 289 2057 3179 34969]] [11 17]

[43681 [1 11 19 121 209 361 2299 3971 43681]] [11 19]

[48841 [1 13 17 169 221 289 2873 3757 48841]] [13 17]

[61009 [1 13 19 169 247 361 3211 4693 61009]] [13 19]

[104329 [1 17 19 289 323 361 5491 6137 104329]] [17 19]

Por favor necesito, si me puedes ayudar con el Numero poderoso en c++. Gracias

Bueno hice un algortimo, parecido al k tu kieres, pero míralo haber si te interesa esta en mi blog

http://infortecnologys.blogspot.com/