Строки

[ElenaO]

Всем здравствуйте.Помогите пожалуйста доделать задачу:Дана строка символов. Группу символов, разделенную с одной или с обеих сторон одним или несколькими пробелами и не содержащую внутри себя пробелов, назовем словом.
Выяснить имеется ли в самом коротком слове пара соседствующих букв "КА" или нет. Предполагается, что слово с наименьшей длиной единственное.

Первая часть задачи есть.Вот

Program z1;
Uses crt;
Var
    S,ss: string;
    I,n: integer;
Begin
 Clrscr;
 Writeln('Vvedite frazu');
 Read (s);
 n:=1;
 ss:='';

Не знаю,правильна она или нет.А вот с этим условием проблема:Выяснить имеется ли в самом коротком слове пара соседствующих букв "КА" или нет. Предполагается, что слово с наименьшей длиной единственное.
Не знаю как записать...
Надеюсь на вашу помощь.Заранее спасибо