/in/foo.c:1:1: error: unknown type name 'var'
 var
 ^~~
/in/foo.c:2:5: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
  rec:array[0..1002,0..1002] of longint;
     ^
/in/foo.c:2:12: error: too many decimal points in number
  rec:array[0..1002,0..1002] of longint;
            ^~~~~~~
/in/foo.c:2:20: error: too many decimal points in number
  rec:array[0..1002,0..1002] of longint;
                    ^~~~~~~
/in/foo.c:3:2: warning: data definition has no type or storage class
  a,b,m,n,k,i,r:longint;
  ^
/in/foo.c:3:2: warning: type defaults to 'int' in declaration of 'a' [-Wimplicit-int]
/in/foo.c:3:4: warning: type defaults to 'int' in declaration of 'b' [-Wimplicit-int]
  a,b,m,n,k,i,r:longint;
    ^
/in/foo.c:3:6: warning: type defaults to 'int' in declaration of 'm' [-Wimplicit-int]
  a,b,m,n,k,i,r:longint;
      ^
/in/foo.c:3:8: warning: type defaults to 'int' in declaration of 'n' [-Wimplicit-int]
  a,b,m,n,k,i,r:longint;
        ^
/in/foo.c:3:10: warning: type defaults to 'int' in declaration of 'k' [-Wimplicit-int]
  a,b,m,n,k,i,r:longint;
          ^
/in/foo.c:3:12: warning: type defaults to 'int' in declaration of 'i' [-Wimplicit-int]
  a,b,m,n,k,i,r:longint;
            ^
/in/foo.c:3:15: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
  a,b,m,n,k,i,r:longint;
               ^
/in/foo.c:4:3: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
  w:text;
   ^
/in/foo.c:5:1: error: unknown type name 'begin'
 begin
 ^~~~~
/in/foo.c:7:2: warning: parameter names (without types) in function declaration
  read(a,b,k,n,m);
  ^~~~
/in/foo.c:9:15: error: expected ')' before 'sizeof'
  fillchar(rec,sizeof(rec),0);
               ^~~~~~
/in/foo.c:10:7: error: expected ']' before ',' token
  rec[1,1]:=a; rec[1,2]:=b;
       ^
/in/foo.c:10:20: error: expected ']' before ',' token
  rec[1,1]:=a; rec[1,2]:=b;
                    ^
/in/foo.c:12:1: error: expected identifier or '(' before 'for'
 for i:=2 to k do
 ^~~
/in/foo.c:15:10: error: expected ']' before ',' token
     rec[i,r]:=rec[i,r] mod 10007;
          ^
/in/foo.c:16:2: warning: data definition has no type or storage class
  end;
  ^~~
/in/foo.c:16:2: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:18:7: error: unknown type name 'rec'
 write(rec[k,k-n+1]);
       ^~~
/in/foo.c:20:4: error: expected '=', ',', ';', 'asm' or '__attribute__' before '.' token
 end.
    ^