Реализуем циклический сдвиг
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var n:=11;
var a:=ArrRandom(n,-10,10); a.Println;
a:=a[n-1:]+a[:n-1]; a.Println
end.
Пример
9 6 9 -5 2 6 4 -4 2 1 1
1 9 6 9 -5 2 6 4 -4 2 1