/in/foo.cc:3:17: error: too many decimal points in number
 type arr=array [1..20000] of longint;
                 ^~~~~~~~
/in/foo.cc:11:12: error: too many decimal points in number
 a,b:array [1..20000] of longint;
            ^~~~~~~~
/in/foo.cc:29:21: warning: character constant too long for its type
 if l=q then writeln('V.I.P. should stay at (',t1:0:1,',',t2:0:1,').') else writeln('This is a dangerous situation!');
                     ^~~~~~~~~~~~~~~~~~~~~~~~~
/in/foo.cc:29:65: warning: multi-character character constant [-Wmultichar]
 if l=q then writeln('V.I.P. should stay at (',t1:0:1,',',t2:0:1,').') else writeln('This is a dangerous situation!');
                                                                 ^~~~
/in/foo.cc:29:84: warning: character constant too long for its type
 if l=q then writeln('V.I.P. should stay at (',t1:0:1,',',t2:0:1,').') else writeln('This is a dangerous situation!');
                                                                                    ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
/in/foo.cc:31:18: warning: character constant too long for its type
 end else writeln('This is a dangerous situation!');
                  ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
/in/foo.cc:1:1: error: 'program' does not name a type
 program p1100;
 ^~~~~~~
/in/foo.cc:3:1: error: 'type' does not name a type
 type arr=array [1..20000] of longint;
 ^~~~
/in/foo.cc:5:1: error: 'var' does not name a type
 var
 ^~~
/in/foo.cc:9:1: error: 't1' does not name a type
 t1,t2:real;
 ^~
/in/foo.cc:11:1: error: 'a' does not name a type
 a,b:array [1..20000] of longint;
 ^
/in/foo.cc:13:1: error: 'procedure' does not name a type
 procedure qsort(var a:arr;l,r:longint);
 ^~~~~~~~~
/in/foo.cc:13:27: error: 'l' does not name a type
 procedure qsort(var a:arr;l,r:longint);
                           ^
/in/foo.cc:15:1: error: 'var' does not name a type
 var i,j,m,p:longint;
 ^~~
/in/foo.cc:17: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;
       ^
/in/foo.cc:21:1: error: 'm' does not name a type
 m:=a[l];
 ^
/in/foo.cc:23:1: error: 'repeat' does not name a type
 repeat
 ^~~~~~
/in/foo.cc:27:1: error: expected unqualified-id before 'if'
 if ij;
 ^~
/in/foo.cc:29:1: error: expected unqualified-id before 'if'
 if l=q then writeln('V.I.P. should stay at (',t1:0:1,',',t2:0:1,').') else writeln('This is a dangerous situation!');
 ^~
/in/foo.cc:31:1: error: 'end' does not name a type
 end else writeln('This is a dangerous situation!');
 ^~~
/in/foo.cc:33:1: error: 'end' does not name a type
 end.
 ^~~