foo.cc:9:17: error: too many decimal points in number
    9 | var cover:array[1..50] of rec;
      |                 ^~~~~
foo.cc:183:26: error: stray '#' in program
  183 | fillchar(opt,sizeof(opt),#0);
      |                          ^
foo.cc:1:1: error: 'type' does not name a type
    1 | type rec=record
      | ^~~~
foo.cc:5:6: error: found ':' in nested-name-specifier, expected '::'
    5 | value:longint;
      |      ^
      |      ::
foo.cc:5:1: error: 'value' does not name a type
    5 | value:longint;
      | ^~~~~
foo.cc:7:1: error: 'end' does not name a type
    7 | end;
      | ^~~
foo.cc:9:1: error: 'var' does not name a type
    9 | var cover:array[1..50] of rec;
      | ^~~
foo.cc:11:1: error: 's' does not name a type
   11 | s,ts:string;
      | ^
foo.cc:13:1: error: 'n' does not name a type
   13 | n,i,k,total,c:longint;
      | ^
foo.cc:15:1: error: 'function' does not name a type; did you mean 'union'?
   15 | function count(c:char; t:longint):longint;
      | ^~~~~~~~
      | union
foo.cc:15:25: error: found ':' in nested-name-specifier, expected '::'
   15 | function count(c:char; t:longint):longint;
      |                         ^
      |                         ::
foo.cc:15:24: error: 't' does not name a type
   15 | function count(c:char; t:longint):longint;
      |                        ^
foo.cc:17:1: error: 'begin' does not name a type
   17 | begin
      | ^~~~~
foo.cc:21:1: error: expected unqualified-id before 'if'
   21 | if c='+' then exit(1+t) else
      | ^~
foo.cc:29:1: error: 'end' does not name a type
   29 | end;
      | ^~~
foo.cc:31:1: error: 'function' does not name a type; did you mean 'union'?
   31 | function find(s:string):longint;
      | ^~~~~~~~
      | union
foo.cc:33:1: error: 'var' does not name a type
   33 | var i:longint;
      | ^~~
foo.cc:35:1: error: 'begin' does not name a type
   35 | begin
      | ^~~~~
foo.cc:39:1: error: expected unqualified-id before 'for'
   39 | for i:=1 to total do
      | ^~~
foo.cc:43:1: error: 'end' does not name a type
   43 | end;
      | ^~~
foo.cc:45:1: error: 'procedure' does not name a type
   45 | procedure block(var s:string);
      | ^~~~~~~~~
foo.cc:47:1: error: 'var' does not name a type
   47 | var i,j,len:longint; flag:boolean;
      | ^~~
foo.cc:47:26: error: found ':' in nested-name-specifier, expected '::'
   47 | var i,j,len:longint; flag:boolean;
      |                          ^
      |                          ::
foo.cc:47:22: error: 'flag' does not name a type
   47 | var i,j,len:longint; flag:boolean;
      |                      ^~~~
foo.cc:49:1: error: 'begin' does not name a type
   49 | begin
      | ^~~~~
foo.cc:51:17: error: 'j' does not name a type
   51 | len:=length(s); j:=0;
      |                 ^
foo.cc:53:1: error: expected unqualified-id before 'if'
   53 | if (s[1]='(')and(s[len]=')') then
      | ^~
foo.cc:65:1: error: expected unqualified-id before 'if'
   65 | if (j=0)and(ilen) then exit;
      | ^~
foo.cc:67:1: error: 'end' does not name a type
   67 | end;
      | ^~~
foo.cc:69:1: error: expected unqualified-id before 'delete'
   69 | delete(s,1,1);
      | ^~~~~~
foo.cc:71:1: error: expected unqualified-id before 'delete'
   71 | delete(s,length(s),1);
      | ^~~~~~
foo.cc:73:1: error: 'end' does not name a type
   73 | end;
      | ^~~
foo.cc:75:1: error: 'end' does not name a type
   75 | end;
      | ^~~
foo.cc:77:1: error: 'function' does not name a type; did you mean 'union'?
   77 | function cal(s:string):longint;
      | ^~~~~~~~
      | union
foo.cc:79:1: error: 'var' does not name a type
   79 | var i,len,c,t,delta,min,cut,temp:longint;
      | ^~~
foo.cc:81:1: error: 'begin' does not name a type
   81 | begin
      | ^~~~~
foo.cc:85:1: error: expected unqualified-id before 'if'
   85 | if s[1]'(' then s:='0'+s;
      | ^~
foo.cc:87:1: error: 'len' does not name a type
   87 | len:=length(s);
      | ^~~
foo.cc:89:1: error: 'temp' does not name a type
   89 | temp:=0;
      | ^~~~
foo.cc:91:4: error: expected constructor, destructor, or type conversion before '(' token
   91 | val(s,temp,c);
      |    ^
foo.cc:93:1: error: expected unqualified-id before 'if'
   93 | if c0 then
      | ^~
foo.cc:97:14: error: 'cut' does not name a type
   97 | min:=maxint; cut:=0; delta:=0;
      |              ^~~
foo.cc:97:22: error: 'delta' does not name a type
   97 | min:=maxint; cut:=0; delta:=0;
      |                      ^~~~~
foo.cc:99:1: error: expected unqualified-id before 'for'
   99 | for i:=1 to len do
      | ^~~
foo.cc:113:1: error: expected unqualified-id before 'if'
  113 | if t='0' do
      | ^~
foo.cc:119:4: error: expected constructor, destructor, or type conversion before '(' token
  119 | inc(a);
      |    ^
foo.cc:121:1: error: 'end' does not name a type
  121 | end;
      | ^~~
foo.cc:123:1: error: expected unqualified-id before 'for'
  123 | for i:=1 to n do
      | ^~~
foo.cc:127:4: error: expected constructor, destructor, or type conversion before '(' token
  127 | val(t,find);
      |    ^
foo.cc:129:1: error: 'end' does not name a type
  129 | end;
      | ^~~
foo.cc:131:1: error: 'function' does not name a type; did you mean 'union'?
  131 | function cal(a:char):longint;
      | ^~~~~~~~
      | union
foo.cc:133:1: error: 'begin' does not name a type
  133 | begin
      | ^~~~~
foo.cc:139:1: error: expected unqualified-id before '-'
  139 | '-': exit(2);
      | ^~~
foo.cc:141:1: error: expected unqualified-id before '*'
  141 | '*': exit(3);
      | ^~~
foo.cc:143:1: error: expected unqualified-id before '/'
  143 | '/': exit(4);
      | ^~~
foo.cc:145:1: error: expected unqualified-id before '('
  145 | '(': exit(5);
      | ^~~
foo.cc:147:1: error: expected unqualified-id before ')'
  147 | ')': exit(6);
      | ^~~
foo.cc:149:1: error: expected unqualified-id before '#'
  149 | '#': exit(7);
      | ^~~
foo.cc:151:1: error: 'end' does not name a type
  151 | end;
      | ^~~
foo.cc:153:1: error: 'end' does not name a type
  153 | end;
      | ^~~
foo.cc:155:1: error: 'begin' does not name a type
  155 | begin
      | ^~~~~
foo.cc:159:1: error: expected unqualified-id before 'for'
  159 | for m:=1 to t do
      | ^~~
foo.cc:165:7: error: expected constructor, destructor, or type conversion before '(' token
  165 | readln(n);
      |       ^
foo.cc:167:1: error: expected unqualified-id before 'for'
  167 | for i:=1 to n do
      | ^~~
foo.cc:173:1: error: 'k' does not name a type
  173 | k:=pos('=',v[i].s);
      | ^
foo.cc:175:4: error: expected constructor, destructor, or type conversion before '(' token
  175 | val(copy(v[i].s,k+1,length(v[i].s)-k),v[i].c);
      |    ^
foo.cc:177:1: error: expected unqualified-id before 'delete'
  177 | delete(v[i].s,k-1,length(v[i].s)-k+2);
      | ^~~~~~
foo.cc:179:1: error: 'end' does not name a type
  179 | end;
      | ^~~
foo.cc:181:9: error: expected constructor, destructor, or type conversion before '(' token
  181 | fillchar(num,sizeof(num),0);
      |         ^
foo.cc:183:9: error: expected constructor, destructor, or type conversion before '(' token
  183 | fillchar(opt,sizeof(opt),#0);
      |         ^
foo.cc:185:1: error: 'st' does not name a type; did you mean 'std'?
  185 | st:=st+'#';
      | ^~
      | std
foo.cc:187:1: error: 'i' does not name a type
  187 | i:=1;
      | ^
foo.cc:189:1: error: expected unqualified-id before 'while'
  189 | while i='0' then
      | ^~~~~
foo.cc:195:1: error: 'num' does not name a type; did you mean 'enum'?
  195 | num[p2]:=find(i);
      | ^~~
      | enum
foo.cc:197:1: error: 'end' does not name a type
  197 | end else
      | ^~~
foo.cc:209:4: error: expected constructor, destructor, or type conversion before '(' token
  209 | dec(p2); dec(p1);
      |    ^
foo.cc:209:13: error: expected constructor, destructor, or type conversion before '(' token
  209 | dec(p2); dec(p1);
      |             ^
foo.cc:211:1: error: 'end' does not name a type
  211 | end;
      | ^~~

[Hydro](https://hydro.ac)提供评测服务