yunsuanfu.pl0

为PL0编译器

PROGRAM EX01;
VAR A,B,C,D;
BEGIN
  A:=10;
  B:=10;
  C:=5;
  D:=5;
  A++;
  B--;
  C+=A++;
  D-=B;
  WRITE(A);
  WRITE(B);
  WRITE(C);
  WRITE(D);
  A:=A++;
  B:=B--;
  C+=A+A*B;
  D-=A-A/B;
  WRITE(A);
  WRITE(B);
  WRITE(C);
  WRITE(D)
END.