NOTAS: Calcula el valor de la constante e. e = 1/0! + 1/1! + 1/2! + ... + 1/n! aprox : mientras mas pequeño, mayor precision fact : calcula los factoriales procedure e read(aprox) cont=0 fact=1 e=1 repeat cont=cont+1 fact=fact*n suma=1/fact e=e+suma until suma