Какое количество символов можно ввести в Pascal ABC?

В 24 задании ЕГЭ по информатике в программах, приведенных сайтом РешуЕГЭ, обрабатывается конкретно файл со строкой символов. У меня же обрабатываются введённые пользователем символы. Ответы выдаёт одинаковые при вводе строки из небольшого количества символов, но при обработке всего файла ответы не совпадают. Могут ли быть проблемы конкретно с объемом? Может паскаль при вводе с клавиатуры не обрабатывает всю строку?
Вот моя программа, если нужно. По заданию необходимо найти максимальную длину цепочки, состоящей из символов А и В, начинается всегда с А, но обрываться может на одном из двух символов.
var s: string;
i, a, count: integer;
begin
readln(s);
count:0;
a:=0;
for i:= 2 to length(s) do
begin
if ((s[i-1]='B') and (s[i]='A')) or ((s[i-1]='A') and (s[i]='B')) then
begin
count:= count+1;
if count>a then
a:=count;
end
else
count:=1;
end;
writeln(a);
end.