foo.cc:7:11: error: too many decimal points in number
    7 | a,b:array[0..1000]of longint;
      |           ^~~~~~~
foo.cc:1:1: error: 'var' does not name a type
    1 | var
      | ^~~
foo.cc:5:1: error: 'm' does not name a type
    5 | m,i:longint;
      | ^
foo.cc:7:1: error: 'a' does not name a type
    7 | a,b:array[0..1000]of longint;
      | ^
foo.cc:9:1: error: 'procedure' does not name a type
    9 | procedure cheng;
      | ^~~~~~~~~
foo.cc:11:1: error: 'var' does not name a type
   11 | var
      | ^~~
foo.cc:15:1: error: 'begin' does not name a type
   15 | begin
      | ^~~~~
foo.cc:19:1: error: expected unqualified-id before 'for'
   19 | for i:=length(S)-1 downto 1 do
      | ^~~
foo.cc:25:1: error: 'a' does not name a type
   25 | a:=a mod 10;
      | ^
foo.cc:27:1: error: 'end' does not name a type
   27 | end;
      | ^~~
foo.cc:29:1: error: 'a' does not name a type
   29 | a[0]:=a[1] div 10;
      | ^
foo.cc:31:1: error: 'a' does not name a type
   31 | a[1]:=a[1] mod 10;
      | ^
foo.cc:33:4: error: expected constructor, destructor, or type conversion before '(' token
   33 | inc(a[length(s)]);
      |    ^
foo.cc:35:1: error: 'end' does not name a type
   35 | end;
      | ^~~
foo.cc:37:1: error: 'procedure' does not name a type
   37 | procedure divv;
      | ^~~~~~~~~
foo.cc:39:1: error: 'var' does not name a type
   39 | var
      | ^~~
foo.cc:43:2: error: found ':' in nested-name-specifier, expected '::'
   43 | x:int64;
      |  ^
      |  ::
foo.cc:43:1: error: 'x' does not name a type
   43 | x:int64;
      | ^
foo.cc:45:1: error: 'begin' does not name a type
   45 | begin
      | ^~~~~
foo.cc:49:1: error: 't' does not name a type
   49 | t:=a[0];
      | ^
foo.cc:51:1: error: expected unqualified-id before 'for'
   51 | for i:=1 to length(s) do
      | ^~~
foo.cc:55:8: error: expected constructor, destructor, or type conversion before '(' token
   55 | writeln(t);
      |        ^
foo.cc:57:1: error: 'end' does not name a type
   57 | end;
      | ^~~
foo.cc:59:1: error: 'begin' does not name a type
   59 | begin
      | ^~~~~
foo.cc:63:7: error: expected constructor, destructor, or type conversion before '(' token
   63 | readln(m);
      |       ^
foo.cc:65:1: error: expected unqualified-id before 'for'
   65 | for i:=1 to length(s) do a[i]:=ord(s[i])-48;
      | ^~~
foo.cc:67:1: error: 'cheng' does not name a type
   67 | cheng;
      | ^~~~~
foo.cc:69:1: error: 'divv' does not name a type
   69 | divv;
      | ^~~~
foo.cc:71:1: error: 'end' does not name a type
   71 | end.
      | ^~~

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