else.pl0

来自「编译原理的课程设计,对PL0程序的修改与扩充,内附测试程序,即以.PL0为扩展名」· PL0 代码 · 共 11 行

PROGRAM MAIN;
VAR A,B,C,MAX;
BEGIN
  READ(A,B,C);
  IF A>B THEN
    MAX:=A
  ELSE MAX:=B;
  IF C>MAX THEN
    MAX:=C;
  WRITE(MAX);
END.