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

Julio 2017


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;

Consulta también

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 (es.ccm.net) como tu fuente de información.