var cout,x,y,pa,ba:integer;
i,d,a,b:integer;
l,t:integer;
tab:array of array of boolean;
begin
l:=1;
t:=-1;
readln(d);
cout:=1;
for i:=1 to d do
begin
readln(x,y,a,b);
pa:=a;
ba:=b;
repeat
if ((b+t)>y) or ((b+t)<0) then t:=-t;
if ((a+l)>x) or ((a+l)<0) then l:=-l;
a:=a+l;
b:=b+t;
if tab[a,b]=false then
begin
tab[a,b]:=true;
cout:=cout+1;
end else
begin
tab[a,b]:=false;
cout:=cout-1;
end;
until (pa=a) and (ba=b);
writeln(cout);
end;
end.
Witam, powyższy program kompiluje się bezbłędnie. Najpierw pobiera liczbę zestawów danych, a w następnych linijkach wczytuje zestawy danych po cztery liczby (co on robi to już inna sprawa). Po wpisaniu pierwszego zestawu danych program wyświetla błąd 201 (chyba każdy wie co on oznacza), a dokładniej przy linijce " if tab[a,b]=false then ". Czy ktoś mógłby mi pomóc?