Написать функцию, которая циклически сдвигает одномерный массив вправо или влево на указанное число позиций. Сдвиг также должен быть кольцевым, то есть те элементы, которые уходят вправо или влево за пределы массива, должны помещаться с другого его конца. *любая попытка списывание карается баном!

1) подчеркивание ошибок, подчеркивание грамматики, ручная проверка ошибок и грамматики, управления словарем, изменение языка, установка новых словарей, отключение проверка орфографии, автокоррекция.

2)добавление словаря, правописание, автозамена,

3)Автозамена-ищет часто встречающиеся ошибки набора и правописания в вашем документе и автоматически исправляет их, как только они появляются. К примеру, вы можете указать, что слово венигрет всегда нужно заменять на винегрет.

Автотекст-позволяет определить и сохранить часто используемые текстовые блоки и/или графические объекты и вставлять их в документ по мере надобности. Например, вы можете указать в качестве элемента автотекста свое полное имя и адрес и вставлять его в документ с всего лишь нескольких клавиш.

Var
    a: array [,] of integer;

begin
    var n := ReadlnInteger('n = ');
    var m := ReadlnInteger('m = ');
    var rand := ReadlnInteger('Для ручного ввода нажмите 0');
    
    if rand = 0 then begin
        a := new integer[m, n];
        for var i := 0 to m-1 do
            for var j := 0 to n-1 do
                a[i, j] := ReadlnInteger('a[' + i + ',' + j + '] = ');
    end
    else a := MatrixRandom(m, n, 1, 100);
    Println(a);
    
    var b := ArrGen(n, x -> 1);
    for var i := 0 to m-1 do
        for var j := 0 to n-1 do
            if j mod 2 = 0 then
                b[j] := b[j] * a[i, j];
    
    b.Where((x, i)-> i mod 2 = 0).SortedDescending().Println();
end.