Impressão dos 10 primeiros números da sequência de Fibonacci!
DECLARE
v_N INTEGER := 0;
v_I INTEGER := 0;
v_J INTEGER := 1;
BEGIN
LOOP
dbms_output.put_line(v_I);
v_I := v_I + v_J;
v_J := v_I - v_J;
v_N := v_N + 1;
EXIT WHEN v_N > 9;
END LOOP;
END;
