FUNCTION f(n)
   IF n=1 THEN
      LET f=1
   ELSEIF n=2 THEN 
      LET f=1
   ELSEIF n=3 THEN
      LET f=2
   ELSE
      LET f=f(n-1)+f(n-2)
   END IF
END FUNCTION

LET x=(1+SQR(5))/2
PRINT " 1:  �� ��";x
FOR k=2 TO 10
   PRINT USING "##":k;
   PRINT ": ";f(k);"�� +";f(k-1);" ��";f(k)*x+f(k-1)
NEXT k
PRINT
PRINT "     �ԁ�(1+SQR(5))/2"
END



#####################################################################



LET x=(1+SQR(5))/2
LET C=1
FOR i=1 TO 10
   LET C=C*x
   PRINT USING "##":i;
   PRINT ": ";C
NEXT i
END



#####################################################################



LET x=(1+SQR(5))/2
FOR i=1 TO 10
   PRINT USING "##":i;
   PRINT ": ";x^i
NEXT i
END