输出九九乘法表

正三角：

DECLARE

  X NUMBER :=1;

  Y NUMBER :=1;

  CJ NUMBER:=1;

BEGIN

 

   FOR Y IN 1..9 LOOP

     FOR X IN 1..Y LOOP

       CJ:=X*Y ;

       dbms_output.put/*_line*/(X||'*'||Y||'='||CJ||' ');

       END LOOP;

       dbms_output.put_line(' ');

    END LOOP;

END;

------------------   

输出倒三角： 

DECLARE

  X NUMBER :=1;

  Y NUMBER :=1;

  CJ NUMBER:=1;

BEGIN

 

   FOR Y IN REVERSE 1..9 LOOP

     FOR X IN 1..Y LOOP

       CJ:=X*Y ;

       dbms_output.put/*_line*/(X||'*'||Y||'='||CJ||' ');

       END LOOP;

        dbms_output.put_line(' ');

    END LOOP;

END;