Algoritmo detarea Definir x Como Entero x = 1 Mientras x < 1000 Hacer Escribir x x = x ^ 2 + 1 FinMientras FinAlgoritmo