write.txt

用VC写的扩充的pl0文法编译器

const a=2,b=3,c=7.5;
var x,y,z:integer;

begin
x:=a;
y:=b;
z:=c;
write("x=",x);
write("y=",y);
write("z=",z);
end
.