' Calcula la serie de Fibonacci 
' Autor Mauricio Cantu
F[1]=1 
F[2]=1
FOR N = 1 TO 38
  F[N+2]=F[N+1]+F[N]
EndFor
  FOR N=1 TO 40
    TextWindow.WriteLine(F[N])
    Program.Delay(300)
EndFor