数字左右翻转

最新推荐文章于 2022-04-01 11:19:22 发布

A狼行天下A

最新推荐文章于 2022-04-01 11:19:22 发布

阅读量1.6k

点赞数 1

分类专栏： Oracle

本文链接：https://blog.csdn.net/zjt921586518/article/details/38983509

版权

Oracle 专栏收录该内容

29 篇文章 0 订阅

订阅专栏

编写一个程序，输入一个整数，使用循环结构将该数字左右翻转，输出翻转后的结果。例如，输入“12”，输出“21”，输入“123”，输出“321”……

DECLARE
   TYPE c_array IS VARRAY(10) OF NUMBER; 
   v_array      c_array;
   v_number     VARCHAR2(50);
   v_length       NUMBER;
   v_number_1   VARCHAR2(50) := NULL;
BEGIN 
   v_number := &v_number;
   SELECT SUBSTR(v_number,ROWNUM,1) BULK COLLECT     INTO v_array
     FROM dual
  CONNECT BY ROWNUM <= LENGTH(v_number);
   v_length := v_array.count;
   FOR i IN 1..v_array.count LOOP
      v_number := v_array(v_length - i + 1);
      --dbms_output.put_line(v_number_2);
      v_number_1 := v_number_1 || v_number;
   END LOOP;
   dbms_output.put_line(v_number_1);
END;