/in/foo.c:1:1: error: unknown type name 'program'
 program ctsc2000;
 ^~~~~~~
/in/foo.c:2:1: error: unknown type name 'var'
 var d1,l1,d2,k,y,z,y1,b,c,d,e,r,t,n,m,i,j,l:longint;
 ^~~
/in/foo.c:2:44: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 var d1,l1,d2,k,y,z,y1,b,c,d,e,r,t,n,m,i,j,l:longint;
                                            ^
/in/foo.c:3:5: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
    a:array[1..366,1..20000]of record
     ^
/in/foo.c:3:12: error: too many decimal points in number
    a:array[1..366,1..20000]of record
            ^~~~~~
/in/foo.c:3:19: error: too many decimal points in number
    a:array[1..366,1..20000]of record
                   ^~~~~~~~
/in/foo.c:5:6: warning: data definition has no type or storage class
      end;
      ^~~
/in/foo.c:5:6: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:6:6: warning: data definition has no type or storage class
      s1,s:string;
      ^~
/in/foo.c:6:6: warning: type defaults to 'int' in declaration of 's1' [-Wimplicit-int]
/in/foo.c:6:10: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
      s1,s:string;
          ^
/in/foo.c:7:6: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
    t1:char;
      ^
/in/foo.c:8:5: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
    p:array[1..130]of longint;
     ^
/in/foo.c:8:12: error: too many decimal points in number
    p:array[1..130]of longint;
            ^~~~~~
/in/foo.c:9:4: warning: data definition has no type or storage class
    q,temp:array[0..100]of longint;
    ^
/in/foo.c:9:4: warning: type defaults to 'int' in declaration of 'q' [-Wimplicit-int]
/in/foo.c:9:10: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
    q,temp:array[0..100]of longint;
          ^
/in/foo.c:9:17: error: too many decimal points in number
    q,temp:array[0..100]of longint;
                 ^~~~~~
/in/foo.c:10:5: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
    f:array[0..366,0..732]of longint;
     ^
/in/foo.c:10:12: error: too many decimal points in number
    f:array[0..366,0..732]of longint;
            ^~~~~~
/in/foo.c:10:19: error: too many decimal points in number
    f:array[0..366,0..732]of longint;
                   ^~~~~~
/in/foo.c:11:7: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
    num:array[1..366]of integer;
       ^
/in/foo.c:11:14: error: too many decimal points in number
    num:array[1..366]of integer;
              ^~~~~~
/in/foo.c:12:1: error: unknown type name 'function'
 function calc(b,c:integer):longint;
 ^~~~~~~~
/in/foo.c:12:18: error: expected ')' before ':' token
 function calc(b,c:integer):longint;
                  ^
/in/foo.c:13:1: error: unknown type name 'var'
 var s,i:integer;
 ^~~
/in/foo.c:13:8: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 var s,i:integer;
        ^
/in/foo.c:14:1: error: unknown type name 'begin'
 begin
 ^~~~~
/in/foo.c:15:4: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
   s:=0;
    ^
/in/foo.c:16:3: error: expected identifier or '(' before 'for'
   for i:=1to b-1 do
   ^~~
/in/foo.c:16:10: error: invalid suffix "to" on integer constant
   for i:=1to b-1 do
          ^~~
/in/foo.c:18:4: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
   s:=s+c;
    ^
/in/foo.c:19:7: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
   calc:=s;
       ^
/in/foo.c:20:3: warning: data definition has no type or storage class
   end;
   ^~~
/in/foo.c:20:3: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:21:1: error: unknown type name 'procedure'
 procedure sort(w,i,j:integer);
 ^~~~~~~~~
/in/foo.c:21:21: error: expected ')' before ':' token
 procedure sort(w,i,j:integer);
                     ^
/in/foo.c:22:1: error: unknown type name 'var'
 var x,y,mid,s:longint;
 ^~~
/in/foo.c:22:14: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
 var x,y,mid,s:longint;
              ^
/in/foo.c:23:1: error: unknown type name 'begin'
 begin
 ^~~~~
/in/foo.c:24:3: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
  x:=i;
   ^
/in/foo.c:25:3: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
  y:=j;
   ^
