Информатика, паскаль ABC, надо 3 задание...

В программе для каждого из трёх введённых слов подсчитывается количество одинаковых букв, стоящих рядом. 
Значения переменных после выполнения приведенного фрагмента программы:
slovo=ИНФОРМАТИКА
n=11 (длина последнего слова)
k=0
На экран будет выведено:
no
yes
no