/in/foo.cc:2:11: error: too many decimal points in number
   t:array[0..8,0..8] of string[2];
           ^~~~
/in/foo.cc:2:16: error: too many decimal points in number
   t:array[0..8,0..8] of string[2];
                ^~~~
/in/foo.cc:10:11: warning: character constant too long for its type
   writeln('ERROR!');
           ^~~~~~~~
/in/foo.cc:17:9: warning: multi-character character constant [-Wmultichar]
   write('N=');
         ^~~~
/in/foo.cc:1:1: error: 'var' does not name a type
 var
 ^~~
/in/foo.cc:3:4: error: found ':' in nested-name-specifier, expected '::'
   v:array['A'..'Z'] of integer;
    ^
/in/foo.cc:3:3: error: 'v' does not name a type
   v:array['A'..'Z'] of integer;
   ^
/in/foo.cc:4:4: error: found ':' in nested-name-specifier, expected '::'
   s:string;
    ^
/in/foo.cc:4:3: error: 's' does not name a type
   s:string;
   ^
/in/foo.cc:5:3: error: 'c' does not name a type
   c,c2:char;
   ^
/in/foo.cc:6:3: error: 'i' does not name a type
   i,j,n,p,k,tot:integer;
   ^
/in/foo.cc:8:1: error: 'procedure' does not name a type
 procedure error;
 ^~~~~~~~~
/in/foo.cc:9:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:11:3: error: 'halt' does not name a type
   halt;
   ^~~~
/in/foo.cc:12:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:14:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:17:8: error: expected constructor, destructor, or type conversion before '(' token
   write('N=');
        ^
/in/foo.cc:18:9: error: expected constructor, destructor, or type conversion before '(' token
   readln(n);
         ^
/in/foo.cc:19:3: error: 'k' does not name a type
   k:=n-1;
   ^
/in/foo.cc:20:3: error: expected unqualified-id before 'for'
   for i:=0 to n-1 do
   ^~~
/in/foo.cc:23:5: error: 's' does not name a type
     s:=s+' ';
     ^
/in/foo.cc:24:5: error: 'c' does not name a type
     c:=s[1];
     ^
/in/foo.cc:25:5: error: expected unqualified-id before 'if'
     if i<>0 then v[c]:=0;
     ^~
/in/foo.cc:26:5: error: expected unqualified-id before 'for'
     for j:=0 to n-1 do
     ^~~
/in/foo.cc:29:7: error: 'p' does not name a type
       p:=pos(' ',s);
       ^
/in/foo.cc:30:7: error: 't' does not name a type
       t[i,j]:=copy(s,1,p-1);
       ^
/in/foo.cc:31:7: error: expected unqualified-id before 'if'
       if p=3 then inc(v[c]);
       ^~
/in/foo.cc:32:7: error: expected unqualified-id before 'delete'
       delete(s,1,p);
       ^~~~~~
/in/foo.cc:33:5: error: 'end' does not name a type
     end;
     ^~~
/in/foo.cc:34:3: error: 'end' does not name a type
   end;
   ^~~
/in/foo.cc:36:3: error: 'tot' does not name a type
   tot:=0;
   ^~~
/in/foo.cc:37:3: error: expected unqualified-id before 'for'
   for c:='A' to 'Z' do
   ^~~
/in/foo.cc:39:3: error: expected unqualified-id before 'if'
   if tot<>k then error;
   ^~
/in/foo.cc:41:3: error: expected unqualified-id before 'for'
   for c:='A' to 'Y' do
   ^~~
/in/foo.cc:43:48: error: expected unqualified-id before '{' token
       if (v[c]<>-1)and(v[c]=v[c2]) then error; {equal}
                                                ^
/in/foo.cc:44:3: error: expected unqualified-id before '{' token
   {check}
   ^
/in/foo.cc:45:3: error: expected unqualified-id before 'for'
   for i:=1 to k do
   ^~~
/in/foo.cc:52:7: error: expected unqualified-id before 'if'
       if v[t[i,0,1]]+v[t[0,j,1]]<>p then
       ^~
/in/foo.cc:54:5: error: 'end' does not name a type
     end;
     ^~~
/in/foo.cc:55:3: error: expected unqualified-id before 'for'
   for c:='A' to 'Z' do
   ^~~
/in/foo.cc:57:3: error: 'writeln' does not name a type
   writeln;
   ^~~~~~~
/in/foo.cc:58:10: error: expected constructor, destructor, or type conversion before '(' token
   writeln(k);
          ^
/in/foo.cc:59:1: error: 'end' does not name a type
 end.
 ^~~