Pascal Language - сдвиг массива элементов (вращение) -рекурсия

Вот рекурсивная процедура, которая позволяет сместить все элементы массива вправо от позиции p .

 Процедура Shift (Var t: Tab; p, n: целое число); Begin, если p <= n, тогда Begin Decaler (t, p + 1, n); t [p + 1]: = t [p]; Конец; Конец; 

Спасибо Zouari Lazhar за этот совет.

Предыдущая статья Следующая статья

Лучшие советы