ifthen.txt

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

const a=4,b=2,c=7.5;
var x,y,m :integer;

begin

x:=5;
if x<10
then
  write("x=",x);

end
.