PASCAL Строки. Пожалуйста, срочно. 1. В строке найти слова в которых 3 слога 2. Найти слова в которых есть буква "а"

http://www.delphi-manual.ru/work-with-strings.php
Берешь всю строку в основную переменную.
Парсишь эту переменную функциями Pos, Posex, вырываешь из строки первое слово, опираясь на пробелы, как на разделители слов, в вспомогательную переменную.

- Проверяешь эту вспомогательную переменную на присутствие буквы "а". (Pos). Выводишь куда нибудь результат, если есть.
- Потом проверяешь вспомогательную переменную на количество гласных (тут можно побыстренькому самопальную функцию написать (Pos, Posex)). Выводишь куда нибудь результат, если есть.
- Удаляешь первое обработанное слово из основной переменной (delete).
- Повторяем, пока строка не кончится