पास्कल भाषा - तत्वों की शिफ्ट सरणी (रोटेशन) -Recursion

यहां एक पुनरावर्ती प्रक्रिया है जो किसी सरणी के सभी तत्वों को स्थिति p से दाईं ओर स्थानांतरित करने की अनुमति देती है।
प्रक्रिया पारी (वार टी: टैब; पी; एन: पूर्णांक); आरंभ करें यदि p <= n फिर प्रारंभ करें Decaler (t, p + 1, n); t [p + 1]: = t [p]; समाप्त; समाप्त;
इस टिप के लिए ज़ौरी लाज़र को धन्यवाद।