Create Prog13 Cuadrado de un numero sumas sucesivas