Tại sao code bị exit code 201?

const fi='dequy1.inp';
       fo='dequy1.out';
       var
       i,n,j,d,k,m:longint;
       a:array[1..10000,1..10000] of longint;
       f:text;
               procedure try(i,j:longint);
                       begin
                               If a[i,j]<>1 then exit;
If (i<1) OR (i>m) OR (j<1) OR (j>n) then exit;

                               a[i,j]:=0;
                               if a[i-1,j]=1 then try(i-1,j);
                               if a[i,j-1]=1 then try(i,j-1);
                               if  a[i+1,j]=1 then try(i+1,j);
                               if a[i,j+1]=1 then try(i,j+1);
                       end;
                               begin
                               assign(f,fi);
                               reset(f);
                               readln(f,n,m);
                               for i:=1 to n do
                                       begin
                                               for j:=1 to m do read(f,a[i,j]);
                                               readln(f);
                                       end;
                               close(f);

                               assign(f,fo);
                               rewrite(f);
                                       d:=0;
                                       for i:=1 to n do
                                               for j:=1 to m do
                                                       if a[i,j]=1 then
                                                       begin
                                                       d:=d+1;
                                                       try(i,j);
                                                       end;
                                               writeln(f,d);
                                               close(f);
                                               end.

Đã có bạn hỏi câu tương tự nè,câu trả lời của bạn lib là chuẩn nhất, bạn cho giá trị nhỏ lại là ok

3 Likes
83% thành viên diễn đàn không hỏi bài tập, còn bạn thì sao?