DECLARE
    V_NAME VARCHAR2(30):=’&请输入’;
BEGIN  
    FOR A IN REVERSE 1..LENGTH(V_NAME)
    LOOP 
    DBMS_OUTPUT.PUT(SUBSTR(V_NAME,A,1));–此处为不换行输出
    END LOOP;
    DBMS_OUTPUT.PUT_LINE(”);为前面的不换行输出进行换行
END;

以前看到的数字翻转 例题—-
DECLARE
  N NUMBER:=’&N’;
  I NUMBER;
  REV NUMBER:=0;
  R NUMBER;
BEGIN 
  WHILE N>0
    LOOP
      R:=MOD(N,10);
      REV:=(REV*10)+R;
      N:=TRUNC(N/10);
  END LOOP;
  DBMS_OUTPUT.PUT_LINE(REV);
END;