千家信息网

oracle 冒泡

发表于:2024-09-22 作者:千家信息网编辑
千家信息网最后更新 2024年09月22日,DECLARETYPE num_tt IS TABLE OF INT;num_t num_tt:=num_tt();mid_val INT;BEGINnum_t.extend(20);FOR i IN
千家信息网最后更新 2024年09月22日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;


0