/in/foo.cc:7:16: warning: character constant too long for its type
 if (b=1) and(k='BBRBBRBBBRRR') then writeln('Case #',b,': 5');
                ^~~~~~~~~~~~~~
/in/foo.cc:7:45: warning: character constant too long for its type
 if (b=1) and(k='BBRBBRBBBRRR') then writeln('Case #',b,': 5');
                                             ^~~~~~~~
/in/foo.cc:7:56: warning: multi-character character constant [-Wmultichar]
 if (b=1) and(k='BBRBBRBBBRRR') then writeln('Case #',b,': 5');
                                                        ^~~~~
/in/foo.cc:1:1: error: 'var' does not name a type
 var
 ^~~
/in/foo.cc:3:2: error: found ':' in nested-name-specifier, expected '::'
 k:string;
  ^
/in/foo.cc:3:1: error: 'k' does not name a type
 k:string;
 ^
/in/foo.cc:4:1: error: 'begin' does not name a type
 begin
 ^~~~~
/in/foo.cc:6:7: error: expected constructor, destructor, or type conversion before '(' token
 readln(k);
       ^
/in/foo.cc:7:1: error: expected unqualified-id before 'if'
 if (b=1) and(k='BBRBBRBBBRRR') then writeln('Case #',b,': 5');
 ^~
/in/foo.cc:8:1: error: 'end' does not name a type
 end.
 ^~~