Create (ciclo for)numeros perfectos