input.txt

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

 program test ;
 integer i ;
 var j ;
 real k ;
 if i > j
j = i
 end ;