/in/foo.c:1:1: error: unknown type name 'program'
 program s1140;
 ^~~~~~~
/in/foo.c:3:1: error: unknown type name 'var'
 var i,j,l,k,m,n:longint;
 ^~~
/in/foo.c:3:16: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 var i,j,l,k,m,n:longint;
                ^
/in/foo.c:5:4: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 wei:qword;
    ^
/in/foo.c:7:2: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 w:array[0..4] of real;
  ^
/in/foo.c:7:9: error: too many decimal points in number
 w:array[0..4] of real;
         ^~~~
/in/foo.c:9:1: warning: data definition has no type or storage class
 flag,mss:boolean;
 ^~~~
/in/foo.c:9:1: warning: type defaults to 'int' in declaration of 'flag' [-Wimplicit-int]
/in/foo.c:9:9: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 flag,mss:boolean;
         ^
/in/foo.c:11:1: error: unknown type name 'function'
 function check(x:real):boolean;
 ^~~~~~~~
/in/foo.c:11:17: error: expected ')' before ':' token
 function check(x:real):boolean;
                 ^
/in/foo.c:13:1: error: unknown type name 'var'
 var a,b:longint;
 ^~~
/in/foo.c:13:8: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 var a,b:longint;
        ^
/in/foo.c:15:1: error: unknown type name 'begin'
 begin
 ^~~~~
/in/foo.c:17:2: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 b:=0;a:=0;
  ^
/in/foo.c:17:7: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 b:=0;a:=0;
       ^
/in/foo.c:19:1: error: expected identifier or '(' before 'if'
 if abs(x-round(x))>0.001 then exit(false);
 ^~
/in/foo.c:21:1: error: expected identifier or '(' before 'if'
 if x=10*wei then exit(false);
 ^~
/in/foo.c:23:2: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 b:=round(x) mod 100;
  ^
/in/foo.c:25:1: error: expected identifier or '(' before 'if'
 if bm then exit(false);
 ^~
/in/foo.c:27:1: warning: data definition has no type or storage class
 exit(true);
 ^~~~
/in/foo.c:27:1: warning: type defaults to 'int' in declaration of 'exit' [-Wimplicit-int]
/in/foo.c:27:1: warning: parameter names (without types) in function declaration
/in/foo.c:27:1: warning: conflicting types for built-in function 'exit'
/in/foo.c:29:1: warning: data definition has no type or storage class
 end;
 ^~~
/in/foo.c:29:1: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:31:1: error: unknown type name 'function'
 function ww(o:integer;x,y:real):real;
 ^~~~~~~~
/in/foo.c:31:14: error: expected ')' before ':' token
 function ww(o:integer;x,y:real):real;
              ^
/in/foo.c:35:1: error: expected '=', ',', ';', 'asm' or '__attribute__' before 'if'
 if (o=4) and (y=0) then begin flag:=true; exit(0); end;
 ^~
/in/foo.c:35:48: error: expected declaration specifiers or '...' before numeric constant
 if (o=4) and (y=0) then begin flag:=true; exit(0); end;
                                                ^
/in/foo.c:35:52: warning: data definition has no type or storage class
 if (o=4) and (y=0) then begin flag:=true; exit(0); end;
                                                    ^~~
/in/foo.c:35:52: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:37:1: error: expected identifier or '(' before 'if'
 if (o=6) and (x=0) then begin flag:=true; exit(0); end;
 ^~
/in/foo.c:37:48: error: expected declaration specifiers or '...' before numeric constant
 if (o=6) and (x=0) then begin flag:=true; exit(0); end;
                                                ^
/in/foo.c:37:52: warning: data definition has no type or storage class
 if (o=6) and (x=0) then begin flag:=true; exit(0); end;
                                                    ^~~
/in/foo.c:37:52: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:39:1: error: expected identifier or '(' before 'case'
 case o of
 ^~~~
/in/foo.c:43:1: error: expected identifier or '(' before numeric constant
 2: exit(x-y);
 ^
