23 = 8
33 = 27
43 = 64
Como vemos en estos primeros números, la suma de los dígitos de los cubos es siempre mayor que la suma de los dígitos del número en cuestión.
Obviamente que esto no es siempre así, sino no les preguntaría :
¿Cuál es el menor número cuyo cubo tiene una suma digital menor que él?
Si lo quieres compartir o guardar
Entradas
Es 10^3=1000.
ResponderEliminarRafael : En este caso la suma es la misma (uno en ambos casos : 1+0 y 1+0+0+0 ), el número que busco tiene una suma digital del cubo menor que la de él
Eliminarcuando haces la suma, ¿hay que hacer la suma digital hasta que te quede un número de una cifra o solo sumas una vez?
ResponderEliminarAnónimo tienes razón, no es la suma digital sino la suma de los dígitos, así por ejemplo para 4 la suma da 4 y para su cubo, 64, la suma da 10.
Eliminar587
EliminarCorrecto, 587 suma 5+8+7 = 20 y su cubo, 202262003, suma 17
EliminarEl segundo es 5870, o sea el primero multiplicado por 10.
ResponderEliminarEl tercero es 28847
Computacionalmente es facil, pero igual sorprende lo escazos que son.
Hola, no he venido a responderte, solo darte las gracias por los ratos que paso en tu blog. Ester
ResponderEliminarGracias Ester!, espero que lo sigas disfrutando.
EliminarHola!! tengo un problema que no soy capaz de resolver, y es que se me plantea que debo de realizar una funcion que busque todos los números de tres cifras para los que la suma del cubo de sus cifras iguale al propio número. Por exemplo, 153=1^3+5^3+3^3.
Eliminar153=1^3+5^3+3^3
Eliminar370=3^3+7^3+0^3
371=3^3+7^3+1^3
407=4^3+0^3+7^3
Si utilizas mathematica de wolfram puedes usar:
Eliminar(* calcula la suma de los cubos de sus dígitos *)
f[x_Integer]:= Module[{s = 0, in = IntegerDigits[x]},
Do[s += in[[k]]^3, {k, Length[in]}]; s]
(* buscando entre los primeros 100000 números *)
Select[Range[100000], # == f[#] &]
Vicente Iq.
más sencilla y más rápida es:
Eliminarf2[x_Integer] := Total[IntegerDigits[x]^3]
, pero la anterior es más fácil de traducir a otros lenguajes.
vicente iq.
quiero saber si hay mas factores que cumplan con la condicion: de que solo en el producto esten los numeros de los factores. p.e.
ResponderEliminar86*8= 688
Campo NUÑEZ : esos números son los llamados "números vampiros", puede leer sobre ellos en http://simplementenumeros.blogspot.com.ar/2009/03/los-numeros-de-dracula.html
Eliminarejemplos
3 * 51 = 153
6 * 21 = 126
Con cuatro dígitos :
8 * 473 = 3784
9 * 351 = 3159
15 * 93 = 1395
21 * 87 = 1827
27 * 81 = 2187
35 * 41 = 1435