neq.pl0

来自「PL/0语言是Pascal语言的一个子集」· PL0 代码 · 共 8 行

PROGRAM NEQ;
VAR A,B;
BEGIN
  READ(A,B);
  IF A<>B THEN
  WRITE(B);
  WRITE(A);
END.