![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Регистрация: 25.09.2008
Сообщений: 4
|
![]()
Дана строка. Преобразовать ее, удалив каждый символ * и повторить каждый символ, отличный от *.
Помогите плиз, а то я что-то в ехать не могу ![]() |
![]() |
![]() |
![]() |
#2 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
![]()
Идешь по строке с конца.
for i:= length(s) to 1 do и, если символ не * вставляешь такой же, если звздочка, удаляешь. if s[i]<>'*' then insert(s[i],s,i) else if s[i]='*' then delete(s,i,1); Про смысл этих двух процедур прочитай в Хэлпе Паскаля или в учебнике. |
![]() |
![]() |
![]() |
#3 |
delphi-ст!
Форумчанин
Регистрация: 02.01.2009
Сообщений: 825
|
![]() Код:
вступлю в команду разработчиков ПО на Delphi
|
![]() |
![]() |
![]() |
#4 | |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
![]() Цитата:
|
|
![]() |
![]() |
![]() |
#5 |
delphi-ст!
Форумчанин
Регистрация: 02.01.2009
Сообщений: 825
|
![]()
вступлю в команду разработчиков ПО на Delphi
|
![]() |
![]() |
![]() |
#6 |
Участник клуба
Регистрация: 10.11.2008
Сообщений: 1,502
|
![]()
может быть
Код:
Нормальное состояние техники - нерабочее, все остальное частный случай.
|
![]() |
![]() |
![]() |
#7 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
![]()
Именно это я имел ввиду. Извините.
|
![]() |
![]() |
![]() |
#8 | |
только учусь!
Форумчанин
Регистрация: 08.02.2009
Сообщений: 124
|
![]() Цитата:
«Я знаю, что ничего не знаю, но многие не знают и этого».
|
|
![]() |
![]() |
![]() |
#9 |
Регистрация: 25.09.2008
Сообщений: 4
|
![]()
Спасибо большое :D Надо же на такой ерунде сломался
![]() |
![]() |
![]() |
![]() |
#10 |
Забанен
Форумчанин Подтвердите свой е-майл
Регистрация: 01.11.2006
Сообщений: 420
|
![]()
функцию pos знаете?
Код:
Если ничто другое не помогает, прочтите, наконец, инструкцию! Аксиома Кана
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Нахождение серий символов в строке | ampolez | Общие вопросы C/C++ | 2 | 19.12.2008 22:20 |
Количество символов в строке | Ivan357 | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 09.12.2008 17:06 |
Вывод символов в строке | Karl_Karlovi4 | БД в Delphi | 12 | 03.06.2008 13:31 |
кол-во букв в строке символов (Си) | Newman | Помощь студентам | 1 | 04.12.2007 02:19 |