elabore un programa que permita calcular el factorial de los 10 primeros números figonassi
inicio
P=1 S=2 AC=1 Y=0 X=0
ESCRIBA P,S
FOR X=1 to 8
  T=P+S
ESCRIBA T
  P=S
  S=T
 AC=1
FOR Y=1 toT
 AC=AC*Y
NEXT
   Y
ESCRIBA AC
NEXT
   X
FIN