while_loop2.sql

来自「学习PL/SQL时收集的一些经典的SQL源代码」· SQL 代码 · 共 20 行

create or replace procedure while_loop2(
	v_num1	in	number)
is
	i		number(3);
	j		number(3);
begin
	   i:=v_num1;
	   while i>=0 loop
	 	dbms_output.put_line(i);
		 i:=i-2;
		 j:=0;
		 while j<i loop
		 	dbms_output.put_line('***');
		  	j:=j+3;
		 end loop	
 	   end loop;
 
end;
/