Вычислительные процессы с использованием строк

[feeras]

Дано натуральное n и символы S1, ..., Sn. Выяснить, имеются ли в последовательности S1, ..., Sn члены Si, Si+1 такие, что Si - это запятая, а Si+1 - тире.

program zapytay_tire;
uses crt;
const n=10;
var s:array[1..n] of char;
    i,k:integer;
begin
clrscr;
write ('Введите ',n,' символов:');
for i:=1 to n do
read(s[i]);
readln;
k:=0;
for i:=1 to n do
if (s[i]=',') and (s[i+1]='-') then
   begin
     writeln ('Такие члены последовательности есть!');
     readln;
     k:=1;
   end;
if k=0 then writeln ('Таких членов последовательности нет!');
readln;
end.

Мне сказали, что задача написана несколько неправильно. В чем причина?