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

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

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

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 24.05.2011, 20:31   #1
nervniy
Пользователь
 
Регистрация: 13.05.2009
Сообщений: 52
По умолчанию Удаление буквы из текста

Есть такое задание
напечатать заданный текст с удалением из него всех букв b. непосредственно перед которыми находится буква c.
Текст записан в файл txt.результат тоже выводится в файл
Подскажите как это реализовать на Delphi?

Последний раз редактировалось nervniy; 24.05.2011 в 22:15.
nervniy вне форума Ответить с цитированием
Старый 24.05.2011, 21:44   #2
rrrFer
Санитар
Старожил
 
Аватар для rrrFer
 
Регистрация: 04.10.2008
Сообщений: 2,577
По умолчанию

У вас язык программирования не указан.
напишу на С++ за вознаграждение
ICQ 395-546-218
rrrFer вне форума Ответить с цитированием
Старый 24.05.2011, 23:26   #3
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,542
По умолчанию

1. читаем файл в строку s
Код:
r:=TstringList.create;
r.Loadfromfile(...);
s:=r.text;
2.ищем 'сь'
Цитата:
всех букв b. непосредственно перед которыми находится буква c.
и удаляем
Код:
k:=pos('сь',s);
while k>0 do begin
  Delete(s,k+1,1);
  k:=pos('сь',s);
end;
3. записываем в файл
Код:
r.Text:=s;
r.savetofile(...);
r.free;
программа — запись алгоритма на языке понятном транслятору

Последний раз редактировалось evg_m; 24.05.2011 в 23:29.
evg_m вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Удаление буквы или пробела в мемо по нажатию на кнопку. troyan32 Общие вопросы Delphi 7 07.02.2011 20:03
удаление текста из listview bulldog5293 Общие вопросы Delphi 1 13.08.2010 08:56
Паскаль. Удаление из слов предыдущие вхождения в него последней буквы. Svetik2252 Помощь студентам 6 11.12.2009 20:30
Удаление фрагмента текста Шурик Общие вопросы Delphi 0 31.05.2009 16:11
Дан текст из строчных латинских букв и других знаков. Вычеркнуть из текста все гласные буквы." XeRoX Помощь студентам 6 15.06.2008 09:41