В паскаль для произвольного текста напечатать и удалить слова заданной длины очень надо!
По дате
По рейтингу
s.split( /\b/ ).each do |w| if (w.length != l) r = r + w + " "; end;
Разбиваете текст на слова через copy и pos. Слова в массив, дальше пробегаем по массиву выбирая слова нужной длины.
примерный алгоритм решения
заносим текст в массив чаров
проходим циклом по массиву пока не встретим пробел или знак препинания
убеждаемся что следующий символ буква или цифра
убедились запоминаем позицию (начало слова) идем дальше
опять пробел или знак препинания (конец слова)
проверяем длину найденного слова если нужной на длины то удаляем
Видео по теме