Oracle - introduccion de datos interactiva

/*-quiero introducir 5 cadenas de caracteres en un código plsql, para ordenarlas en un array. Utilizo el siguiente código, pero me repite la misma cadena porque sólo me la pide una vez. ¿como se soluciona, si es que se puede?*/

declare
cadena varchar2(20);
cadaux varchar2(20);
type tcadenas is table of varchar2(20) index by binary_integer;
cadenas tcadenas;
cont number;

begin
cont:=&contador;
for i in 1..cont loop
cadena :='&cadena';
cadenas(i):=cadena;
end loop;
for j in 1..cont-1 loop -- ORDENACIÓN DE LAS CADENAS
for k in j+1..cont loop
if cadenas(j) > cadenas(k) then
cadaux:= cadenas(j); cadenas(j):=cadenas(k); cadenas(k):=cadaux;
end if;
end loop;
end loop;
for i in 1..cont loop dbms_output.put_line (cadenas(i)); end loop; -- VER CADENAS
end;