Скачать: CL | DM;

каким образом можно узнать, что в конце находятся ...   Найти похожие ветки 

← →
AlexLines   (2005-10-14 02:37) [0]

Уважаемые знатоки!

Есть строка:

abc ! abc ! aaa ! asdf ! ! !

каким образом можно узнать, что в конце находятся три или более восклицательных знаков и удалить их не удаляя восклицательных знаков между словами

Спасибо

---

← →
ЮЮ ©   (2005-10-14 03:25) [1]

s :=Trim(исходная строка>) ;
while (s <> "") and (s[Length(s)] = "!") do
 s := Trim(Copy(s, 1, Length(s) - 1));

---

← →
ЮЮ ©   (2005-10-14 03:27) [2]

Если, конечно, 2 или 1 восклицательных знака в конце удалять не надо, то мой код неверен

---

← →
AlexLines   (2005-10-14 06:23) [3]

Спасибо!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.05 c