/in/foo.cc:7:9: error: too many decimal points in number
 a:array[0..300001] of node;
         ^~~~~~~~~
/in/foo.cc:8:9: error: too many decimal points in number
 b:array[1..100000] of string;
         ^~~~~~~~~
/in/foo.cc:9:30: error: too many decimal points in number
 c,num,order,leng,ll,rr:array[0..100001] of longint;
                              ^~~~~~~~~
/in/foo.cc:1:1: error: 'type' does not name a type
 type
 ^~~~
/in/foo.cc:4:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:6:1: error: 'var' does not name a type
 var
 ^~~
/in/foo.cc:8:2: error: found ':' in nested-name-specifier, expected '::'
 b:array[1..100000] of string;
  ^
/in/foo.cc:8:1: error: 'b' does not name a type
 b:array[1..100000] of string;
 ^
/in/foo.cc:9:1: error: 'c' does not name a type
 c,num,order,leng,ll,rr:array[0..100001] of longint;
 ^
/in/foo.cc:10:1: error: 'n' does not name a type
 n,i,s,j:longint;
 ^
/in/foo.cc:11:3: error: found ':' in nested-name-specifier, expected '::'
 st:string;
   ^
/in/foo.cc:11:1: error: 'st' does not name a type
 st:string;
 ^~
/in/foo.cc:12:5: error: found ':' in nested-name-specifier, expected '::'
 code:integer;
     ^
/in/foo.cc:12:1: error: 'code' does not name a type
 code:integer;
 ^~~~
/in/foo.cc:14:1: error: 'procedure' does not name a type
 procedure sort(l,r:longint);
 ^~~~~~~~~
/in/foo.cc:15:1: error: 'var' does not name a type
 var
 ^~~
/in/foo.cc:17:1: error: 'x' does not name a type
 x,yy:string;
 ^
/in/foo.cc:18:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:19:7: error: 'j' does not name a type
 i:=l; j:=r; x:=b[(l+r) div 2];
       ^
/in/foo.cc:19:13: error: 'x' does not name a type
 i:=l; j:=r; x:=b[(l+r) div 2];
             ^
/in/foo.cc:20:1: error: 'repeat' does not name a type
 repeat
 ^~~~~~
/in/foo.cc:22:1: error: expected unqualified-id before 'while'
 while x<b[j] do dec(j);
 ^~~~~
/in/foo.cc:23:1: error: expected unqualified-id before 'if'
 if not(i>j) then
 ^~
/in/foo.cc:25:12: error: 'num' does not name a type
 y:=num[i]; num[i]:=num[j]; num[j]:=y;
            ^~~
/in/foo.cc:25:28: error: 'num' does not name a type
 y:=num[i]; num[i]:=num[j]; num[j]:=y;
                            ^~~
/in/foo.cc:26:1: error: 'y' does not name a type
 y:=order[i]; order[i]:=order[j]; order[j]:=y;
 ^
/in/foo.cc:26:14: error: 'order' does not name a type
 y:=order[i]; order[i]:=order[j]; order[j]:=y;
              ^~~~~
/in/foo.cc:26:34: error: 'order' does not name a type
 y:=order[i]; order[i]:=order[j]; order[j]:=y;
                                  ^~~~~
/in/foo.cc:27:1: error: 'y' does not name a type
 y:=leng[i]; leng[i]:=leng[j]; leng[j]:=y;
 ^
/in/foo.cc:27:13: error: 'leng' does not name a type
 y:=leng[i]; leng[i]:=leng[j]; leng[j]:=y;
             ^~~~
/in/foo.cc:27:31: error: 'leng' does not name a type
 y:=leng[i]; leng[i]:=leng[j]; leng[j]:=y;
                               ^~~~
/in/foo.cc:28:1: error: 'yy' does not name a type
 yy:=b[i]; b[i]:=b[j]; b[j]:=yy;
 ^~
/in/foo.cc:28:11: error: 'b' does not name a type
 yy:=b[i]; b[i]:=b[j]; b[j]:=yy;
           ^
/in/foo.cc:28:23: error: 'b' does not name a type
 yy:=b[i]; b[i]:=b[j]; b[j]:=yy;
                       ^
/in/foo.cc:29:4: error: expected constructor, destructor, or type conversion before '(' token
 inc(i); dec(j);
    ^
/in/foo.cc:29:12: error: expected constructor, destructor, or type conversion before '(' token
 inc(i); dec(j);
            ^
/in/foo.cc:30:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:31:1: error: 'until' does not name a type
 until i>j;
 ^~~~~
/in/foo.cc:32:1: error: expected unqualified-id before 'if'
 if l<j then
 ^~
/in/foo.cc:34:1: error: expected unqualified-id before 'if'
 if i<r then
 ^~
/in/foo.cc:36:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:38:1: error: 'procedure' does not name a type
 procedure sort1(l,r:longint);
 ^~~~~~~~~
