test3

来自「一、 pl0文法：适用于递归下降分析算法」· 代码 · 共 16 行

const  a=10;
var  b,c;
procedure p;
	begin
		c:=b+a)-d--;
	end;

begin
	read(b);
	while b#0 a> do1
		begin
			call p;
			write(2*c-d-,6*a));
			read(b);
		end
end.