Imprimir un patron

[jpaulxD]

Hola a todos necesito crear un procedimiento que realize lo siguiente

Código SQL:

SQL>EXECUTE EJEMPLO(4);
1111
333
22
4
 

He intentado esto hasta ahora:

Código SQL:

SQL>CREATE OR REPLACE PROCEDURE EJEMPLO(N IN NUMBER)
AS
P VARCHAR(50);
BEGIN
FOR X IN REVERSE 1..N LOOP
P:=' ';
FOR B IN REVERSE 1..X LOOP
P:=P|| TO_CHAR(X);
END LOOP;
DBMS_OUTPUT.PUT_LINE(P);
END LOOP;
END;
/
 

Con eso solo obtengo este resultado

Código SQL:

SQL>EXECUTE EJEMPLO(4);
4444
333
22
1
 

No hallo la forma de comenzar imprimiendo varios 1 al inicio y que luego le siga el 2 y 3 respectivamente...