Напишите программу для выполнения циклического сдвига массива вправо на 3 элемент.В PascalABC. Заранее благодарю.

// PascalABC.NET 3.3, сборка 1634 от 14.02.2018// Внимание! Если программа не работает, обновите версию!begin  var n:=ReadInteger('n=');  var a:=ArrRandom(n,-50,50); a.Println;  a:=(a[n-3:]+a[:n-3]).ToArray; a.Printlnend.Примерn= 151 -10 49 1 28 18 -44 -46 -23 36 36 -49 -46 -49 -21-46 -49 -21 1 -10 49 1 28 18 -44 -46 -23 36 36 -49