Тема: Строки
Показать сообщение отдельно
  #2  
Старый 28.05.2010, 00:53
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,107
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

1. Разбить строку на слова (в массив или список)
2.

Вариант А: Делаем массив для всех букв типа Integer; Бежим по слову побуквенно и для соотв. букв в массиве выставляем единичку. Потом суммируем массив. Если сумма <= 3, то это слово такое, какое нам надо.

Варимнт Б: Делаем динамический массив букв. Бежим по слову побуквенно и каждую букву добавляем в массив, если ее там нет. Далее берем длинну этого массива. Если длинна <= 3, то это слово такое, какое нам надо.
Ответить с цитированием