Desplazar los elementos de una matriz (Rotación) – Recursividad


A continuación un procedimiento recursivo que permite desplazar una posición a la derecha todos los elementos de una matriz a partir de la posición p.

Procedure Desplazar (Var t : Tab; p, n : integer);
Begin
     If p <= n Then
     Begin
          Desplazar (t, p + 1, n);
          t[p + 1] := t[p];
     End;
End;

Publicado por Carlos-vialfa. Última actualización: 17 de noviembre de 2009 a las 16:29 por Carlos-vialfa.
El documento «Desplazar los elementos de una matriz (Rotación) – Recursividad» se encuentra disponible bajo una licencia Creative Commons. Puedes copiarlo o modificarlo libremente. No olvides citar a CCM (https://es.ccm.net/) como tu fuente de información.
Ordenamiento Shell – Recursividad
El Ordenamiento de Burbuja – Recursividad