/in/foo.cc:32:15: warning: character constant too long for its type
       writeln('Lucky Word');
               ^~~~~~~~~~~~
/in/foo.cc:37:15: warning: character constant too long for its type
       writeln('No Answer');
               ^~~~~~~~~~~
/in/foo.cc:1:1: error: 'var' does not name a type
 var
 ^~~
/in/foo.cc:3:6: error: found ':' in nested-name-specifier, expected '::'
   tot:array['a'..'z'] of integer;
      ^
/in/foo.cc:3:3: error: 'tot' does not name a type
   tot:array['a'..'z'] of integer;
   ^~~
/in/foo.cc:4:3: error: 'len' does not name a type
   len,max,min,i,j:integer;
   ^~~
/in/foo.cc:5:3: error: 'ch' does not name a type
   ch:char;
   ^~
/in/foo.cc:7:1: error: 'function' does not name a type
 function prime(x:integer):boolean;
 ^~~~~~~~
/in/foo.cc:8:1: error: 'var' does not name a type
 var
 ^~~
/in/foo.cc:10:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:12:3: error: 'prime' does not name a type
   prime:=true;
   ^~~~~
/in/foo.cc:13:3: error: expected unqualified-id before 'for'
   for i:=2 to trunc(sqrt(x)) do
   ^~~
/in/foo.cc:15:27: error: expected unqualified-id before 'break'
       begin prime:=false; break end;
                           ^~~~~
/in/foo.cc:16:1: error: 'end' does not name a type
 end;
 ^~~
/in/foo.cc:18:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:20:3: error: 'len' does not name a type
   len:=length(st);
   ^~~
/in/foo.cc:21:11: error: expected constructor, destructor, or type conversion before '(' token
   fillchar(tot,0,sizeof(tot));
           ^
/in/foo.cc:22:3: error: expected unqualified-id before 'for'
   for i:=1 to len do
   ^~~
/in/foo.cc:24:3: error: 'max' does not name a type
   max:=0;  min:=1000;
   ^~~
/in/foo.cc:24:12: error: 'min' does not name a type
   max:=0;  min:=1000;
            ^~~
/in/foo.cc:25:3: error: expected unqualified-id before 'for'
   for ch:='a' to 'z' do
   ^~~
/in/foo.cc:28:7: error: expected unqualified-id before 'if'
       if (tot[ch]>0) and (tot[ch]<min) then min:=tot[ch]
       ^~
/in/foo.cc:30:3: error: expected unqualified-id before 'if'
   if prime(max-min) then
   ^~
/in/foo.cc:33:14: error: expected constructor, destructor, or type conversion before '(' token
       writeln(max-min)
              ^
/in/foo.cc:38:14: error: expected constructor, destructor, or type conversion before '(' token
       writeln(0)
              ^