Помощь - Поиск - Пользователи - Календарь
Полная версия: анализ и преобразование текста строки
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Багирка
ввести строку, состоящую из нескольких предложений. построить результирующую строку, содержащую только предложения, состоящие из заданного количества слов. помогите!!!
Lapp
Вот, примерно так попробуй сделать:
  i:=1;
  while i<=Length(s) do begin
    m:=i;
    n:=0;
    repeat
      while (i<=Length(s)) and not (s[i] in Letters) do Inc(i);
      while (i<=Length(s)) and (s[i] in Letters) do Inc(i);
      Inc(n)
    until s[i]='.';
    if n=k then r:=r+Copy(s,m,i-m+1);
    Inc(i)
  end;

Учти, что я тут считаю, что (а) предложение обязательно оканчивается точкой, которая (б) следует непосредственно за словом.
Багирка
спасибо!
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.