паскальАВС... Строки.. помогите прошу вас

Дана строка s, содержащая менее чем 256 символов. Подсчитать в ней наибольшее количество идущих подряд пробелов. Использовать стандартные процедуры и функции в действиях над строками.