Создайте целочисленный массив размерностью n. введите значения элементов массивов с клавиатуры. выполните циклический сдвиг значений элементов массива на k позиций вправо (в сторону увеличения индексов элементов). выведите на экран значения элементов массива после выполнения операции циклического сдвига. примечание. при циклическом сдвиге на одну позицию значение последнего элемента массива записывается в элемент с индексом 0.
Qwerty1246
1
10.07.2019 14:20
0
Другие вопросы по теме Информатика
creatorX
19.02.2021 11:16
kskvortsovak07
19.02.2021 11:14
Karbobo
19.02.2021 11:14
julka19981
03.03.2019 10:10
GALAXY356
03.03.2019 10:10
2839275
07.10.2019 11:20
Superstylegir
12.05.2020 23:20
fdods2
12.05.2020 23:20
Gudimnik1
12.05.2020 23:20
Популярные вопросы
- Какой тканью образованы сосуды и ситовидные трубки...
3 - Визначте формулу речовини яка є основним компонентом природного газу якщо до її...
3 - Стихотворение она сидела на полу тютчев. какие чувства лирической героини переданы...
1 - Доклад на тему война алой и белой розы надо !...
1 - 1) какова масса тела, если известно что скорость его движения 7м/с и импульс тела...
1 - Даны два числа а и b . получить их сумму , разность и произведение . написать...
3 - Какие 3 условия необходимо выполнить для создания волн?...
2 - Як було відновлено православну церкву?...
1 - Составьте предложение с однородными членами, предложение с обособленными членами,...
1 - Уяку геологічну еру було дніпровське зледеніння...
3
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.