Deslocar os elementos de uma tabela (Rotação) - Recursão
Veja um procedimento recursivo para deslocar todos os elementos de uma tabela, de uma posição à direita, para uma posição p.
Procedimento Deslocar (Var t : Tab; p, n : integer);
Begin
If p <= n Then
Begin
Decaler (t, p + 1, n);
t[p + 1] := t[p];
End;
End;
Veja também
- Deslocar os elementos de uma tabela (Rotação) - Recursão
- Elementos little alchemy - Dicas -Videogames
- Para que serve a ferramenta "desenhar tabela"? - Dicas -Word
- Código ascii tabela - Dicas - Codificação
- Rotação de tela iphone - Dicas -iPhone
- Tabela unicode - Dicas -Criptografia
Este documento, intitulado 'Deslocar os elementos de uma tabela (Rotação) - Recursão', está disponível sob a licença Creative Commons. Você pode copiar e/ou modificar o conteúdo desta página com base nas condições estipuladas pela licença. Não se esqueça de creditar o CCM (br.ccm.net) ao utilizar este artigo.
Assine nossa newsletter!
