Терміново. Розв'язати задачу

Задача на мові Pascal, до 3 годин 13.02.2017 року.
Задача А. Сміх
Степан любить багато сміятися. Сміх - це послідовність букв «a» і «h», які
чергуються. Так наприклад, «ahahaha», «hah» і «a» є сміхом, а «abacaba» і «hh» - ні.
Степан розмовляє дуже швидко, тому всі його слова зливаються в одне велике. Для
дослідження вам потрібно з'ясувати, як довго він може сміятися. У вас є рядок - запис
розмови Степана. Визначте найбільшу довжину сміху в цій розмові.
Вхідні дані:
Перший рядок вхідного файлу містить одне натуральне число N (1 ≤ N ≤ 105
) -
довжина рядка з розмовою Степана. У другому рядку міститься рядок з маленьких
латинських букв довжиною N - запис розмови Степана.
Вихідні дані:
У вихідний файл виведіть одне число - найбільшу довжину сміху в розмові Степана.