e011.pl0

来自「PL0功能的扩充编译原理课程设计：扩充赋值运算：+= 和-=」· PL0 代码 · 共 18 行

PROGRAM EX01;
VAR A,B,C:INT;
FUCTION SHI(F:INT):INT;
BEGIN
   READ(B);
   F:=B+1;
SHI:=F;
END.
BEGIN
 A:=1;
 B:=9;
C:=SHI(B);
 IF A=0 THEN
   A:=88;
ELSE B:=11;
 WRITE(C);
END.