oracle 归并
admin
2023-05-11 03:01:03
0

DECLARE
   TYPE num_tt IS TABLE OF INT;
   num_t1 num_tt:=num_tt();
   num_t2 num_tt:=num_tt();
   num_t3 num_tt:=num_tt();
   i_1 INT := 1;
   j_1 INT := 1;
   d_1 INT := 1;
BEGIN
   num_t1.extend(20);
   num_t2.extend(20);
   num_t3.extend(num_t1.count+num_t2.count);
   FOR i IN 1..20 LOOP
     num_t1(i) := trunc(dbms_random.value(200,100000));
   END LOOP;
   dbms_output.put_line('num_t1:');
   quick_sort(num_t1, 1, num_t1.count);
   FOR i IN 1..num_t1.count LOOP
     dbms_output.put_line(num_t1(i)||',');
   END LOOP;
   FOR i IN 1..20 LOOP
     num_t2(i) := trunc(dbms_random.value(200,100000));
   END LOOP;
   dbms_output.put_line('num_t2:');
   quick_sort(num_t2, 1, num_t2.count);
   FOR i IN 1..num_t2.count LOOP
     dbms_output.put_line(num_t2(i)||',');
   END LOOP;
   WHILE(i_1 <= num_t1.count AND j_1 <= num_t2.count) LOOP
     IF(num_t1(i_1) > num_t2(j_1)) THEN
        num_t3(d_1) := num_t2(j_1);
        j_1 := j_1 + 1;
     ELSE
        num_t3(d_1) := num_t1(i_1);
        i_1 := i_1 + 1;
     END IF;
     d_1 := d_1 + 1;
   END LOOP;
   IF(i_1<=num_t1.count) THEN
     FOR i IN i_1..num_t1.count LOOP
       num_t3(d_1) := num_t1(i);
       d_1 := d_1+1;
     END LOOP;
   ELSE
      FOR i IN j_1..num_t2.count LOOP
        num_t3(d_1) := num_t2(i);
        d_1 := d_1+1;
      END LOOP;
   END IF;
   dbms_output.put_line('num_t3:'); 
    FOR i IN 1..num_t3.count LOOP
     dbms_output.put_line(num_t3(i)||',');
   END LOOP;   
END;
  
  
  

相关内容

热门资讯

以军士兵集体丢掉武器抗命,大喊... 据凤凰卫视报道,以色列国防军一军事基地7月30日发生士兵抗命事件,约120名士兵抗议指挥官做法,将武...
蒋成华任商务部副部长 国务院任免国家工作人员。任命蒋成华为商务部副部长。免去蒋成华的商务部国际贸易谈判副代表职务。
伊朗驻华大使:在军事威胁下,不... 新华社北京7月31日电(记者刁慧琳) 伊朗驻华大使法兹里7月28日表示,伊美回到谈判桌的前提是美国必...
伊朗革命卫队在霍尔木兹海峡击中... 当地时间31日,伊朗伊斯兰革命卫队发布声明称,革命卫队海军当天在霍尔木兹海峡击中并扣留了两艘违反禁令...
美媒:特朗普,遇到了一个更强硬... 据《纽约时报》7月29日报道,就在特朗普总统看似放弃战事升级计划几天后,美国再次与伊朗交火。上周末,...
女子做气管镜时不幸身亡,丈夫称... 7月29日,西安刘先生反映妻子在当地医院做支气管镜检查时死亡,看监控时发现医生疑有违规操作。刘先生表...
全网“帮卖西瓜”,然后呢? 近日,河南部分地区西瓜滞销的消息在网上热度很高。很多地方也伸出援手:有景区收购千斤西瓜、免费赠予游客...
美媒:乌克兰袭击伊朗船只,险引... 据《纽约时报》7月28日报道,据伊朗和西方官员称,伊朗曾考虑攻击乌克兰的一个港口,以报复乌克兰对一艘...
20年里,他只画美女,用东方风... 迈进KIM在上海的工作室,迎面是一整墙的美女们。她们像是刚从一场时髦的沙龙里退场,或倚或立,眉宇间是...
Google在港推出AI代理G... 观点网讯:7月29日,Google在香港推出AI代理Gemini Spark,该代理可全天候在后台运...