oracle冒泡-创新互联

DECLARE
  TYPE num_tt IS TABLE OF INT;
  num_t num_tt:=num_tt();
  mid_val INT;
BEGIN
  num_t.extend(20);
  FOR i IN 1..20 LOOP
    num_t(i) := trunc(dbms_random.value(200,100000));
  END LOOP;
  dbms_output.put_line('before sort:');
  FOR i IN 1..num_t.count LOOP
    dbms_output.put_line(num_t(i)||',');
  END LOOP;
  FOR i IN REVERSE 1..num_t.count-1 LOOP
    FOR j IN 1..i LOOP
      IF(num_t(j)>num_t(j+1)) THEN
         mid_val := num_t(j);
         num_t(j) := num_t(j+1);
         num_t(j+1) := mid_val;
      END IF;
    END LOOP;
  END LOOP;
  dbms_output.put_line('after sort:');
  FOR i IN 1..num_t.count LOOP
    dbms_output.put_line(num_t(i)||',');
  END LOOP;
END;

  

创新互联建站是专业的永吉网站建设公司,永吉接单;提供成都做网站、成都网站设计,网页设计,网站设计,建网站,PHP网站建设等专业做网站服务;采用PHP框架,可快速的进行永吉网站开发网页制作和功能扩展;专业做搜索引擎喜爱的网站,专业的做网站团队,希望更多企业前来合作!

另外有需要云服务器可以了解下创新互联cdcxhl.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。


当前题目:oracle冒泡-创新互联
文章源于:http://pwwzsj.com/article/ccodog.html