foo.cc:5:9: error: too many decimal points in number
    5 | a:array[0..61,0..31] of integer;
      |         ^~~~~
foo.cc:5:15: error: too many decimal points in number
    5 | a:array[0..61,0..31] of integer;
      |               ^~~~~
foo.cc:7:9: error: too many decimal points in number
    7 | f:array[0..1,0..31,-3000..3000] of boolean;
      |         ^~~~
foo.cc:7:14: error: too many decimal points in number
    7 | f:array[0..1,0..31,-3000..3000] of boolean;
      |              ^~~~~
foo.cc:7:21: error: too many decimal points in number
    7 | f:array[0..1,0..31,-3000..3000] of boolean;
      |                     ^~~~~~~~~~
foo.cc:1:1: error: 'program' does not name a type
    1 | program p1280;
      | ^~~~~~~
foo.cc:3:1: error: 'var' does not name a type
    3 | var n,now:longint;
      | ^~~
foo.cc:5:2: error: found ':' in nested-name-specifier, expected '::'
    5 | a:array[0..61,0..31] of integer;
      |  ^
      |  ::
foo.cc:5:1: error: 'a' does not name a type
    5 | a:array[0..61,0..31] of integer;
      | ^
foo.cc:7:2: error: found ':' in nested-name-specifier, expected '::'
    7 | f:array[0..1,0..31,-3000..3000] of boolean;
      |  ^
      |  ::
foo.cc:7:1: error: 'f' does not name a type
    7 | f:array[0..1,0..31,-3000..3000] of boolean;
      | ^
foo.cc:9:1: error: 'procedure' does not name a type
    9 | procedure init;
      | ^~~~~~~~~
foo.cc:11:1: error: 'var' does not name a type
   11 | var i,j:longint;
      | ^~~
foo.cc:13:1: error: 'begin' does not name a type
   13 | begin
      | ^~~~~
foo.cc:17:1: error: expected unqualified-id before 'for'
   17 | for i:=1 to n do
      | ^~~
foo.cc:23:1: error: 'readln' does not name a type
   23 | readln;
      | ^~~~~~
foo.cc:25:1: error: 'end' does not name a type
   25 | end;
      | ^~~
foo.cc:27:1: error: expected unqualified-id before 'for'
   27 | for i:=n+1 to 2*n-1 do
      | ^~~
foo.cc:33:1: error: 'readln' does not name a type
   33 | readln;
      | ^~~~~~
foo.cc:35:1: error: 'end' does not name a type
   35 | end;
      | ^~~
foo.cc:37:1: error: 'end' does not name a type
   37 | end;
      | ^~~
foo.cc:39:1: error: 'procedure' does not name a type
   39 | procedure dp;
      | ^~~~~~~~~
foo.cc:41:1: error: 'var' does not name a type
   41 | var i,j,k:longint;
      | ^~~
foo.cc:43:1: error: 'begin' does not name a type
   43 | begin
      | ^~~~~
foo.cc:47:1: error: 'f' does not name a type
   47 | f[0,1,a[1,1]]:=true;
      | ^
foo.cc:49:1: error: 'now' does not name a type
   49 | now:=0;
      | ^~~
foo.cc:51:1: error: expected unqualified-id before 'for'
   51 | for i:=2 to n do
      | ^~~
foo.cc:57:1: error: expected unqualified-id before 'for'
   57 | for j:=1 to i do
      | ^~~
foo.cc:63:1: error: 'end' does not name a type
   63 | end;
      | ^~~
foo.cc:65:1: error: expected unqualified-id before 'for'
   65 | for i:=n+1 to 2*n-1 do
      | ^~~
foo.cc:71:1: error: expected unqualified-id before 'for'
   71 | for j:=1 to 2*n-i do
      | ^~~
foo.cc:77:1: error: 'end' does not name a type
   77 | end;
      | ^~~
foo.cc:79:1: error: 'end' does not name a type
   79 | end;
      | ^~~
foo.cc:81:1: error: 'procedure' does not name a type
   81 | procedure outit;
      | ^~~~~~~~~
foo.cc:83:1: error: 'var' does not name a type
   83 | var i:longint;
      | ^~~
foo.cc:85:1: error: 'begin' does not name a type
   85 | begin
      | ^~~~~
foo.cc:91:13: error: 'exit' does not name a type
   91 | writeln(i); exit;
      |             ^~~~
foo.cc:93:1: error: 'end' does not name a type
   93 | end;
      | ^~~
foo.cc:95:1: error: 'end' does not name a type
   95 | end;
      | ^~~
foo.cc:97:1: error: 'begin' does not name a type
   97 | begin
      | ^~~~~
foo.cc:101:1: error: 'dp' does not name a type
  101 | dp;
      | ^~
foo.cc:103:1: error: 'outit' does not name a type
  103 | outit;
      | ^~~~~
foo.cc:105:1: error: 'end' does not name a type
  105 | end.
      | ^~~

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