foo.cc:2:13: error: too many decimal points in number
    2 | var s:array[1..25] of string;
      |             ^~~~~
foo.cc:4:11: error: too many decimal points in number
    4 | use:array[1..25] of longint;
      |           ^~~~~
foo.cc:1:1: error: 'program' does not name a type
    1 | program CODE1018;
      | ^~~~~~~
foo.cc:2:1: error: 'var' does not name a type
    2 | var s:array[1..25] of string;
      | ^~~
foo.cc:3:1: error: 'ans' does not name a type
    3 | ans,i,n:longint;
      | ^~~
foo.cc:4:4: error: found ':' in nested-name-specifier, expected '::'
    4 | use:array[1..25] of longint;
      |    ^
      |    ::
foo.cc:4:1: error: 'use' does not name a type
    4 | use:array[1..25] of longint;
      | ^~~
foo.cc:5:2: error: found ':' in nested-name-specifier, expected '::'
    5 | f:string;
      |  ^
      |  ::
foo.cc:5:1: error: 'f' does not name a type
    5 | f:string;
      | ^
foo.cc:6:1: error: 'procedure' does not name a type
    6 | procedure main(now:string);
      | ^~~~~~~~~
foo.cc:7:1: error: 'var' does not name a type
    7 | var i,j,len:longint;
      | ^~~
foo.cc:8:1: error: 'a' does not name a type
    8 | a,b:string;
      | ^
foo.cc:9:1: error: 'begin' does not name a type
    9 | begin
      | ^~~~~
foo.cc:11:1: error: expected unqualified-id before 'for'
   11 | for i:=1 to n do
      | ^~~
foo.cc:15:29: error: 'b' does not name a type
   15 | a:=copy(now,j,length(now)); b:=copy(s[i],1,length(now)-j+1);
      |                             ^
foo.cc:16:1: error: expected unqualified-id before 'if'
   16 | if a=b then
      | ^~
foo.cc:18:14: error: 'now' does not name a type
   18 | inc(use[i]); now:=now+copy(s[i],length(now)-j+2,length(s[i]));
      |              ^~~
foo.cc:19:5: error: expected constructor, destructor, or type conversion before '(' token
   19 | main(now);
      |     ^
foo.cc:20:4: error: expected constructor, destructor, or type conversion before '(' token
   20 | dec(use[i]); now:=copy(now,1,len);
      |    ^
foo.cc:20:14: error: 'now' does not name a type
   20 | dec(use[i]); now:=copy(now,1,len);
      |              ^~~
foo.cc:21:1: error: 'end' does not name a type
   21 | end;
      | ^~~
foo.cc:22:1: error: 'end' does not name a type
   22 | end;
      | ^~~
foo.cc:23:1: error: expected unqualified-id before 'if'
   23 | if length(now)>ans then
      | ^~
foo.cc:25:1: error: 'end' does not name a type
   25 | end;
      | ^~~
foo.cc:27:1: error: 'begin' does not name a type
   27 | begin
      | ^~~~~
foo.cc:28:12: error: 'ans' does not name a type
   28 | readln(n); ans:=0; fillchar(use,sizeof(use),0);
      |            ^~~
foo.cc:28:28: error: expected constructor, destructor, or type conversion before '(' token
   28 | readln(n); ans:=0; fillchar(use,sizeof(use),0);
      |                            ^
foo.cc:29:1: error: expected unqualified-id before 'for'
   29 | for i:=1 to n do
      | ^~~
foo.cc:32:7: error: expected constructor, destructor, or type conversion before '(' token
   32 | readln(f);
      |       ^
foo.cc:33:1: error: expected unqualified-id before 'for'
   33 | for i:=1 to n do
      | ^~~
foo.cc:36:18: error: expected constructor, destructor, or type conversion before '(' token
   36 | inc(use[i]); main(s[i]); dec(use[i]);
      |                  ^
foo.cc:36:29: error: expected constructor, destructor, or type conversion before '(' token
   36 | inc(use[i]); main(s[i]); dec(use[i]);
      |                             ^
foo.cc:37:1: error: 'end' does not name a type
   37 | end;
      | ^~~
foo.cc:38:6: error: expected constructor, destructor, or type conversion before '(' token
   38 | write(ans);
      |      ^
foo.cc:39:1: error: 'end' does not name a type
   39 | end.
      | ^~~

正在同步测试数据，请稍后
[Hydro](https://hydro.ac)提供评测服务