/in/foo.cc:1:16: error: too many decimal points in number
 const dx:array[1..4]  of longint=(-1,1,0,0);
                ^~~~
/in/foo.cc:2:16: error: too many decimal points in number
       dy:array[1..4] of longint=(0,0,-1,1);
                ^~~~
/in/foo.cc:4:13: error: too many decimal points in number
     g:array[0..500,0..500] of longint;
             ^~~~~~
/in/foo.cc:4:20: error: too many decimal points in number
     g:array[0..500,0..500] of longint;
                    ^~~~~~
/in/foo.cc:5:13: error: too many decimal points in number
     h:array[0..500,0..500] of boolean;
             ^~~~~~
/in/foo.cc:5:20: error: too many decimal points in number
     h:array[0..500,0..500] of boolean;
                    ^~~~~~
/in/foo.cc:6:15: error: too many decimal points in number
     a,b:array[0..250000] of longint;
               ^~~~~~~~~
/in/foo.cc:1:9: error: found ':' in nested-name-specifier, expected '::'
 const dx:array[1..4]  of longint=(-1,1,0,0);
         ^
/in/foo.cc:1:7: error: 'dx' does not name a type
 const dx:array[1..4]  of longint=(-1,1,0,0);
       ^~
/in/foo.cc:2:9: error: found ':' in nested-name-specifier, expected '::'
       dy:array[1..4] of longint=(0,0,-1,1);
         ^
/in/foo.cc:2:7: error: 'dy' does not name a type
       dy:array[1..4] of longint=(0,0,-1,1);
       ^~
/in/foo.cc:3:1: error: 'var' does not name a type; did you mean 'char'?
 var ans,n,m,i,j:longint;
 ^~~
 char
/in/foo.cc:4:6: error: found ':' in nested-name-specifier, expected '::'
     g:array[0..500,0..500] of longint;
      ^
/in/foo.cc:4:5: error: 'g' does not name a type
     g:array[0..500,0..500] of longint;
     ^
/in/foo.cc:5:6: error: found ':' in nested-name-specifier, expected '::'
     h:array[0..500,0..500] of boolean;
      ^
/in/foo.cc:5:5: error: 'h' does not name a type
     h:array[0..500,0..500] of boolean;
     ^
/in/foo.cc:6:5: error: 'a' does not name a type
     a,b:array[0..250000] of longint;
     ^
/in/foo.cc:7:1: error: 'procedure' does not name a type
 procedure bfs(i,j:longint);
 ^~~~~~~~~
/in/foo.cc:8:1: error: 'var' does not name a type; did you mean 'char'?
 var k,l,r,i1,j1:longint;
 ^~~
 char
/in/foo.cc:9:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:10:8: error: 'r' does not name a type
   l:=1;r:=1;
        ^
/in/foo.cc:11:3: error: 'a' does not name a type
   a[1]:=i;b[1]:=j;h[i,j]:=true;
   ^
/in/foo.cc:11:11: error: 'b' does not name a type
   a[1]:=i;b[1]:=j;h[i,j]:=true;
           ^
/in/foo.cc:11:19: error: 'h' does not name a type
   a[1]:=i;b[1]:=j;h[i,j]:=true;
                   ^
/in/foo.cc:12:3: error: expected unqualified-id before 'while'
   while l<=r do
   ^~~~~
/in/foo.cc:17:11: error: 'j1' does not name a type
           j1:=j+dy[k];
           ^~
/in/foo.cc:18:11: error: expected unqualified-id before 'if'
           if (i1>0) and (i1<=n) and (j1>0) and (j1<=m) and not h[i1,j1] and (g[i1,j1]<>-1)
           ^~
/in/foo.cc:19:29: error: 'a' does not name a type
           then begin inc(r);a[r]:=i1;b[r]:=j1;h[i1,j1]:=true; end;
                             ^
/in/foo.cc:19:38: error: 'b' does not name a type
           then begin inc(r);a[r]:=i1;b[r]:=j1;h[i1,j1]:=true; end;
                                      ^
/in/foo.cc:19:47: error: 'h' does not name a type
           then begin inc(r);a[r]:=i1;b[r]:=j1;h[i1,j1]:=true; end;
                                               ^
/in/foo.cc:19:63: error: 'end' does not name a type; did you mean 'enum'?
           then begin inc(r);a[r]:=i1;b[r]:=j1;h[i1,j1]:=true; end;
                                                               ^~~
                                                               enum
/in/foo.cc:20:9: error: 'end' does not name a type; did you mean 'enum'?
         end;
         ^~~
         enum
/in/foo.cc:21:10: error: expected constructor, destructor, or type conversion before '(' token
       inc(l);
          ^
/in/foo.cc:22:7: error: 'i' does not name a type
       i:=a[l];j:=b[l];
       ^
/in/foo.cc:22:15: error: 'j' does not name a type
       i:=a[l];j:=b[l];
               ^
/in/foo.cc:23:5: error: 'end' does not name a type; did you mean 'enum'?
     end;
     ^~~
     enum
/in/foo.cc:24:6: error: expected constructor, destructor, or type conversion before '(' token
   inc(ans);
      ^
/in/foo.cc:25:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
/in/foo.cc:26:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:30:3: error: expected unqualified-id before 'for'
   for i:=1 to n do
   ^~~
/in/foo.cc:32:11: error: expected constructor, destructor, or type conversion before '(' token
   fillchar(h,sizeof(h),false);
           ^
/in/foo.cc:33:3: error: 'ans' does not name a type
   ans:=0;
   ^~~
/in/foo.cc:34:3: error: expected unqualified-id before 'for'
   for i:=1 to n do
   ^~~
/in/foo.cc:37:10: error: expected constructor, destructor, or type conversion before '(' token
   writeln(ans);
          ^
/in/foo.cc:38:8: error: expected constructor, destructor, or type conversion before '(' token
   close(input);close(output);
        ^
/in/foo.cc:38:21: error: expected constructor, destructor, or type conversion before '(' token
   close(input);close(output);
                     ^
/in/foo.cc:39:1: error: 'end' does not name a type; did you mean 'enum'?
 end.
 ^~~
 enum