e111.pl0

1. PL/0 语言介绍 ●PL/0 程序设计语言是一个较简单的语言

PROGRAM EX01;
VAR A,B:INTEGER;
BEGIN
  B:=1;
  READ(A);
  IF A<>0 THEN
  WRITE(A)
  ELSE
  WRITE(B);
END.