e0104.pl0

编译原理课程设计 PL/0语言编译程序 c++builder

PROGRAM EX01;
VAR A,B;
BEGIN
  A:=88;
  B:=11;
 READ(B);
IF A>B 
THEN 
  BEGIN
    WRITE(A);
    WRITE(A+12);
  END;

  BEGIN
     WRITE(B);
     WRITE(B*10);
  END;
END.