Membuat Fibonanci dengan program PL/SQL. Misal output yang diinginkan seperti berikut ini :
0 1 1 2 3 5 8 13 21
Sintaks untuk PL/SQL :declare
type larik is table of integer index by binary_integer;
jml integer;
x larik;
begin
jml:=&max_deret;
x(1):=0;
x(2):=1;
while x(1) <=jml loop
x(3):=x(1);
dbms_output.put_line(x(1));
x(1):=x(2);
x(2):=x(3)+x(2);
end loop;
end;
/