Можно две переменные счётчика использовать.
aCount:Int - количество букв А в слове.
wordsCount:Int - количество слов с 3 буквами А
Алгоритм:
проходим в цикле посимвольно по строке,
если (символ == А) то
aCount = aCount+1
если aCount == 3 то
wordsCount = wordsCount+1
конец если
иначе
если (символ == ПРОБЕЛ) то
aCount = 0
конец если
конец иначе