app.pas

此程序为LR递归下降程序

 program A;
	var x1,y1;
	procedure AB(x2,y2);
		var x3,y3;
		begin
		end
	procedure ABC(x7,y7);
		var x4,y4;
		procedure ABCD(x5,y5);
			var x6,y6;
			begin
			end
	begin
	end
	procedure A1(xx7,xy7);
		var xx4,xy4;
		procedure A2(xx5,xy5);
			var xx6,xy6;
			begin
			end
		begin
		end
	begin
	end.