Estoy intentando aplicar el algoritmo de cuadrar y multiplicar y estoy obteniendo resultados extraños aunque estoy bastante seguro de haber hecho todo bien. Estoy tratando de calcular $5^{25} \mod 193$ :
Representación binaria de 25: 11001
\begin{equation} \begin{split} 5^2 = 25 \\ 25*5 = 125 \\ 125^2 = 185 \\ 185*5 = 153 \\ 152^2 = 56 \\ 56^2 = 48 \\ 48^2 = 181 \\ 181*5 = 133 \end{split} \end{equation}
Pero cuando compruebo mi respuesta en wolframalpha me dice que la solución correcta debería ser 22. He comprobado cada paso dos veces. ¿Qué me he perdido?
