Вопрос по информатике:
Создайте целочисленный массив размерностью N. Введите значения элементов массивов с клавиатуры. Выполните циклический сдвиг значений элементов массива на k позиций вправо (в сторону увеличения индексов элементов). Выведите на экран значения элементов массива после выполнения операции циклического сдвига.
Примечание. При циклическом сдвиге на одну позицию значение последнего элемента массива записывается в элемент с индексом 0.
- 25.10.2017 22:04
- Информатика
- remove_red_eye 11346
- thumb_up 23
Ответы и объяснения 1
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 in+1 then begin zn2:=a[i]; a[i]:=zn; zn:=zn2; end;
End;
for i:=1 to n do Write(a[i],' ');
End.
- 27.10.2017 00:33
- thumb_up 44
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.