Question

Дан линейный массив на N элементов. Выполнить циклический сдвиг всех его элементов на один вправо. (Последний элемент в таком случае перемещается на начало массива) Запрещенные служебные слова Array/ Даю 39 балов пожалуйста помогите

Answer 1

Const n=10;
var a:array[1..n] of integer;
i,c:integer;
begin
Randomize;
for i:=1 to n do begin
 a[i]:=random(51);
 write(a[i],' ');
 end;
writeln;
c:=a[n];
for i:=n downto 2 do a[i]:=a[i-1];
a[1]:=c;
for i:=1 to n do write(a[i],' ');
writeln;
end.

Пример:
8 2 24 20 27 44 25 41 16 21 
21 8 2 24 20 27 44 25 41 16 

Answer 2

Для выполнения циклического сдвига всех элементов линейного массива на один вправо можно использовать промежуточную переменную для хранения последнего элемента и последовательно переставлять элементы массива на одну позицию вправо, начиная с последнего элемента и заканчивая первым.

Вот пример кода на языке Python:

pythonCopy code
# Исходный массив
arr = [1, 2, 3, 4, 5]

# Сохраняем последний элемент массива
last_element = arr[-1]

# Переставляем элементы массива на одну позицию вправо
for i in range(len(arr)-1, 0, -1):
    arr[i] = arr[i-1]

# Перемещаем последний элемент на первую позицию массива
arr[0] = last_element

# Выводим измененный массив
print(arr)

Результат выполнения данного кода будет следующим:

csharpCopy code
[5, 1, 2, 3, 4]

Таким образом, все элементы массива были циклически сдвинуты на одну позицию вправо.