Разбор добавил Джафар Исхоков

В место того чтобы считать буквы слов можно считать только их первые буквы. Какая буква является
 первой буквой слова? Любая, слева от которой стоит не буква. Исключение составляет буква, слева от
 которой стоит символ “-“, а перед ним - буква. Мы вводим строку s и перед ней ставим два символа 
“!!” или как по-другому пишут s = “!!” + s; . После этого циклом пробегаем по массиву строк с 
счетчиком i где первоначально  I = 3 и это выглядит таким образом  “for i:=3 to length(s) do”. 
Теперь зададим несколько условии:

Если s[i] в [‘a’..’z’, ‘A’..’Z’] {s[i] - буква} и не (s[i-1] в [’a’..’z’, ’A’..’Z’])  {s[i-1] – не буква} и не ( ( s[i-1] = ’-‘) и (s[i-2] в [‘a’..’z’,’A’..’Z’] ) ) {s[i-1] – не дефис} то тогда  n := n + 1;

Теперь решение этой задачи находиться в переменной n, но не забудьте что n первоначально равна 0. Удачи =).