Циклические перестановки в одномерных массивах - Pascal ABC

  1. Ввести одномерный массив А , в котором число элементов кратно К , вывести его. Разбить массив на К равных частей, внутри каждой из областей осуществить циклический сдвиг элементов влево.


textual

Код к задаче: «Циклические перестановки в одномерных массивах - Pascal ABC»

var a:array[1..100] of integer;
    n,k,i,j,x:integer;
begin
randomize;
repeat
write('Введите натураьное число от 2 до 10 k=');
readln(k);
until k in [2..10];
repeat
write('Введите размер массива, натуральное число меньше 101, кратное ',k);
readln(n);
until (n in [2..100])and(n mod k=0);
writeln('Исходный массив');
for i:=1 to n do
 begin
  a[i]:=random(100);
  write(a[i]:4);
 end;
writeln;
for i:=1 to k do
 begin
  x:=a[(i-1)*k+1];
  for j:=(i-1)*k+1 to k*i-1 do
  a[j]:=a[j+1];
  a[k*i]:=x;
 end;
writeln('Сдвиги');
for i:=1 to n do
write(a[i]:4);
end.

СДЕЛАЙТЕ РЕПОСТ

11   голосов, оценка 3.818 из 5



Похожие ответы
  1. Помогите пожалуйста решить эту задачу, код есть, но его не пропускает проверка сайта.Требуется вычислить степень заданной перестановки. Перестановкой из N элементов называется упорядоченный набор из N различных чисел от 1 до N. Количество различных перестановок порядка N равно PN = N! Пусть у нас есть упорядоченное множество из N элементов. Перестановка задает преобразование этого множества. А именно, она говорит, что на i место нужно поставить ai элемент множества, где ai - i-тый элемент перестановки. Обратной перестановкой к перестановке π называется такая перестановка π-1, что ππ-1 = π-1π = ε, где ε – тождественная перестановка. Степенью перестановки называется минимальное натуральное число k такое, что πk = εВходные данные В первой строке входного файла записано число 0 < N <= 100 - порядок перестановки. Во второй строке записана сама перестановка.Добавлено через 18 часов 33 минуты

  1. Составить программу циклической перестановки элементов одномерного массива a [n], при которой1 i-ый элемент становится i+1-м, а последний элемент становится первым. Мне нужно решить эту задачу двумя способами,помогите пожалуйста.

  1. Составить программу перестановки значений переменных a, b, c в порядке возрастания, т.е чтобы а

  1. Напишите вариант метода пузырька,который заканчивает работу,если на очередном шаге внешнего цикла не было перестановки....

  1. Путем перестановки элементов квадратной вещественной матрицы добиться того, чтобы ее максимальный элемент находился в левом верхнем углу, следующий по величине — в позиции (2, 2) , следующий по величине — в позиции (3, 3) и т. д., заполнив таким образом всю главную диагональ. Найти номер первой из строк, не содержащих ни одного положительного элемента.

  1. опровергните с помощью программы выражение "от перестановки слагаемых сумма не меняеться" зарание спасибо

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

  1. Как написать процедуру такой перестановки элементов очереди: х(1), х(2),..., х(n)⇒x(2),x(3),…,x(n),х(1)?

  1. Здравствуйте, помогите написать работу. Дано N различных натуральных чисел. Напечатать все перестановки этих чисел.