Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль
Регистрация

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


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 11.12.2015, 15:15   #1
Flocky
Пользователь
 
Регистрация: 11.01.2013
Сообщений: 17
Репутация: 10
По умолчанию Как поменять местами первый и последний символ в Паскаль

Дана строка символов.
Группы символов, разделенные одним или несколькими пробелами и не содержащие пробелов внутри себя, будем называть словами.
В каждом нечетном по порядку слове поменять местами первый и последний символы.
Flocky вне форума   Ответить с цитированием
Старый 11.12.2015, 15:57   #2
Stilet
Белик Виталий :)
Профессионал
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Адрес: Украина, Донецкая область, г. Краматорск
Сообщений: 57,815
Репутация: 6850
По умолчанию

И как всегда я рекомендую следующий метод разведения строки на массив слов: http://www.programmersforum.ru/showt...369#post398369
__________________
I'm learning to live...
Stilet вне форума   Ответить с цитированием
Старый 11.12.2015, 16:24   #3
Flocky
Пользователь
 
Регистрация: 11.01.2013
Сообщений: 17
Репутация: 10
По умолчанию

Даже мыслей нет как это сделать..
Flocky вне форума   Ответить с цитированием
Старый 11.12.2015, 16:37   #4
Аватар
Модератор
Заслуженный модератор
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Адрес: Северодонецк.ua
Сообщений: 18,873
Репутация: 6688
По умолчанию

Цитата:
Даже мыслей нет как это сделать..
Это лечится. Пиши в разделе фриланс и указывай сумму, которую платишь за выполненную работу
__________________
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума   Ответить с цитированием
Старый 11.12.2015, 16:53   #5
Aleksandr H.
2 the Nation Glory
Профессионал
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Адрес: Wild West Ukraine
Сообщений: 2,665
Репутация: 1096
По умолчанию

Код:
uses crt;
var s:string; a:array[1..100] of string;
  i,count:integer;c:char;
begin
 clrscr;
 s:='Hello my world';
 count:=1;
 i:=1;
 while (i<=length(s)) do begin
   if s[i]=' ' then begin inc(count);inc(i);end;
   a[count]:=a[count]+s[i];
   if odd(i) then
    begin
      c:=a[i][1];
      a[i][1] := a[i][length(a[i])];
      a[i][length(a[i])]:= c;
    end
   inc(i);
 end;
end.
__________________
Mailto: media.project@ukr.net
Aleksandr H. вне форума   Ответить с цитированием
Старый 11.12.2015, 17:59   #6
Flocky
Пользователь
 
Регистрация: 11.01.2013
Сообщений: 17
Репутация: 10
По умолчанию

Program1.pas(14) : Ошибка времени выполнения: Индекс находился вне границ массива.
14 строка
Flocky вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Поменять местами первый и последний столбец admokep C++ Builder 4 12.01.2015 17:25
Turbo Pascal. В каждом нечетном по порядку слове поменять местами первый и последний символы cdc Помощь студентам 0 08.11.2012 14:21
Матрица размерностью NxM заполняется случайными числами. Поменять местами первый и последний элементы каждого столбца. (Delphi) ganster Помощь студентам 0 02.07.2012 21:46
Поменять в двумерном массиве местами первый и последний столбец }|{eka Паскаль 6 21.06.2012 20:19
Pascal.поменять местами первый и последний символ в последнем слове Kris92 Помощь студентам 5 07.07.2010 14:00


10:22.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.