+=.pl0

pl0语言拓展

PROGRAM MAIN;
CONST A=10;
VAR B;
BEGIN 
B:=A;
B+=1;
WRITE(B);
END.