パスカル言語 - 要素の配列を回転させる（回転） - 再帰

これは、配列のすべての要素を位置pから右にシフトすることを可能にする再帰的な手続きです。

 手続きシフト（Var t：Tab; p、n：整数）; p <= nの場合に開始し、次にデカラー（t、p + 1、n）を開始します。 ｔ ［ｐ ＋ １］：＝ ｔ ［ｐ］； 終わり; 終わり; 

このヒントを提供してくれたZouari Lazharに感謝します。