/in/foo.cc:1:52: error: too many decimal points in number
 var e,i,j,k,l,m,n:longint;ss,s,t,ou:string;a:array[1..100]of string;
                                                    ^~~~~~
/in/foo.cc:21:9: error: empty character constant
 while (s'') do
         ^~
/in/foo.cc:1:1: error: 'var' does not name a type
 var e,i,j,k,l,m,n:longint;ss,s,t,ou:string;a:array[1..100]of string;
 ^~~
/in/foo.cc:1:27: error: 'ss' does not name a type
 var e,i,j,k,l,m,n:longint;ss,s,t,ou:string;a:array[1..100]of string;
                           ^~
/in/foo.cc:1:45: error: found ':' in nested-name-specifier, expected '::'
 var e,i,j,k,l,m,n:longint;ss,s,t,ou:string;a:array[1..100]of string;
                                             ^
/in/foo.cc:1:44: error: 'a' does not name a type
 var e,i,j,k,l,m,n:longint;ss,s,t,ou:string;a:array[1..100]of string;
                                            ^
/in/foo.cc:2:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:5:7: error: expected constructor, destructor, or type conversion before '(' token
 readln(s);
       ^
/in/foo.cc:7:1: error: expected unqualified-id before 'for'
 for i:=1 to n do
 ^~~
/in/foo.cc:9:20: error: expected unqualified-id before 'if'
 begin readln(a[i]);if a=' ' then delete(a[i],length(a[i]),10);end;
                    ^~
/in/foo.cc:9:63: error: 'end' does not name a type
 begin readln(a[i]);if a=' ' then delete(a[i],length(a[i]),10);end;
                                                               ^~~
/in/foo.cc:11:1: error: 'a' does not name a type
 a[1,1]:=chr(ord(a[1,1])-32);
 ^
/in/foo.cc:13:1: error: expected unqualified-id before '{' token
 {error num}e:=0;
 ^
/in/foo.cc:13:12: error: 'e' does not name a type
 {error num}e:=0;
            ^
/in/foo.cc:15:1: error: expected unqualified-id before 'if'
 if s[length(s)]=' ' then delete(s,length(s),10);
 ^~
/in/foo.cc:17:1: error: 's' does not name a type
 s:=s+' ';
 ^
/in/foo.cc:19:1: error: 'i' does not name a type
 i:=1;j:=pos(' ',s);
 ^
/in/foo.cc:19:6: error: 'j' does not name a type
 i:=1;j:=pos(' ',s);
      ^
/in/foo.cc:21:1: error: expected unqualified-id before 'while'
 while (s'') do
 ^~~~~
/in/foo.cc:25:20: error: expected unqualified-id before 'if'
 t:=copy(s,i,(j-i));if t=' ' then break;
                    ^~
/in/foo.cc:27:1: error: expected unqualified-id before 'for'
 for k:=1 to n do
 ^~~
/in/foo.cc:35:1: error: expected unqualified-id before 'for'
 for l:=1 to length(t) do
 ^~~
/in/foo.cc:39:1: error: expected unqualified-id before 'if'
 if m=1 then
 ^~
/in/foo.cc:41:14: error: 't' does not name a type
 begin inc(e);t:=a[k];end;
              ^
/in/foo.cc:41:22: error: 'end' does not name a type
 begin inc(e);t:=a[k];end;
                      ^~~
/in/foo.cc:43:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:45:1: error: expected unqualified-id before 'delete'
 delete(s,i,(j-i)+1);
 ^~~~~~
/in/foo.cc:47:1: error: 'ou' does not name a type
 ou:=ou+t;ou:=ou+' ';
 ^~
/in/foo.cc:47:10: error: 'ou' does not name a type
 ou:=ou+t;ou:=ou+' ';
          ^~
/in/foo.cc:49:1: error: 'i' does not name a type
 i:=1;j:=pos(' ',s);
 ^
/in/foo.cc:49:6: error: 'j' does not name a type
 i:=1;j:=pos(' ',s);
      ^
/in/foo.cc:50:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:52:1: error: expected unqualified-id before 'delete'
 delete(ou,length(ou),1);
 ^~~~~~
/in/foo.cc:54:8: error: expected constructor, destructor, or type conversion before '(' token
 writeln(e);
        ^
/in/foo.cc:56:8: error: expected constructor, destructor, or type conversion before '(' token
 writeln(ou);
        ^
/in/foo.cc:58:1: error: 'end' does not name a type
 end.
 ^~~