Hola,
Hay una pequeña errata en el cálculo de la homonimia que puse anteriormente, quizá por ello no te sale...
El paso 3 dice:
Cita:
3. Esta cadena se recorre de izquierda a derecha desde el primero hasta el penúltimo caracter. En la iteración i-ésima se multiplican los dígitos i e i+1.
Se suman todos los productos. En el ejemplo queda: 4756
|
En realidad, en cada iteración, lo que debe multiplicarse es el número formado por los dígitos i e i+1 por el dígito i. En pseudo-código:
Código:
FOR I := 1 TO LONGITUD(CADENA) - 1
SUMA := SUMA + CADENA[i]CADENA[I+1] * CADENA[I+1];
// Saludos