input2.txt

词 法 分 析 器 Delphi7.0 很好的 东西 啊

 const 
   g = 9.8;
    answer = ' y ';
     maximum = 16*100-1;
      name = ' x ';
       b =-maximum ;
        charnum = ord (' z ')- ord (' a ')+1;