/in/foo.c:26:5: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
  mid:=f[w,(i+j)div 2];
     ^
/in/foo.c:28:3: error: expected '=', ',', ';', 'asm' or '__attribute__' before 'while'
   while f[w,x]>mid do inc(x);
   ^~~~~
/in/foo.c:29:3: error: expected identifier or '(' before 'while'
   while f[w,y]<mid do dec(y);
   ^~~~~
/in/foo.c:30:3: error: expected identifier or '(' before 'if'
   if x<=y then
   ^~
/in/foo.c:33:6: error: 'w' undeclared here (not in a function)
    f[w,x]:=f[w,y];
      ^
/in/foo.c:33:7: error: expected ']' before ',' token
    f[w,x]:=f[w,y];
       ^
/in/foo.c:34:7: error: expected ']' before ',' token
    f[w,y]:=s;
       ^
/in/foo.c:35:4: warning: data definition has no type or storage class
    dec(y);inc(x);
    ^~~
/in/foo.c:35:4: warning: type defaults to 'int' in declaration of 'dec' [-Wimplicit-int]
/in/foo.c:35:4: warning: parameter names (without types) in function declaration
/in/foo.c:35:11: warning: data definition has no type or storage class
    dec(y);inc(x);
           ^~~
/in/foo.c:35:11: warning: type defaults to 'int' in declaration of 'inc' [-Wimplicit-int]
/in/foo.c:35:4: warning: parameter names (without types) in function declaration
    dec(y);inc(x);
    ^~~
/in/foo.c:36:4: warning: data definition has no type or storage class
    end;
    ^~~
/in/foo.c:36:4: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:37:4: error: unknown type name 'until'
    until x>y;
    ^~~~~
/in/foo.c:37:11: error: expected '=', ',', ';', 'asm' or '__attribute__' before '>' token
    until x>y;
           ^
/in/foo.c:38:3: error: expected identifier or '(' before 'if'
   if i<y then sort(w,i,y);
   ^~
/in/foo.c:39:3: error: expected identifier or '(' before 'if'
   if j>x then sort(w,x,j);
   ^~
/in/foo.c:40:3: warning: data definition has no type or storage class
   end;
   ^~~
/in/foo.c:40:3: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:41:1: error: unknown type name 'begin'
 begin
 ^~~~~
/in/foo.c:42:3: warning: parameter names (without types) in function declaration
   readln(k,t);
   ^~~~~~
/in/foo.c:43:2: warning: data definition has no type or storage class
  readln(y);
  ^~~~~~
/in/foo.c:43:2: warning: type defaults to 'int' in declaration of 'readln' [-Wimplicit-int]
/in/foo.c:43:2: warning: parameter names (without types) in function declaration
/in/foo.c:44:15: error: expected ')' before 'sizeof'
  fillchar(num,sizeof(num),0);
               ^~~~~~
/in/foo.c:45:6: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
  q[0]:=0;
      ^
/in/foo.c:46:2: error: expected identifier or '(' before 'for'
  for i:=1to 12 do
  ^~~
/in/foo.c:46:9: error: invalid suffix "to" on integer constant
  for i:=1to 12 do
         ^~~
/in/foo.c:49:4: error: expected identifier or '(' before numeric constant
    4,6,9,11:q[i]:=30;
    ^
/in/foo.c:50:4: warning: data definition has no type or storage class
    end;
    ^~~
/in/foo.c:50:4: warning: type defaults to 'int' in declaration of 'end' [-Wimplicit-int]
/in/foo.c:51:3: error: expected identifier or '(' before 'if'
   if (y mod 400=0)or ((y mod 4=0)and(y mod 100<>0))then
   ^~
/in/foo.c:54:8: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
    q[2]:=29;
        ^
/in/foo.c:56:4: error: expected '=', ',', ';', 'asm' or '__attribute__' before 'else'
    else begin q[2]:=28;y1:=365;end;
    ^~~~
/in/foo.c:56:26: error: expected '=', ',', ';', 'asm' or '__attribute__' before ':' token
    else begin q[2]:=28;y1:=365;end;
                          ^
/in/foo.c:56:32: warning: data definition has