foo.cc:4:9: error: too many decimal points in number
 s:array[1..maxn] of string;
         ^~~~~~~
foo.cc:7:11: error: too many decimal points in number
 add:array[1..maxn,1..maxn] of integer;
           ^~~~~~~
foo.cc:7:19: error: too many decimal points in number
 add:array[1..maxn,1..maxn] of integer;
                   ^~~~~~~
foo.cc:8:12: error: too many decimal points in number
 used:array[1..maxn] of integer;
            ^~~~~~~
foo.cc:2:1: error: 'maxn' does not name a type
 maxn=20;
 ^~~~
foo.cc:3:1: error: 'var' does not name a type; did you mean 'char'?
 var
 ^~~
 char
foo.cc:5:1: error: 'head' does not name a type
 head:char;
 ^~~~
foo.cc:6:1: error: 'best' does not name a type
 best,i,n:integer;
 ^~~~
foo.cc:7:4: error: found ':' in nested-name-specifier, expected '::'
 add:array[1..maxn,1..maxn] of integer;
    ^
foo.cc:7:1: error: 'add' does not name a type
 add:array[1..maxn,1..maxn] of integer;
 ^~~
foo.cc:8:5: error: found ':' in nested-name-specifier, expected '::'
 used:array[1..maxn] of integer;
     ^
foo.cc:8:1: error: 'used' does not name a type
 used:array[1..maxn] of integer;
 ^~~~
foo.cc:10:1: error: 'procedure' does not name a type
 procedure calcadd;
 ^~~~~~~~~
foo.cc:11:1: error: 'var' does not name a type; did you mean 'char'?
 var
 ^~~
 char
foo.cc:13:3: error: found ':' in nested-name-specifier, expected '::'
 ok:boolean;
   ^
foo.cc:13:1: error: 'ok' does not name a type
 ok:boolean;
 ^~
foo.cc:14:1: error: 'begin' does not name a type
 begin
 ^~~~~
foo.cc:19:1: error: expected unqualified-id before 'for'
 for k:=1 to min-1 do
 ^~~
foo.cc:22:1: error: 'ok' does not name a type
 ok:=true;
 ^~
foo.cc:23:1: error: expected unqualified-id before 'for'
 for t:=1 to k do
 ^~~
foo.cc:27:1: error: expected unqualified-id before 'break'
 break;
 ^~~~~
foo.cc:28:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:29:1: error: expected unqualified-id before 'if'
 if ok then break;
 ^~
foo.cc:30:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:31:1: error: expected unqualified-id before 'if'
 if ok then
 ^~
foo.cc:35:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:36:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:38:1: error: 'procedure' does not name a type
 procedure search(last,len:integer);
 ^~~~~~~~~
foo.cc:39:1: error: 'var' does not name a type; did you mean 'char'?
 var
 ^~~
 char
foo.cc:41:1: error: 'begin' does not name a type
 begin
 ^~~~~
foo.cc:44:1: error: expected unqualified-id before 'for'
 for i:=1 to n do
 ^~~
foo.cc:48:7: error: expected constructor, destructor, or type conversion before '(' token
 search(i,len+add[last,i]);
       ^
foo.cc:49:4: error: expected constructor, destructor, or type conversion before '(' token
 dec(used[i]);
    ^
foo.cc:50:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:51:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:53:1: error: 'begin' does not name a type
 begin
 ^~~~~
foo.cc:55:1: error: expected unqualified-id before 'for'
 for i:=1 to n do
 ^~~
foo.cc:57:7: error: expected constructor, destructor, or type conversion before '(' token
 readln(head);
       ^
foo.cc:58:1: error: 'calcadd' does not name a type
 calcadd;
 ^~~~~~~
foo.cc:59:1: error: 'best' does not name a type
 best:=0;
 ^~~~
foo.cc:60:9: error: expected constructor, destructor, or type conversion before '(' token
 fillchar(used,sizeof(used),0);
         ^
foo.cc:61:1: error: expected unqualified-id before 'for'
 for i:=1 to n do
 ^~~
foo.cc:65:7: error: expected constructor, destructor, or type conversion before '(' token
 search(i,length(s[i]));
       ^
foo.cc:66:1: error: 'used' does not name a type
 used[i]:=0;
 ^~~~
foo.cc:67:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:68:8: error: expected constructor, destructor, or type conversion before '(' token
 writeln(best);
        ^
foo.cc:69:1: error: 'end' does not name a type; did you mean 'enum'?
 end.
 ^~~
 enum

正在同步测试数据，请稍后
自豪的采用HydroJudge(https://github.com/hydro-dev/Hydro)进行评测。