Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 18.02.2020, 13:02   #1
Soratik
Новичок
Джуниор
 
Регистрация: 18.02.2020
Сообщений: 2
Вопрос Перестановка символов в стринг Pascal Delphi

Нужно переставить первую букву слова в конец слова, в результате должно получиться как-то так:
London is the capital of Great Britain
Эта строка должна поменяться на
LondonL isi thet capitalc ofo GreatG BritainB

Старался сам написать что-то такое:

Код:
char bukv;
for (int i = 1; i<=text2.Length();i++) {
if(text2[i]==' ') bukv=text2[i+1];
 
for (int j = i+1; j<=text2.Length();j++) {
if (text2[j]==' ') text2[j]=bukv;
}  }
Но работает совсем не так как нужно
Помогите глупому студентику устранить проблему
Soratik вне форума Ответить с цитированием
Старый 18.02.2020, 14:24   #2
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

подпили под себя
Код:
program HelloWorld;
    var s : string;
    i,j: integer;
    c  : string;
begin
    s := 'London is the capital of Great Britain';
    j := length(s);
    i:=1;
    while i <= j do
    
    begin
        if i = 1 then c := s[1];
        if (s[i] = ' ') and (c <> ' ') then 
            begin Insert(c,s,i); c:=' '; inc(i); end
        else if ((s[i] <> ' ') and (c = ' ')) then 
            c := s[i];
        j := length(s);
        inc(i);
    end;
    writeln(s);
end.
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Строки столбцы в стринг гриде Delphi SEXTANT Помощь студентам 0 13.12.2016 22:15
Циклическая перестановка символов в строке lomon Общие вопросы по Java, Java SE, Kotlin 0 24.09.2015 21:26
Паскаль. Перестановка символов. Versifikator Помощь студентам 4 06.12.2014 19:26
Перестановка символов в обратном порядке. Zeronim Помощь студентам 2 28.06.2010 14:05
перестановка символов Бардак Общие вопросы C/C++ 2 15.03.2010 15:04