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

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:

F_n = (x₁ⁿ – x₂ⁿ)/ sqrt(5)

dengan

• F_n adalah bilangan Fibonacci ke-n
• x₁ dan x₂ adalah penyelesaian persamaan x² – x – 1 = 0.

Perbandingan antara F_n+1 dengan F_n 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