testchar.cod

来自「编译原理源码（包括语法分析」· COD 代码 · 共 12 行

=== COMPILE PL0 ===
  0 PROGRAM TEST; 
  0 	CHAR A; 
  1 	BEGIN 
  2 		A:='W'; 
  4 		WRITE(A);  
  6 	END. 
----------------------------- RUN PL0 ----------------------------- 
87
------------------------- END PL0 -----------------------------