Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
FATNER

Сдвиг эл. одномерного массива на 1 поз.

31.01.2010, 19:17. Показов 933. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Помогите,напишите пожалуйста программу сдвига элементов (целочисленные) одномерного массива на 1 позицию.
т.е. наприм. до a[1]=5 a[2]=7 a[3]=8 a[4]=9
после a[2]=5 a[3]=7 a[4]=8 a[5]=9
и всё это в пределах одного массива без создания новых.
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
31.01.2010, 19:17
Ответы с готовыми решениями:

Сдвиг элементов одномерного массива
Пожалуйста помогите! я в си новичек! в общем моя задача: дан одномерный массив.сдвинуть элементы массива вправо на k позиций, а...

Сдвиг одномерного массива на k позиций
Дан массив целых чисел длиной n. Осуществить циклический сдвиг вправо на k позиций. Последние k элементов поставить на первое место. ...

Сдвиг элементов одномерного массива по условию
Есть функция, она считает количество нулевых элементов (counter) и удаляет его (нулевой элемент). Работает вроде бы правильно, но сдвиг...

3
Почетный модератор
 Аватар для Puporev
64315 / 47611 / 32743
Регистрация: 18.05.2008
Сообщений: 115,167
31.01.2010, 21:30
FATNER, Вы неудачно написали пример, лучше напишите словами куда сдвинуть массив, влево - первый станет последним, или вправо, последний станет первым.
0
57 / 20 / 3
Регистрация: 29.10.2009
Сообщений: 198
31.01.2010, 21:57
Судя по вашему примеру задача делается так:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
var m:array[1..100] of integer;
    i,n:integer;
begin
  write('Введите размерность массива:');
  readln(n);
  //Ввод массива
  for i:=1 to n do begin
    write('m[',i,']=');
    readln(m[i]);
  end;
  //Выполнение условия
  for i:=n+1 downto 2 do begin
     m[i]:=m[i-1];
  end;
  m[1]:=0;
  //Вывод массива
  for i:=1 to n+1 do write(m[i],' ');
end.
1
Retired
7727 / 2559 / 671
Регистрация: 17.10.2009
Сообщений: 5,100
31.01.2010, 22:15
Насколько я понял, то нужно было вот это
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
const
  N = 10;
var
  a: array [1..N] of integer;
  i, temp: integer;
begin
  for i := 1 to N do
  begin
    a[i] := random(8) - 4;
    Write(a[i],' ')
  end;
  WriteLn;
  temp := a[N];
  for i := N downto 2 do
    a[i] := a[i-1];
  a[1] := temp;
  for i := 1 to N do
    Write(a[i],' ');
  ReadLn
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
31.01.2010, 22:15
Помогаю со студенческими работами здесь

Циклический сдвиг элементов одномерного массива
доброго времени суток! помогите составить две функции одну для циклического сдвига элементов одномерного массива на К позиций, а вторую...

Циклический сдвиг одномерного массива на N шагов влево
Здравствуйте! Подскажите, пожалуйста, как построить циклический сдвиг одномерного массива на N шагов влево?

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

Циклический сдвиг элементов одномерного массива влево
Задача : Циклический сдвиг позиций влево. 2. Заполнить случайным образом одномерный массив из n элементов и сдвинуть элементы...

Циклический сдвиг влево элементов одномерного массива
2.Напишите процедуру, реализующую циклический сдвиг влево элементов одномерного массива на заданное количество позиций. В основной...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++
8Observer8 17.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip
Символические и жёсткие ссылки в Linux.
algri14 15.03.2026
Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru