Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
Точилка-Маня
1 / 1 / 0
Регистрация: 28.02.2011
Сообщений: 20
1

Сдвиг на 4 элемента

13.04.2011, 14:56. Просмотров 672. Ответов 10
Метки нет (Все метки)

Заполнить массив из 12 элементов случайными числами в интервале [12..12] и выполнить циклический сдвиг вправо на 4 элемента.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.04.2011, 14:56
Ответы с готовыми решениями:

Выполнить циклический сдвиг массива вправо на 4 элемента
Пожалуйста, помогите решить вот эту задачу. Заполнить массив из 12 элементов...

Выполнить циклический сдвиг массива влево без первого элемента
Пожалуйста, помогите решить вот эту задачу. Заполнить массив из 10 элементов...

Выполнить циклический сдвиг всех элементов массива на один вправо начиная с первого нулевого элемента
Дан линейный массив на N элементов. Выполнить циклический сдвиг всех его...

Дан линейный массив на N элементов. Выполнить циклический сдвиг всех его элементов на два элемента влево. Вход
Дан линейный массив на N элементов. Выполнить циклический сдвиг всех его...

Выполнить циклический сдвиг всех элементов массива на один вправо начиная с последнего нулевого элемента
Дан линейный массив на N элементов. Выполнить циклический сдвиг всех его...

10
Puporev
Модератор
54717 / 42123 / 29086
Регистрация: 18.05.2008
Сообщений: 99,430
13.04.2011, 15:15 2
Стандартные операции с массивами (матрицами)
0
Точилка-Маня
1 / 1 / 0
Регистрация: 28.02.2011
Сообщений: 20
13.04.2011, 15:38  [ТС] 3
я не поняла как это впихнуть в массив который сам составляется
0
Puporev
Модератор
54717 / 42123 / 29086
Регистрация: 18.05.2008
Сообщений: 99,430
13.04.2011, 15:41 4
А какая разница как введен массив? Алгоритм сдвига от этого никак не меняется.
Если и массив ввести толку нет, читайте здесь.
Описание, объявление и заполнение массивов (матриц)
0
Точилка-Маня
1 / 1 / 0
Регистрация: 28.02.2011
Сообщений: 20
13.04.2011, 15:41  [ТС] 5
я составила программу по описаниям данным в стандартных операциях.
в итоге ничего не произошло
0
Puporev
Модератор
54717 / 42123 / 29086
Регистрация: 18.05.2008
Сообщений: 99,430
13.04.2011, 15:43 6
Покажите код.
0
Точилка-Маня
1 / 1 / 0
Регистрация: 28.02.2011
Сообщений: 20
13.04.2011, 15:44  [ТС] 7
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
program qq;
const N=12;
var a:array[1..12] of integer;
i,m,k,c,h:integer;
begin
read(h);
writeln('Исходный массив:');
for i:=1 to n do begin
a[i]:=random(21)-10;
write(a[i]:4);
end;
for i:=1 to h do begin
for c:=k downto 1 do
if (c=k) then m:=a[k] else a[c+1]:=a[c];
a[1]:=c;
end;
writeln;
writeln('Полученный массив:');
for i:=1 to N do
write(a[i]:4);
readln
end.
0
Puporev
Модератор
54717 / 42123 / 29086
Регистрация: 18.05.2008
Сообщений: 99,430
13.04.2011, 15:54 8
Вместо того чтобы чуть подумать, содрала первое на чем глаз упал и все...
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
program qq;
uses crt;
const N=12;
var a:array[1..n] of integer;
    i,j,c:integer;
begin
writeln('Исходный массив:');
for i:=1 to n do
 begin
  a[i]:=random(25)-12;
  write(a[i]:4);
 end;
for j:=1 to 4 do
 begin
  c:=a[1];
  for i:=1 to n-1 do a[i]:=a[i+1];
  a[n]:=c;
 end;
writeln;
writeln('Полученный массив:');
for i:=1 to N do
write(a[i]:4);
readln
end.
0
Точилка-Маня
1 / 1 / 0
Регистрация: 28.02.2011
Сообщений: 20
13.04.2011, 16:01  [ТС] 9
и все же он сдвинулся влево
0
Puporev
Модератор
54717 / 42123 / 29086
Регистрация: 18.05.2008
Сообщений: 99,430
13.04.2011, 16:55 10
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
program qq;
uses crt;
const N=12;
var a:array[1..n] of integer;
    i,j,c:integer;
begin
writeln('Исходный массив:');
for i:=1 to n do
 begin
  a[i]:=random(25)-12;
  write(a[i]:4);
 end;
for j:=1 to 4 do
 begin
  c:=a[n];
  for i:=n downto 2 do a[i]:=a[i-1];
  a[1]:=c;
 end;
writeln;
writeln('Полученный массив:');
for i:=1 to N do
write(a[i]:4);
readln
end.
1
Точилка-Маня
1 / 1 / 0
Регистрация: 28.02.2011
Сообщений: 20
13.04.2011, 19:09  [ТС] 11
премного благодарна)
0
13.04.2011, 19:09
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.04.2011, 19:09

номера минимального элемента массива и элемента, являющегося минимальным без учета этого элемента
11.109. Дан массив. Определить: а) максимальный элемент массива и элемент,...

Инвертировать часть массива с первого элемента до самого правого минимального элемента
Доброго времени суток, прошу помощи у вас уважаемые пользователи. По...

Найти среднее арифметическое до минимального элемента и после максимального элемента массива
Дан массив F(11). найти среднее арифметическое до минимального элемента и после...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru