program1.txt

词法分析器

program aaa
var xiang , mi : integer
begin
xiang := 5 ;
mi := xiang + 5 ;
end