Implementace DKA 10/10
  case state of
    ...
    p : begin {komentář}
          if symbol = '}' then
            state := s; {počáteční stav}
        end; {stav p}
until EOF;
...
end;
19/35
s
{
}
S  – }
p