create or replace procedure fibnoci(n in out integer)Is 
  temp integer;
  num1 integer:=0;
  num2 integer:=1;
begin 
   dbms_output.put_line(n);
   for i in 1 ..n
      loop
	dbms_output.put_line(num1||' ');
         temp:=num1;
         num1:=num2;
         num2:=temp+num2;
       
         
    end loop;
end;
/
declare 
  a integer:=&a;
begin 
  fibnoci(a);
end;
/