Найти количество символов строки, не являющихся буквами - Pascal

Формулировка задачи:

Строки в языке Pascal

Вводим с клавиатуры произвольные строки определить и вывести на экран количество в ней символов, не являющихся буквами

Решение задачи: «Найти количество символов строки, не являющихся буквами»

Листинг программы

const
    LETTERS: Set Of Char = ['A'..'Z', 'a'..'z'];
var
    s: String;
    i, count: Word;
begin
    Write('Input string: '); ReadLn(s);
    count := 0;
    for i := 1 to Length(s) do
        if Not(s[i] in LETTERS)
        then
            Inc(count);
    Write('Answer: ', count);
end.

Объяснение кода листинга программы

Объявление константы LETTERS со значением множества символов, включающего все буквы английского алфавита в верхнем и нижнем регистрах.
Объявление переменных s (строка), i (целое число - индекс), и count (целое число - счетчик).
Ввод строки пользователем с просьбой Input string:.
Инициализация счетчика count значением 0.
Цикл от 1 до длины введенной строки s.
Проверка, не входит ли символ s[i] в множество букв LETTERS.
Если символ не является буквой, увеличивается счетчик count.
Вывод результата в формате Answer: и значением переменной count - количество символов строки, не являющихся буквами.