neq.pl0

pl0编译器源码

PROGRAM EX03;
VAR I,J;
BEGIN
  READ(I);
  READ(J);
  IF I<>J THEN
    WRITE(1)
  ELSE
   WRITE(0)
END.