Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Рейтинг: Рейтинг темы: голосов - 21, средняя оценка - 4.71
qwerty_123
0 / 0 / 0
Регистрация: 20.11.2012
Сообщений: 16
#1

Осуществить циклический сдвиг элементов массива влево \ вправо на одну позицию - Turbo Pascal

04.12.2012, 14:10. Просмотров 3234. Ответов 3

Дан массив размера N. Осуществить циклический сдвиг элементов массива влево1|вправо2 на одну позицию.

Добавлено через 43 секунды
Помогите пожайлуйста !!!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
04.12.2012, 14:10
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Осуществить циклический сдвиг элементов массива влево \ вправо на одну позицию (Turbo Pascal):

Осуществить циклический сдвиг элементов массива вправо на одну позицию - Turbo Pascal
ПОМОГИТЕ ПОЖАЛУЙСТА! Дан целочисленный массив. Осуществить циклический сдвиг элементов массива вправо на одну позицию.

Дан массив размера N, осуществить циклический сдвиг элементов массива вправо на одну позицию - Turbo Pascal
2) Дан массив размера N, осуществить циклический сдвиг элементов массива вправо на одну позицию.

Осуществить циклический сдвиг элементов массива влево, вправо на k позиций - Turbo Pascal
Дан массив размера N и число k (0 < k < 5, k < N). Осуществить циклический сдвиг элементов массива влево1|вправо2 на k позиций. ...

Осуществить сдвиг элементов массива влево на одну позицию - Turbo Pascal
Пожалуйста, помогите мне. Дан массив размера N.Осуществить сдвиг элементов маасива влево на одну позицию (при этом в An,An-1- в...

Осуществить сдвиг элементов массива вправо на одну позицию - Turbo Pascal
1) Дан массив размера N. Осуществить сдвиг элементов массива вправо на одну позицию. 2) Дана матрица размера а x б. Найти суммы...

Осуществить сдвиг элементов массива вправо на одну позицию - Turbo Pascal
Дан массив размера N. Осуществить сдвиг элементов массива вправо на одну позицию.

3
Reveng
420 / 420 / 89
Регистрация: 25.06.2012
Сообщений: 666
Завершенные тесты: 1
04.12.2012, 15:58 #2
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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
const
  nmax = 20;
 
var
  a: array[1..nmax] of integer;
  x: integer;
  i, n, key: integer;
  
begin
  Writeln('Направление сдвига (1 - влево, 2 - вправо): ');
  Readln(key);
  Repeat
    Write('Размер массива (не более ', nmax, '): ');
    Readln(n);
  until n in [1..nmax]; 
  Writeln('Введите n элементов массива');
  for i := 1 to n do
    begin
    Write('A[', i, '] = ');
    Readln(a[i]);
    end;
  case Key of
  1 :
    begin
    x := a[1];
    for i := 1 to n - 1 do a[i] := a[i + 1];
    a[n] := x;
    end;
  2 :
    begin   
    x := a[n];
    for i := n downto 2 do a[i] := a[i - 1];
    a[1] := x;
    end;
  end; 
  Writeln('После сдвига:');
  for i := 1 to n do
    Write(a[i], ' ');
end.
1
qwerty_123
0 / 0 / 0
Регистрация: 20.11.2012
Сообщений: 16
04.12.2012, 17:08  [ТС] #3
Спасибо большое

Добавлено через 1 минуту
Не поможете также здесь!? Плииз ))) Массив и здесь - Найти суммы элементов диагоналей матрицы, параллельных главной \ побочной
0
r4coon
0 / 0 / 0
Регистрация: 10.12.2017
Сообщений: 1
10.12.2017, 09:39 #4
кто может этот код переделать под C без []?
0
10.12.2017, 09:39
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.12.2017, 09:39
Привет! Вот еще темы с ответами:

Осуществить сдвиг элементов массива вправо на одну позицию - Turbo Pascal
1) Дан массив размера N. Осуществить сдвиг элементов массива вправо на одну позицию. 2) Дана матрица размера а x б. Найти суммы...

Осуществить циклический сдвиг элементов массива налево на одну позицию - Turbo Pascal
ООчень нужно((( 1. Дан массив размера N. Осуществить циклический сдвиг элементов массива налево на одну позицию. 2. Дана...

Осуществить циклический сдвиг элементов массива вправо на K позиций - Turbo Pascal
Дан массив A размера N и целое число K (1 ≤ K ≤ 4, K < N). Осуществить циклический сдвиг элементов массива вправо на K позиций (при этом A...

Осуществить циклический сдвиг элементов массива вправо на К позиций - Turbo Pascal
Дан массив размером N И исло К (0<k<5,k<n) осуществить циклический сдвиг элементов массива вправо на К позиций. помогите решить


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

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

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