/in/foo.c:6:2: error: unknown type name 'var'
 }var w,r,minn,i,j,n,m:longint;
  ^~~
/in/foo.c:6:22: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 }var w,r,minn,i,j,n,m:longint;
                      ^
/in/foo.c:7:2: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 c:array[0..16] of longint;
  ^
/in/foo.c:7:9: error: too many decimal points in number
 c:array[0..16] of longint;
         ^~~~~
/in/foo.c:8:1: warning: data definition has no type or storage class
 a,b,s,f:array[0..16,0..16] of longint;
 ^
/in/foo.c:8:1: warning: type defaults to 'int' in declaration of 'a' [-Wimplicit-int]
/in/foo.c:8:3: warning: type defaults to 'int' in declaration of 'b' [-Wimplicit-int]
 a,b,s,f:array[0..16,0..16] of longint;
   ^
/in/foo.c:8:5: warning: type defaults to 'int' in declaration of 's' [-Wimplicit-int]
 a,b,s,f:array[0..16,0..16] of longint;
     ^
/in/foo.c:8:8: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 a,b,s,f:array[0..16,0..16] of longint;
        ^
/in/foo.c:8:15: error: too many decimal points in number
 a,b,s,f:array[0..16,0..16] of longint;
               ^~~~~
/in/foo.c:8:21: error: too many decimal points in number
 a,b,s,f:array[0..16,0..16] of longint;
                     ^~~~~
/in/foo.c:9:1: error: unknown type name 'function'
 function min(x,y:longint):longint;
 ^~~~~~~~
/in/foo.c:9:17: error: expected ')' before ':' token
 function min(x,y:longint):longint;
                 ^
/in/foo.c:11:1: error: expected '=', ',', ';', 'asm' or '__attribute__' before 'if'
 if x>y then exit(y) else exit(x);
 ^~
/in/foo.c:12:1: warning: data definition has no type or storage class
 end;
 ^~~
/in/foo.c:12:1: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:13:1: error: unknown type name 'procedure'
 procedure dp;
 ^~~~~~~~~
/in/foo.c:14:1: error: unknown type name 'var'
 var i,sum,j,k:longint;
 ^~~
/in/foo.c:14:14: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 var i,sum,j,k:longint;
              ^
/in/foo.c:15:1: error: unknown type name 'begin'
 begin
 ^~~~~
/in/foo.c:16:12: error: expected ')' before 'sizeof'
 fillchar(s,sizeof(s),0);
            ^~~~~~
/in/foo.c:17:1: error: expected identifier or '(' before 'for'
 for i:=1 to m do
 ^~~
/in/foo.c:21:1: error: expected identifier or '(' before 'for'
 for k:=1 to r-1 do s[i,j]:=s[i,j]+abs(b[k,i]-b[k+1,i]);
 ^~~
/in/foo.c:22:1: warning: data definition has no type or storage class
 end;
 ^~~
/in/foo.c:22:1: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:23:12: error: expected ')' before 'sizeof'
 fillchar(f,sizeof(f),12);
            ^~~~~~
/in/foo.c:24:1: error: expected identifier or '(' before 'for'
 for i:=1 to m do f[1,i]:=s[i,i];
 ^~~
/in/foo.c:25:1: error: expected identifier or '(' before 'for'
 for i:=2 to w do
 ^~~
/in/foo.c:29:1: error: expected identifier or '(' before 'for'
 for i:=w to m do
 ^~~
/in/foo.c:32:1: error: unknown type name 'procedure'
 procedure dfsr(x,s:longint);
 ^~~~~~~~~
/in/foo.c:32:19: error: expected ')' before ':' token
 procedure dfsr(x,s:longint);
                   ^
/in/foo.c:33:1: error: unknown type name 'var'
 var i:longint;
 ^~~
/in/foo.c:33:6: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 var i:longint;
      ^
/in/foo.c:35:1: error: expected '=', ',', ';', 'asm' or '__attribute__' before 'if'
 if s=r then
 ^~
/in/foo.c:38:1: warning: data definition has no type or storage class
 exit;
 ^~~~
/in/foo.c:38:1: warning: type defaults to 'int' in declaration of 'exit' [-Wimplicit-int]
/in/foo.c:38:1: warning: built-in function 'exit' declared as non-function
/in/foo.c:39:1: warning: data definition has no type or storage class
 end;
 ^~~
/in/foo.c:39:1: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:40:1: error: expected identifier or '(' before 'if'
 if x=n+1 then exit;
 ^~
/in/foo.c:41:1: error: expected identifier or '(' before 'for'
 for i:=0 to 1 do
 ^~~
/in/foo.c:44:7: error: expected ')' before '+' token
 dfsr(x+1,s+i);
       ^
/in/foo.c:45:1: warning: data definition has no type or storage class
 end;
 ^~~
/in/foo.c:45:1: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:46:1: warning: data definition has no type or storage class
 end;
 ^~~
/in/foo.c:46:1: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:50:1: warning: missing terminating ' character
 ');
 ^
/in/foo.c:50:1: error: missing terminating ' character
 ');
 ^~~
/in/foo.c:47:1: error: unknown type name 'begin'
 begin
 ^~~~~
/in/foo.c:54:1: warning: parameter names (without types) in function declaration
 readln(n,m,r,w);
 ^~~~~~
/in/foo.c:55:1: error: expected identifier or '(' before 'for'
 for i:=1 to n do
 ^~~
/in/foo.c:57:5: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 minn:=maxlongint;
     ^
/in/foo.c:58:6: error: expected declaration specifiers or '...' before numeric constant
 dfsr(1,0);
      ^
/in/foo.c:58:8: error: expected declaration specifiers or '...' before numeric constant
 dfsr(1,0);
        ^
/in/foo.c:59:1: warning: data definition has no type or storage class
 writeln(minn);
 ^~~~~~~
/in/foo.c:59:1: warning: type defaults to 'int' in declaration of 'writeln' [-Wimplicit-int]
/in/foo.c:59:1: warning: parameter names (without types) in function declaration
/in/foo.c:62:4: error: expected '=', ',', ';', 'asm' or '__attribute__' before '.' token
 end.
    ^