Mostrar las letras invertidas de un vector

Algoritmo www_PSeint_Site
    Definir text como caracter; 
    Definir cont como numero;
    Definir vector como caracter;
    Dimension vector[1,6];
    Escribir "Ingrese texto de un máximo de 6 caracteres : ";
    Leer text;	
    Si Longitud(text) > 6 Entonces;		
        Escribir "Texto excede los 6 caracteres";	
    SiNo
        Para cont <- 0 Hasta 5 Con Paso 1 Hacer		
            vector(0,5-cont) <- SubCadena(text,cont,cont);
        FinPara
        Para cont <-0 Hasta 5 Con Paso 1 Hacer
            Escribir vector(0,cont);			
        FinPara			
    FinSi
FinAlgoritmo