Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Алиса я
0 / 0 / 0
Регистрация: 05.10.2012
Сообщений: 7
#1

Сдвинуть циклически заданное слово на k букв - Turbo Pascal

08.10.2012, 19:23. Просмотров 384. Ответов 2
Метки нет (Все метки)

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


Сдвинуть циклически заданное слово на k букв (например, k=2, слово ПРОБА станет словом ОБАПР).
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
08.10.2012, 19:23
Я подобрал для вас темы с готовыми решениями и ответами на вопрос Сдвинуть циклически заданное слово на k букв (Turbo Pascal):

Переписать исходный файл, циклически сдвигая ключевое слово на k букв
Дан файл f1, ключевое слово a$ и число k. Переписать исходный файл, циклически...

Проверить, можно ли составить заданное слово из букв, расположенных в двумерном массиве
паскаль двумерный массив содержит некоторые буквы русского алфавита...

Сдвинуть массив циклически на один элемент влево
Дан массив целых чисел.Сдвинуть его циклически на один элемент влево

Сдвинуть циклически на две позиции влево элементы массива
Задан массив A(п ) из элементов целого типа. Элементы сдвинуть циклически на...

Элементы массива циклически сдвинуть на одну позицию влево
элементы массива циклически сдвинуть на одну позицию влево: An=A1,Ak=Ak+1, при...

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

2
NurlashKO
87 / 87 / 80
Регистрация: 07.10.2012
Сообщений: 145
08.10.2012, 19:30 #2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
var
    s :string;
    k :longint;
begin
    readln(s);
    readln(k);
    k := k mod length(s);
    writeln(copy(s, k + 1, length(s) - k) + copy(s, 1 , k));
end.
1
Алиса я
0 / 0 / 0
Регистрация: 05.10.2012
Сообщений: 7
08.10.2012, 19:31  [ТС] #3
Большое спасибо
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
08.10.2012, 19:31
Привет! Вот еще темы с решениями:

Циклически сдвинуть элементы одномерного массива на К позиций влево
1. Дан одномерный массив, который содержит не более 50 целых чисел. Циклически...

Все элементы массива циклически сдвинуть на k разрядов влево
Создать массив Х, заканчивающийся нулем (т.е. заранее не знаем, сколько чисел...

Сдвинуть элементы массива циклически на одну позицию влево
Задан массив С(10) из элементов вещественного типа. Сдвинуть элементы...

Проверить, можно ли из заданных букв составить заданное слово
Двумерный массив n*m содержит некоторые буквы русского алфавита, расположенные...


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

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

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