Programa en Pseudocódigo para generar la serie 1/1!, 2/2!, 3/3! ... n/n!.
Proceso serie_factorial
Repetir
leer n
Hasta Que n>0 & n = trunc(n)
Para i<-1 Hasta n Con Paso 1 Hacer
f<-1
Para j<-1 Hasta i Con Paso 1 Hacer
f<-f*j
x<-i/f
FinPara
Escribir x
FinPara
FinProceso
Repetir
leer n
Hasta Que n>0 & n = trunc(n)
Para i<-1 Hasta n Con Paso 1 Hacer
f<-1
Para j<-1 Hasta i Con Paso 1 Hacer
f<-f*j
x<-i/f
FinPara
Escribir x
FinPara
FinProceso
Comentarios