automato e tokenizer do Pascal