1 SET serveroutput ON;
 2 DECLARE
 3 pnum NUMBER :=1;
 4 BEGIN
 5 while pnum<=10 loop
 6 dbms_output.put_line(pnum);
 7 --变量+1
 8 pnum := pnum+1;
 9 end loop;
10 END;
11 /