e0153.pl0

来自「编译原理课程设计 PL/0语言编译程序 c++builder」· PL0 代码 · 共 16 行

PROGRAM EX01;
VAR A,B;
BEGIN
  A:=88;
  B:=11;
 READ(B);
IF A<>B 
THEN 
WRITE(A)
ELSE
BEGIN
 B:=45;
 WRITE(B);
END;
END.