ITPub博客

首页 > Linux操作系统 > Linux操作系统 > pl/sql 冒泡排序一例

pl/sql 冒泡排序一例

原创 Linux操作系统 作者:dengxm 时间:2011-09-20 07:17:43 0 删除 编辑
昨天写了个排序算法,记录一下
-----------------------------------------------------------------------------------------
DECLARE
   TYPE mylist_type IS TABLE OF NUMBER
      INDEX BY PLS_INTEGER;
   mylist   mylist_type;
   n_temp   NUMBER;
BEGIN
   mylist (0) := 3;
   mylist (1) := 2;
   mylist (2) := 1;
   mylist (3) := 4;
   mylist (4) := 0;
   FOR i IN REVERSE 0 .. mylist.COUNT - 1
   LOOP
      FOR j  IN 1 .. i
      LOOP
         IF mylist (j-1) <= mylist (j)
         THEN
            n_temp := mylist (j-1);
            mylist (j-1) := mylist (j);
            mylist (j) := n_temp;
         END IF;
      END LOOP;
      DBMS_OUTPUT.put_line ('mylist (' || i || ')' || '=' || mylist (i));
   END LOOP;
END;
/

mylist (4)=0
mylist (3)=1
mylist (2)=2
mylist (1)=3
mylist (0)=4

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/13726712/viewspace-707908/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2008-10-08

  • 博文量
    54
  • 访问量
    143402