NombreBuscado = Consola.LeerEntradaUser("blablabla")

buleano = Funcion Eliminar (ArrayEntero Lista, ArrayString Nombre, String NombreBuscado, Entero Tope)
     Entero n=-1

     // buscar si existe: Nombrebuscado en la lista
     Bucle para k desde 0 hasta array.items-1
          Si Nombre(k) = NombreBuscado
               n = k
               Salir de este bucle //para continuar en el siguiente
          Fin si
     Siguiente
     // Si Existe, eliminar y bajar todos los elementos encima de él
     Si n >= 0 luego
          Bucle para k desde n hasta Lista.Items-2 // ojo -2, por si se hallara en el último puesto
               Lista(k) = Lista(k+1)
               Nombre(k) = nombre(k+1) 
          Siguiente
          // Borramos el último elemento (no es imprescindible).
          Lista(k) = ""
          Nombre(k)= ""
          //tope -= 1 Tope parece ser el punto final hasta el cual buscar, pero.. (comentado más abajo)
          return TRUE
     Fin si
Fin funcion

NombreBuscado = Consola.LeerEntradaUser("blablabla")
NombreRemplazo = Consola.LeerEntradaUser("blablabla")

buleano = Funcion Remplazar (ArrayEntero Lista, ArrayString Nombre, string NombreBuscado, String Nombreremplazo, entero TopeRemplazo)
     entero n=-1
     // buscar si existe: Nombrebuscado en la lista
     Bucle para k desde 0 hasta TopeRemplazo
          Si Nombre(k) = NombreBuscado
               n = k
               Salir de este bucle //para continuar en el siguiente
          Fin si
     Siguiente
     // Si Existe, eliminar y bajar todos los elementos encima de él
     Si n >= 0 luego
          Bucle para k desde n hasta TopeRemplazo-1 // si (n) se haya en el último puesto, no se ejecuta el bucle.
               Lista(k) = Lista(k+1)
               Nombre(k) = nombre(k+1) 
          Siguiente
          // el remplazo se coloca en el TopeRemplazo (último elemento donde se permitió buscar).
          //Lista(k) = "" <---- no queda claro que va aquí *
          Nombre(k)= NombreRemplazo
          return TRUE  //señala que el ítem localizado en 'n' fue remplazdo en 'ToopeRemplazo'
     Fin si
Fin funcion

// Busca un elemento Si existe devuelve el índice donde se localiza, si no , devuelve -1
Entero = Funcion Buscar(ArrayString Nombre, String NombreBuscado)
    Bucle para K desde 0 hasta Nombre.Items -1
        Si Nombre(k) = NombreBuscado luego Devolver K  //y salir de la función.
    Siguiente

    Devolver -1 //No encontrado
Fin Funcion

// Elimina un ítem del array (si existe dicho índice en el array).
Buleano = Funcion Eliminar(ArrayEntero Lista, ArrayString Nombre, Entero Indice )
     Si Indice < Lista.Items entonces
         Bucle para k desde Indice hasta Nombre.Items -1
             Nombre(k) = Nombre(k + 1)
             Lista(k) = Lista(k + 1)
         Fin bucle
         Nombre(k) = ""
         Lista(k) = 0 
         Devolver TRUE
     Fin si
Fin Funcion


// Remplaza un ítem del array (si existe dicho índice en el array).
Buleano = Funcion Remplazar(ArrayEntero Lista, ArrayString Nombre, Entero Indice, String Remplazo, entero Valor )
     Si Indice < Lista.Items entonces
         Nombre(Indice) = Remplazo
         Lista(Indice) = Valor
       
         Devolver TRUE
     Fin si
Fin Funcion

buleano TodoValidado = true
Por cada campo en camposValidables del formulario
     String Texto = Campo.Texto
     
     Si Validar(Campo, Texto) = TRUE luego
        Campo.texto = texto
     Si no
        TodoValidado = FALSE
        Salir del bucle // fue cancelado...
     Fin si
Fin por cada

Si TodoValidado = TRUE
   // Siguiente paso, que debas hacer en este caso
Si no
   // lo que debas hacer si se canceló.
Fin si

Buleano = Funcion Validar(control Ctl, String Texto)
    CtlOculto.MoveAndSize(ctl.Left, ctl.Top, ctl.Width, ctl.Height)
    
    //primero se valida el texto original, solo si falla aparecerá el trabajo del control oculto.
    Mientras ValidarP(Texto) = FALSE 
        Mensaje de error: "el texto introducido no es válido, corrijalo y luego pulse intro (validar) o   ESC (cancelar) 
        CtlOculto.Texto = Texto
        Ctl.Visible = TRUE
        Ctl.SetFocoModal // se da oportunidad al usuario de cambiar el texto y al pulsar intro o Escape  regresa aqui (= MODAL, el código queda a la espera hasta que se cierre el objeto llamado, básicamente podría ser un formulario, si no es modal el código continuará tras la llamada previa y eso no interesa)
            
        // Si se pulsó intro, se debió cerrar el ctlOculto y volver a ser validado su texto.
        Si Tecla = Escape luego
            ctlOculto.Visible = FALSE  //Si el ctlOculto es formulario o está dentro de un formulario, esto no sería necesario, se habrá cerrado el formulario Modal...
            Devolver FALSE // se sale de la función desde aquí
        Fin si 
    Repetir 
    Texto = ctlOculto.Texto
    ctlOculto.Visible = FALSE //Si el ctlOculto es formulario o está dentro de un formulario, esto no sería necesario, se habrá cerrado el formulario Modal...
    Devolver TRUE 
Fin Funcion

Buleano = ValidarT(Texto) //T de Texto...
    // validación del texto, lo que tu hagas para validarlo
    // Devuelve TRUE si es válido y FALSE si no lo es
Fin Funcion