inc.pl0

来自「编译原理课程设计」· PL0 代码 · 共 13 行

PROGRAM EX01;
VAR A,B;
BEGIN
  READ(A);
  READ(B);
  IF A<0
  THEN
  B++
  ELSE
  A++;
  WRITE(A);
  WRITE(B)
END.