test2.txt

编译原理中的语法分析

program p;
var a,b:integer;
procedure p1(a:integer;);{分程序中有参数列表的情况}
begin{这是分程序的复合语句}
a:=4;
if a<1 then b:=a+2 else b:=3;
end;.