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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 19.02.2014, 21:10   #1
Санко
Пользователь
 
Регистрация: 19.02.2014
Сообщений: 24
По умолчанию переписать исходный текст без запятых

Имеется некоторая последовательность символов. Образовать новую последовательность, включив в нее символы исходной, кроме запятых. (использовать склейку «+»)(не использовать pos, delete, copy…)
Санко вне форума Ответить с цитированием
Старый 19.02.2014, 21:54   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Код:
sNew := '';
for i:=1 to Length(sOld) do
  if sOld[i]<>',' then sNew := sNew + sOld[i];
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вставить исходный текст веб.станицы. Snekich Microsoft Office Excel 4 26.10.2012 07:28
нужен исходный текст игры Айрат090 Помощь студентам 0 04.12.2011 17:25
программа, которая считывает текст из файла и выводит на экран только предложения, не содержащие запятых shadowfiend C++ Builder 2 09.05.2011 21:48
Как прочесть исходный текст? Ruber Общие вопросы по Java, Java SE, Kotlin 0 05.06.2008 21:45