INICIO
String =semilla, snumero2, snumero3
int =tam1, tam2, i, primerc
long = numero1, numero2;
semilla = canaviri.next() tam1 = semilla.length() numero1 = Integer.parseInt(semilla)
for (i = 1; i <= 100; i++)
numero2 = (long) Math.pow(numero1, 2) snumero2 = Long.toString(numero2) tam2 = snumero2.length() primerc = (tam2 - tam1) / 2 snumero3 = snumero2.substring(primerc, primerc + tam1); numero1 = Integer.parseInt(snumero3)
I,snumero3
fin