e01.cod

来自「课程题目：对PL/0编译器作以下修改扩充」· COD 代码 · 共 15 行

=== COMPILE PL0 ===
  0 PROGRAM EX01; 
  0 VAR A,B,C; 
  1 BEGIN 
  2  A:=0; 
  4  IF A=0 THEN 
  7    A:=88; 
 10  
 10  WRITE(A); 
 13 END. 
~~~ RUN PL0 ~~~
88
~~~ END PL0 ~~~