Implementation of DFA 2/10
  case state of
    s : begin {start state}
    ...
          if symbol in ['0'..'9'] then
          begin
            state := f2; {integer}
            str := symbol;
          end else
11/35
s
integer
f2
0..9
0..9