foo.cc:5:14: error: too many decimal points in number
 aa,c,a:array[1..3,1..3] of real;
              ^~~~
foo.cc:5:19: error: too many decimal points in number
 aa,c,a:array[1..3,1..3] of real;
                   ^~~~
foo.cc:6:9: error: too many decimal points in number
 b:array[0..80]of real;
         ^~~~~
foo.cc:43:21: warning: character constant too long for its type
 if m=0 then writeln('0.000') else begin
                     ^~~~~~~
foo.cc:1:1: error: 'program' does not name a type
 program leicheng;
 ^~~~~~~
foo.cc:2:1: error: 'var' does not name a type; did you mean 'char'?
 var
 ^~~
 char
foo.cc:5:1: error: 'aa' does not name a type
 aa,c,a:array[1..3,1..3] of real;
 ^~
foo.cc:6:2: error: found ':' in nested-name-specifier, expected '::'
 b:array[0..80]of real;
  ^
foo.cc:6:1: error: 'b' does not name a type
 b:array[0..80]of real;
 ^
foo.cc:7:1: error: 'c1' does not name a type
 c1,c2,c3,s,nn,d:real;
 ^~
foo.cc:9:1: error: 'procedure' does not name a type
 procedure main;
 ^~~~~~~~~
foo.cc:10:1: error: 'var' does not name a type; did you mean 'char'?
 var i,j,k:longint;
 ^~~
 char
foo.cc:11:1: error: 'begin' does not name a type
 begin
 ^~~~~
foo.cc:16:1: error: expected unqualified-id before 'for'
 for k:=1 to 3 do
 ^~~
foo.cc:19:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:21:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:23:1: error: 'begin' does not name a type
 begin
 ^~~~~
foo.cc:25:1: error: 'a' does not name a type
 a[1,2]:=0;
 ^
foo.cc:26:1: error: 'a' does not name a type
 a[1,3]:=0;
 ^
foo.cc:27:1: error: 'a' does not name a type
 a[2,1]:=0;
 ^
foo.cc:28:1: error: 'a' does not name a type
 a[2,2]:=1;
 ^
foo.cc:29:1: error: 'a' does not name a type
 a[2,3]:=0;
 ^
foo.cc:30:1: error: 'a' does not name a type
 a[3,1]:=0;
 ^
foo.cc:31:1: error: 'a' does not name a type
 a[3,2]:=0;
 ^
foo.cc:32:1: error: 'a' does not name a type
 a[3,3]:=1;
 ^
foo.cc:33:1: error: 'aa' does not name a type
 aa[1,1]:=-2;
 ^~
foo.cc:34:1: error: 'aa' does not name a type
 aa[1,2]:=1;
 ^~
foo.cc:35:1: error: 'aa' does not name a type
 aa[1,3]:=1;
 ^~
foo.cc:36:1: error: 'aa' does not name a type
 aa[2,1]:=1;
 ^~
foo.cc:37:1: error: 'aa' does not name a type
 aa[2,2]:=0;
 ^~
foo.cc:38:1: error: 'aa' does not name a type
 aa[2,3]:=0;
 ^~
foo.cc:39:1: error: 'aa' does not name a type
 aa[3,1]:=0;
 ^~
foo.cc:40:1: error: 'aa' does not name a type
 aa[3,2]:=0;
 ^~
foo.cc:41:1: error: 'aa' does not name a type
 aa[3,3]:=1;
 ^~
foo.cc:42:5: error: expected constructor, destructor, or type conversion before '(' token
 read(n,m);
     ^
foo.cc:43:1: error: expected unqualified-id before 'if'
 if m=0 then writeln('0.000') else begin
 ^~
foo.cc:47:1: error: expected unqualified-id before 'for'
 for i:=3 to n do
 ^~~
foo.cc:50:1: error: expected unqualified-id before 'if'
 if i=m then
 ^~
foo.cc:53:1: error: 'c2' does not name a type
 c2:=c[1,2];
 ^~
foo.cc:54:1: error: 'c3' does not name a type
 c3:=c[1,3];
 ^~
foo.cc:55:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:57:1: error: expected unqualified-id before 'for'
 for ii:=1 to 3 do
 ^~~
foo.cc:60:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:61:1: error: 'b' does not name a type
 b[2]:=(b[n]-c[1,2]*b[1]-c[1,3]*2*d)/c[1,1];
 ^
foo.cc:62:1: error: 'b' does not name a type
 b[m]:=b[2]*c1+b[1]*c2+2*d*c3;
 ^
foo.cc:64:8: error: expected constructor, destructor, or type conversion before '(' token
 writeln(b[m]:8:3);
        ^
foo.cc:65:1: error: 'end' does not name a type; did you mean 'enum'?
 end;
 ^~~
 enum
foo.cc:66:1: error: 'end' does not name a type; did you mean 'enum'?
 end.
 ^~~
 enum

自豪的采用HydroJudge(https://github.com/hydro-dev/Hydro)进行评测。