Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Rinse
0 / 0 / 2
Регистрация: 05.11.2012
Сообщений: 14
#1

Матрица! Циклический сдвиг

18.12.2012, 21:04. Просмотров 893. Ответов 2
Метки нет (Все метки)

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

Добавлено через 25 минут
вот блин, целыый форум программистов, и никто не может помочь
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
18.12.2012, 21:04
Ответы с готовыми решениями:

Циклический сдвиг
Очень распространенная задача, если кто-то знает, как решить, помогите,...

Циклический сдвиг
Осуществите циклический сдвиг компонент заданного вектора A(N) вправо на две...

Циклический сдвиг
Произвести циклический сдвиг текста вправо на одно слово.

циклический сдвиг элементов
вводится количество элементов, затем сами элементы, затем целое число,...

Циклический сдвиг массива вправо
выполнить циклический сдвиг двумерного массива вправо

2
HighPredator
5679 / 1998 / 721
Регистрация: 10.12.2010
Сообщений: 5,751
Записей в блоге: 3
18.12.2012, 21:41 #2
Лучший ответ Сообщение было отмечено Rinse как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
const
  M=5;
  N=6;
 
var
  a:array[1..M,1..N] of integer;
 
procedure DownShift(PosCount:integer);
var
  i,j,k,temp:integer;
begin
  for k:=1 to PosCount do
  begin
    for j:=1 to N do
    begin
      temp:=a[M,j];
      for i:=M downto 2 do a[i,j]:=a[i-1,j];
      a[1,j]:=temp;
    end;
  end;
end;
Цитата Сообщение от Rinse Посмотреть сообщение
вот блин, целыый форум программистов, и никто не может помочь
Так и вы тут не один находитесь. И кстати, между "помочь" и "сделать за" огромная разница.
0
Rinse
0 / 0 / 2
Регистрация: 05.11.2012
Сообщений: 14
18.12.2012, 21:56  [ТС] #3
Цитата Сообщение от HighPredator Посмотреть сообщение
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
const
  M=5;
  N=6;
 
var
  a:array[1..M,1..N] of integer;
 
procedure DownShift(PosCount:integer);
var
  i,j,k,temp:integer;
begin
  for k:=1 to PosCount do
  begin
    for j:=1 to N do
    begin
      temp:=a[M,j];
      for i:=M downto 2 do a[i,j]:=a[i-1,j];
      a[1,j]:=temp;
    end;
  end;
end;
Так и вы тут не один находитесь. И кстати, между "помочь" и "сделать за" огромная разница.




не до оценил, спасибо
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.12.2012, 21:56

Осуществить циклический сдвиг элементов
Осуществить циклический сдвиг элементов прямоугольной матрицы на n элементов...

циклический сдвиг столбцов матрицы
Напрмер 1 2 3 1 2 3 1 2 3 Ввожу -2, двигает столбцы на 2 влево, 2 двигает...

Осуществить циклический сдвиг массива
3. Составить и выполнить программу, которая с помощью подпрограммы-функции,...


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

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

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