/in/foo.cc:39:1: error: 'var' does not name a type
 var
 ^~~
/in/foo.cc:41:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:42:7: error: 'j' does not name a type
 i:=l; j:=r; x:=num[(l+r) div 2];
       ^
/in/foo.cc:42:13: error: 'x' does not name a type
 i:=l; j:=r; x:=num[(l+r) div 2];
             ^
/in/foo.cc:43:1: error: 'repeat' does not name a type
 repeat
 ^~~~~~
/in/foo.cc:45:1: error: expected unqualified-id before 'while'
 while x<num[j] do dec(j);
 ^~~~~
/in/foo.cc:46:1: error: expected unqualified-id before 'if'
 if not(i>j) then
 ^~
/in/foo.cc:48:12: error: 'num' does not name a type
 y:=num[i]; num[i]:=num[j]; num[j]:=y;
            ^~~
/in/foo.cc:48:28: error: 'num' does not name a type
 y:=num[i]; num[i]:=num[j]; num[j]:=y;
                            ^~~
/in/foo.cc:49:1: error: 'y' does not name a type
 y:=order[i]; order[i]:=order[j]; order[j]:=y;
 ^
/in/foo.cc:49:14: error: 'order' does not name a type
 y:=order[i]; order[i]:=order[j]; order[j]:=y;
              ^~~~~
/in/foo.cc:49:34: error: 'order' does not name a type
 y:=order[i]; order[i]:=order[j]; order[j]:=y;
                                  ^~~~~
/in/foo.cc:50:1: error: 'y' does not name a type
 y:=leng[i]; leng[i]:=leng[j]; leng[j]:=y;
 ^
/in/foo.cc:50:13: error: 'leng' does not name a type
 y:=leng[i]; leng[i]:=leng[j]; leng[j]:=y;
             ^~~~
/in/foo.cc:50:31: error: 'leng' does not name a type
 y:=leng[i]; leng[i]:=leng[j]; leng[j]:=y;
                               ^~~~
/in/foo.cc:51:1: error: 'y' does not name a type
 y:=c[i]; c[i]:=c[j]; c[j]:=y;
 ^
/in/foo.cc:51:10: error: 'c' does not name a type
 y:=c[i]; c[i]:=c[j]; c[j]:=y;
          ^
/in/foo.cc:51:22: error: 'c' does not name a type
 y:=c[i]; c[i]:=c[j]; c[j]:=y;
                      ^
/in/foo.cc:52:4: error: expected constructor, destructor, or type conversion before '(' token
 inc(i); dec(j);
    ^
/in/foo.cc:52:12: error: expected constructor, destructor, or type conversion before '(' token
 inc(i); dec(j);
            ^
/in/foo.cc:53:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:54:1: error: 'until' does not name a type
 until i>j;
 ^~~~~
/in/foo.cc:55:1: error: expected unqualified-id before 'if'
 if l<j then
 ^~
/in/foo.cc:57:1: error: expected unqualified-id before 'if'
 if i<r then
 ^~
/in/foo.cc:59:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:61:1: error: 'procedure' does not name a type
 procedure build(k,left,right:longint);
 ^~~~~~~~~
/in/foo.cc:62:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:63:15: error: 'a' does not name a type
 a[k].l:=left; a[k].r:=right; a[k].m:=(left+right) div 2;
               ^
/in/foo.cc:63:30: error: 'a' does not name a type
 a[k].l:=left; a[k].r:=right; a[k].m:=(left+right) div 2;
                              ^
/in/foo.cc:64:1: error: 'a' does not name a type
 a[k].llen:=right-left+1; a[k].rlen:=a[k].llen; a[k].maxlen:=a[k].rlen;
 ^
/in/foo.cc:64:26: error: 'a' does not name a type
 a[k].llen:=right-left+1; a[k].rlen:=a[k].llen; a[k].maxlen:=a[k].rlen;
                          ^
/in/foo.cc:64:48: error: 'a' does not name a type
 a[k].llen:=right-left+1; a[k].rlen:=a[k].llen; a[k].maxlen:=a[k].rlen;
                                                ^
/in/foo.cc:65:1: error: expected unqualified-id before 'if'
 if left=right then exit;
 ^~
/in/foo.cc:66:6: error: expected constructor, destructor, or type conversion before '(' token
 build(k shl 1,left,a[k].m); build(k shl 1+1,a[k].m+1,right);
      ^
/in/foo.cc:66:34: error: expected constructor, destructor, or type conversion before '(' token
 build(k shl 1,left,a[k].m); build(k shl 1+1,a[k].m+1,right);
                                  ^
/in/foo.cc:67:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:69:1: error: 'function' does not name a type
 function max(t1,t2:longint):longint;
 ^~~~~~~~
/in/foo.cc:70:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:72:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:74:1: error: 'function' does not name a type
 function find(k,len:longint):longint;
 ^~~~~~~~
/in/foo.cc:75:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:77:1: error: expected unqualified-id before 'i