program asd;
var
a:array[1..100] of integer;
i,r,n,k,j:integer;
begin
read(n,k);
for i:=1 to n do
read(a[i]);
for i:=1 to k do
begin
for j:=1 to n do
if (j=1) then r:=a[j] else a[j-1]:=a[j];
a[n]:=r;
end;
for i:=1 to n do
write(a[i],' ');
readln
end.
Цитата:
2. Приведите свои попытки решения задачи и объясните, что конкретно вызывает затруднения
если мог бы привести свои попытки решения,не стал бы просить помощи!
Задание:
1.Набор текстовых примеров
2.Аналитический профиль, временная и объемная сложность