PL/SQL 关于循环的练习

输出99乘法表

declare
begin
  for i in 1..9 loop
    for j in 1..i loop
    --不换行输出数据
      dbms_output.put(j||'*'||i||'='||(j*i));
    end loop;
    --换行输出
    dbms_output.put_line(null);
  end loop;
end;
效果：
1*1=1
1*2=22*2=4
1*3=32*3=63*3=9
1*4=42*4=83*4=124*4=16
1*5=52*5=103*5=154*5=205*5=25
1*6=62*6=123*6=184*6=245*6=306*6=36
1*7=72*7=143*7=214*7=285*7=356*7=427*7=49
1*8=82*8=163*8=244*8=325*8=406*8=487*8=568*8=64
1*9=92*9=183*9=274*9=365*9=456*9=547*9=638*9=729*9=81

 

 

输出等腰三角形

declare
begin
  for i in 1..10 loop
    --循环输出总数-行数个空格
    for j in reverse i..10 loop
      dbms_output.put(' ');
    end loop;
    --输出行数个*号和空格
    for x in 1..i loop
      dbms_output.put('* ');
    end loop;
    --换行
  dbms_output.put_line(null);
  end loop;
end;
 
效果：
          *
         * *
        * * *
       * * * *
      * * * * *
     * * * * * *
    * * * * * * *
   * * * * * * * *
  * * * * * * * * *
 * * * * * * * * * *

 

四种循环方法遍历一个表

 

--遍历college表

--第一种方法，游标+for循环

 
declare
cursor coll_cursor is select * from college;
begin
  for coll_info in coll_cursor loop
    dbms_output.put(coll_info.coll_id||'  ');
    dbms_output.put(coll_info.coll_name||'  ');
    dbms_output.put(coll_info.coll_score);
    dbms_output.put_line(null);
  end loop;
end;

 

 

--第二种方法 游标+while循环

 

declare
  cursor coll_cursor is select coll_id,coll_name from college;
id college.coll_id%type;
name college.coll_name%type;
begin
  open coll_cursor;
  fetch coll_cursor into id,name;
  while coll_cursor%found loop
    dbms_output.put(id||' ');
    dbms_output.put(name);
    dbms_output.put_line(null);
    fetch coll_cursor into id,name;
  end loop;
  close coll_cursor;
end;

 

 

--第三种方法 不定义游标，直接获取结果集里面的数据

 

begin
  for coll_info in (select * from college) loop
    dbms_output.put(coll_info.coll_id||'  ');
    dbms_output.put(coll_info.coll_name||'  ');
    dbms_output.put(coll_info.coll_score);
    dbms_output.put_line(null);
  end loop;
end;

 

 

--第四种方法

declare
 cursor coll_cursor is select * from college;
 coll_info college%rowtype;
begin
  open coll_cursor;
  loop
    fetch coll_cursor into coll_info;
    exit when coll_cursor%notfound;
    dbms_output.put(coll_info.coll_id||'  ');
    dbms_output.put(coll_info.coll_name||'  ');
    dbms_output.put(coll_info.coll_score);
    dbms_output.put_line(null);
  end loop;
  close coll_cursor;
end;

 

 

结果：

1013  燕山大学  575

1001  清华大学  620

1002  北京大学  600

1003  武汉大学  550

1004  华南科技大学  530

1005  复旦大学  580

1006  中山大学  620

1007  华北理工大学  500

1008  暨南大学  510

1009  山东科技大学  620

1014  哈尔滨工业大学  575

1010  唐山学院  480

1011  吉林大学  580

1015  中国石油大学  565