rufergem
04.03.2021 19:26

Создайте целочисленный массив размерностью n. введите значения элементов массивов с клавиатуры. выполните циклический сдвиг значений элементов массива на k позиций вправо (в сторону увеличения индексов элементов). выведите на экран значения элементов массива после выполнения операции циклического сдвига. примечание. при циклическом сдвиге на одну позицию значение последнего элемента массива записывается в элемент с индексом 0.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
nataliarianna29
03.10.2020 00:14
Var
n,k,i,i2,zn,zn2:integer;
a:array[1..100] of integer;
Begin
Readln(n,k);
for i:=1 to n do Read(a[i]);
zn:=a[1];
for i2:=1 to k do begin
a[1]:=a[n];
for i:=2 to n+1 do 
if i<>n+1 then begin zn2:=a[i]; a[i]:=zn; zn:=zn2; end;
End;
for i:=1 to n do Write(a[i],' ');
End.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота