--循环
create or replace procedure p_xunhuan(input in number,output out number) is

       temp number(10);

begin

       temp := 0;
       
       for temp in 0..input loop
           begin
                output := input+temp;
                dbms_output.put_line(‘----‘||output);
           end;
       end loop;
       
end p_xunhuan;

declare 
     sr number;--输入参数
     sc number;--输出参数
begin
     sr := 7;
     p_xunhuan(sr,sc);
end;

----7
----8
----9
----10
----11
----12
----13
----14