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

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Василий01
1 / 1 / 0
Регистрация: 13.04.2012
Сообщений: 52
#1

Кольцевой сдвиг чисел влево - Turbo Pascal

23.05.2012, 13:26. Просмотров 444. Ответов 3
Метки нет (Все метки)

Допустим n=5
вывести на экран
12345
23451
34512
45123
51234

 Комментарий модератора 
Василий01, вы уже не новичок и должны были бы ознакомиться с правилами, в особенности
2.3 Создавайте темы с осмысленными и понятными названиями - это серьезно повышает шансы, что на ваш вопрос ответят.
3.3 Запрещено создавать темы с бессмысленными названиями вроде "Помогите!", "Вопрос" и т.п.
3.4 Запрещено размещать тему в нескольких разделах одновременно (кросспостинг), а также дублировать тему в одном разделе.
Больше предупреждений не будет.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
23.05.2012, 13:26
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Кольцевой сдвиг чисел влево (Turbo Pascal):

Сдвиг столбцов матрицы влево - Turbo Pascal
дана матрица которую вводит пользователь.Нужно подвинуть все столбцы влево на n раз Кто может помочь ?

Циклический сдвиг элементов массива влево - Turbo Pascal
нужно решить задание:элементы массива циклически сдвинуть на одну позицию влево: x_new=x, x_new=x при k=1, 2, ..., n-l только оформить...

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

Осуществить сдвиг элементов массива влево на K позиций - Turbo Pascal
Здравствуйте. За основу брал код многоуважаемого Puporev. Есть пара вопросов. program pr; uses crt; const nmax=100; var a:array of...

Произвести сдвиг элементов вектора A(n) на к позиций влево - Turbo Pascal
Произвести сдвиг элементов вектора A(n) на к позиций влево так, что на место a станет a, на место a станет a, на место a станет a, на место...

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

3
Puporev
Модератор
52833 / 40644 / 13893
Регистрация: 18.05.2008
Сообщений: 94,292
23.05.2012, 13:59 #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
uses crt;
const nmax=20;
var a:array[1..nmax,1..nmax] of integer;
    n,i,j:byte;
begin
clrscr;
repeat
write('Размер матрицы до ',nmax,' n=');
readln(n);
until n in [1..nmax];
writeln('Исходная матрица:');
for i:=1 to n do
 begin
  for j:=1 to n do
   begin
    if j<=n-i+1 then a[i,j]:=i+j-1
    else a[i,j]:=j+i-n-1;
    write(a[i,j]:4);
   end;
  writeln;
 end;
readln
end.
0
Василий01
1 / 1 / 0
Регистрация: 13.04.2012
Сообщений: 52
23.05.2012, 14:01  [ТС] #3
а можно её ришить прописывая много раз Writeln? а то твоё решение для меня сложновато, да и в пинципе не понятно
0
Puporev
Модератор
52833 / 40644 / 13893
Регистрация: 18.05.2008
Сообщений: 94,292
23.05.2012, 14:15 #4
Цитата Сообщение от Василий01 Посмотреть сообщение
а можно её ришить прописывая много раз Writeln?
Можно, пиши.
1
23.05.2012, 14:15
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.05.2012, 14:15
Привет! Вот еще темы с ответами:

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

Написать процедуру, выполняющую циклический сдвиг заданных параметров влево - Turbo Pascal
Описать процедуру ShiftLeft3(A, B, C), выполняющую левый циклический сдвиг: значение A переходит в C, значение C — в B, значение B — в A...

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

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


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

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

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