/in/foo.c:45:1: error: expected identifier or '(' before numeric constant
 3: exit(x*y);
 ^
/in/foo.c:47:1: error: expected identifier or '(' before numeric constant
 4: exit(x/y);
 ^
/in/foo.c:49:1: error: expected identifier or '(' before numeric constant
 5: exit(y-x);
 ^
/in/foo.c:51:1: error: expected identifier or '(' before numeric constant
 6: exit(y/x);
 ^
/in/foo.c:53:1: warning: data definition has no type or storage class
 end;
 ^~~
/in/foo.c:53:1: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:55:1: warning: data definition has no type or storage class
 end;
 ^~~
/in/foo.c:55:1: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:57:1: error: unknown type name 'procedure'
 procedure search(x,y,z,v:longint);
 ^~~~~~~~~
/in/foo.c:57:25: error: expected ')' before ':' token
 procedure search(x,y,z,v:longint);
                         ^
/in/foo.c:59:1: error: unknown type name 'var'
 var i,j,l,k:longint;
 ^~~
/in/foo.c:59:12: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 var i,j,l,k:longint;
            ^
/in/foo.c:61:1: warning: data definition has no type or storage class
 a,b,c,d,ans:real;
 ^
/in/foo.c:61:1: warning: type defaults to 'int' in declaration of 'a' [-Wimplicit-int]
/in/foo.c:61:3: warning: type defaults to 'int' in declaration of 'b' [-Wimplicit-int]
 a,b,c,d,ans:real;
   ^
/in/foo.c:61:5: warning: type defaults to 'int' in declaration of 'c' [-Wimplicit-int]
 a,b,c,d,ans:real;
     ^
/in/foo.c:61:7: warning: type defaults to 'int' in declaration of 'd' [-Wimplicit-int]
 a,b,c,d,ans:real;
       ^
/in/foo.c:61:12: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 a,b,c,d,ans:real;
            ^
/in/foo.c:63:1: error: unknown type name 'begin'
 begin
 ^~~~~
/in/foo.c:65:4: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 ans:=0;
    ^
/in/foo.c:67:2: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 a:=w[x]; b:=w[y]; c:=w[z]; d:=w[v];
  ^
/in/foo.c:67:11: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 a:=w[x]; b:=w[y]; c:=w[z]; d:=w[v];
           ^
/in/foo.c:67:20: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 a:=w[x]; b:=w[y]; c:=w[z]; d:=w[v];
                    ^
/in/foo.c:67:29: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 a:=w[x]; b:=w[y]; c:=w[z]; d:=w[v];
                             ^
/in/foo.c:69:1: error: expected identifier or '(' before 'for'
 for i:=1 to 6 do
 ^~~
/in/foo.c:79:1: error: expected identifier or '(' before 'if'
 if check(ans) then begin writeln(1); mss:=true; exit; end;
 ^~
/in/foo.c:79:41: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 if check(ans) then begin writeln(1); mss:=true; exit; end;
                                         ^
/in/foo.c:79:49: warning: data definition has no type or storage class
 if check(ans) then begin writeln(1); mss:=true; exit; end;
                                                 ^~~~
/in/foo.c:79:49: warning: type defaults to 'int' in declaration of 'exit' [-Wimplicit-int]
/in/foo.c:79:49: error: 'exit' redeclared as different kind of symbol
/in/foo.c:27:1: note: previous declaration of 'exit' was here
 exit(true);
 ^~~~
/in/foo.c:79:55: warning: data definition has no type or storage class
 if check(ans) then begin writeln(1); mss:=true; exit; end;
                                                       ^~~
/in/foo.c:79:55: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:81:4: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 ans:=ww(k,ww(i,a,b),ww(j,c,d));
    ^
/in/foo.c:83:1: error: expected identifier or '(' before 'if'
 if check(ans) then begin writeln(1); mss:=true; exit; end;
 ^~
/in/foo.c:83:41: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 if check(ans) then begin writeln(1); mss:=true; exit; end;