用for循环输出九九乘法表

输出九九乘法表

正三角：
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;

转载于:https://www.cnblogs.com/snowphil/p/5984908.html