membuat program fibonaci dengan PL/SQL di ORALCE

selamat pagi ini ada contoh program fibonaci dengan bahasa PL/SQL contoh bilangan nya seperti ini 0 1 1 2 3 5 8 13 dst
jadi gimana ada banyangan kan. caranya simple tidak sesulit teorinya seperti dibawah ini kalau ingin simak teorinya

  F(n)=
   \begin{cases}
    0, & \mbox{jika }n=0; \\
    1, & \mbox{jika }n=1; \\
    F(n-1)+F(n-2) & \mbox{jika tidak.}
   \end{cases}
Penjelasan: barisan ini berawal dari 0 dan 1, kemudian angka berikutnya didapat dengan cara menambahkan kedua bilangan yang berurutan sebelumnya. Dengan aturan ini, maka barisan bilangan Fibonaccci yang pertama adalah:
0, 1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 89, 144, 233, 377, 610, 987, 1597, 2584, 4181, 6765, 10946...
Barisan bilangan Fibonacci dapat dinyatakan sebagai berikut:
Fn = (x1n – x2n)/ sqrt(5)
dengan
  • Fn adalah bilangan Fibonacci ke-n
  • x1 dan x2 adalah penyelesaian persamaan x2 – x – 1 = 0.
Perbandingan antara Fn+1 dengan Fn hampir selalu sama untuk sebarang nilai n dan mulai nilai n tertentu, perbandingan ini nilainya tetap. Perbandingan itu disebut rasio emas yang nilainya mendekati 1,618.
seperti diatas penjelasan teorinya gimana ??
kalau sudah paham mari langsung ke code nya buka isqlplus di oracle nya dan ketik program dibawah ini.
************************************
SET SERVEROUTPUT ON
declare 
n1 number(2) := 0;
n2 number(2) := 1;

display number(2);

BEGIN
DBMS_OUTPUT.PUT_LINE(n1);
DBMS_OUTPUT.PUT_LINE(n2);
FOR i IN 1..7 LOOP
    display := n1 + n2 ;
    n1 := n2;
   n2 := display;
DBMS_OUTPUT.PUT_LINE(display);
END LOOP;
END;
/
**************

cukup seperti itu dan hasilnya seperti diatas simple ya :D