program t22; var x : integer; begin x := 1; case x of 1 : writeln('a'); 2 : writeln('b') end end.